<%@ Language=JScript%> <% var oConn, oRs, oRs1, a, b="", c, d, g, aa, ab, ac, ad, ae=0,as; aa=parseInt(Request.QueryString("TerritoryID"));ab=Request.QueryString("TerritoryDescription");ac=Request.QueryString("RegionID"); ad=parseInt(Request.QueryString("Srt"));as=Request.QueryString("Act"); oConn = Server.CreateObject("ADODB.Connection"); oConn.Open(as); if(Request.QueryString("UpID")==1){a="Select max(case when TerritoryDescription='"+ab+"' And RegionID="+ac+" then '1' else "; a=a+"'0' end) FROM Territories;"; oRs = oConn.Execute(a); if(oRs.Fields.Item(0).Value==1){ae=1;} else{oConn.Execute("insert into Territories (TerritoryID,TerritoryDescription,RegionID) values ("+aa+",'"+ab+"',"+ac+");");}} if(Request.QueryString("UpID")==2){oConn.Execute("Delete from Territories where TerritoryID="+aa+";");} if(Request.QueryString("UpID")==3){a="update Territories SET "; if(ab>""){a=a+"TerritoryDescription='"+ab+"'";} if(ab>""&&ac>""){a=a+",";} if(ac>""){a=a+" RegionID="+ac;} a=a+" where TerritoryID="+aa+";"; oConn.Execute(a);} %> SQL Northwind - Territories Updater
<% a="Select TerritoryID , convert(varchar,TerritoryDescription) As TerritoryDescription, Territories.RegionID As RegionID, "; a=a+"RegionDescription From Territories inner join Region on Territories.RegionID=Region.RegionID ORDER BY "; if(Request.QueryString("Srt")==1||Request.QueryString("Srt")==2||ad==1||ad==2){if(ad==1){a=a+"TerritoryDescription;";} else{a=a+"RegionDescription;";}}else{a=a+"TerritoryID;";} oRs = oConn.Execute(a); b="\n"; oRs.moveFirst(); while(oRs("TerritoryID")!=null&&oRs.EOF!=1){ c=oRs("TerritoryDescription"); for(i=0;i\n"; b=b+"\n"; b=b+"\n\n"; oRs.moveNext();d=null} c=oConn.Execute("select max(TerritoryID) Num from Territories;") c=parseInt(c("Num"))+1; b=b+"\n"; b=b+"\n"; b=b+"\n\n"; Response.Write(b); %>
"+oRs("TerritoryID")+"
<%if(g>""||g>=-1){Response.Write(""+g+"");}%> <% if(ae==1){Response.Write("Could not add Record, Record already exists!");}%>
">