<%@ LANGUAGE = JScript %> <% Response.Expires= -1 %> <% var oConn, oRs, oRs1, a, b="", ba, aa, ab, ac, ad, ae, af, ag, ah, ai, aj, ak, al, as; aa=parseInt(Request.QueryString("ProductID"));ab=parseInt(Request.QueryString("PrID")); ac=Request.QueryString("ProductName");ad=parseInt(Request.QueryString("SupplierID")); ae=parseInt(Request.QueryString("CategoryID"));af=Request.QueryString("QuantityPerUnit"); ag=Request.QueryString("UnitPrice");ah=parseInt(Request.QueryString("UnitsInStock")); ai=parseInt(Request.QueryString("UnitsOnOrder"));aj=parseInt(Request.QueryString("ReorderLevel")); ak=Request.QueryString("Discontinued");if(ak==1||ak=="on"){ak=-1;}else{ak=0;}as=Request.QueryString("Act"); oConn = Server.CreateObject("ADODB.Connection"); oConn.Open(as); if(Request.QueryString("UpID")==1){ a="Select Sum(IIf(ProductName='"+ac+"' And SupplierID="+ad+" And CategoryID="+ae+" And QuantityPerUnit='"+af+"'"; a=a+" And UnitPrice=Format("+ag+",'Standard'),1,0)) FROM Products;"; oRs = oConn.Execute(a); if(oRs.Fields.Item(0).Value>=1){al=1;} else{a="insert into Products (ProductName, SupplierID, CategoryID, QuantityPerUnit, UnitPrice,UnitsInStock,"; a=a+" UnitsOnOrder, ReorderLevel, Discontinued) values ('"+ac+"',"+ad+","+ae+",'"+af+"',"+ag+","+ah+","+ai; a=a+","+aj+",'"+ak+"')"; oConn.Execute(a);}} if(Request.QueryString("UpID")==2){oConn.Execute("Delete ProductID from Products where ProductID="+ab+";");} if(Request.QueryString("UpID")==3){a=" update Products SET ProductName='"+ac+"',SupplierID="+ad+",CategoryID="+ae; a=a+",QuantityPerUnit='"+af+"',UnitPrice="+ag+",UnitsInStock="+ah+",UnitsOnOrder="+ai+",ReorderLevel="+aj; a=a+",Discontinued="+ak+" where ProductID="+ab+";"; oConn.Execute(a);} %>

Product ID

<% if(Request.QueryString("UpID")!=2&&aa>0){Response.Write("SELECT FROM LIST\n");} else{Response.Write("SELECT FROM LIST\n");} a="Select ProductID, ProductName, QuantityPerUnit, '$'+Format(UnitPrice,'Standard') As UnitPrice, Products.SupplierID"; a=a+" As SupplierID, CompanyName from Products Inner Join Suppliers On Suppliers.SupplierID=Products.SupplierID "; a=a+"ORDER BY ProductName, CompanyName;"; oRs = oConn.Execute(a); while(oRs("SupplierID")!=null&&oRs.EOF!=1){ b=b+"0&&aa==oRs("ProductID")){b=b+"selected ";} b=b+"VALUE="+oRs("ProductID")+">"+oRs("ProductName")+" - "+oRs("QuantityPerUnit")+" - "+oRs("UnitPrice")+" - "; b=b+oRs("CompanyName")+""; oRs.moveNext();b=b+"\n";} Response.Write(b); %>

For Deleting and Updating Only!!!               <% if(al==1){Response.Write("Could not add Record, Record already exists!")}%>

---

Product ID	0&&Request.QueryString("UpID")!=2){Response.Write(ab);} else if(Request.QueryString("UpID")==1){ a="Select * FROM Products Where ProductName='"+ac+"' And SupplierID="+ad+" And CategoryID="+ae+" And "; a=a+"QuantityPerUnit='"+af+"' And UnitPrice="+ag+";"; oRs = oConn.Execute (a); Response.Write(oRs("ProductID"));} %> ">	Supplier ID	<% b=""; if(Request.QueryString("UpID")!=2&&ad!=null&&ad>0||aa>0){ Response.Write("SELECT FROM LIST\n");} else{Response.Write("SELECT FROM LIST\n");} oRs = oConn.Execute ( " Select * from Suppliers ORDER BY CompanyName;"); while(oRs("SupplierID")!=null&&oRs.EOF!=1){ b=b+"0){a="Select ProductID, ProductName, SupplierID, CategoryID, QuantityPerUnit,"; a=a+" UnitPrice, UnitsInStock, UnitsOnOrder, ReorderLevel, Discontinued from Products where ProductID="+aa+";"; oRs1 = oConn.Execute(a); if(parseInt(oRs1("SupplierID"))==oRs("SupplierID")){b=b+" SELECTED ";}} else if(Request.QueryString("UpID")!=2&&ad!=null&&ad>0){if(ad==oRs("SupplierID")){b=b+" SELECTED ";}} b=b+"VALUE="+oRs.Fields.Item(0).Value+">"+oRs.Fields.Item(1).Value+""; oRs.moveNext();b=b+"\n";} Response.Write(b); %>
Category ID	<% b=""; if(Request.QueryString("UpID")!=2&&ae!=null&&ae>0||aa>0){ Response.Write("SELECT FROM LIST\n");} else{Response.Write("SELECT FROM LIST\n");} oRs = oConn.Execute ( " Select * from Categories ORDER BY CategoryName;"); while(oRs("CategoryID")!=null&&oRs.EOF!=1){ b=b+"0&&parseInt(oRs1("CategoryID"))==oRs("CategoryID")){b=b+" SELECTED ";} else if(Request.QueryString("UpID")!=2&&ae!=null&&ae>0){if(ae==oRs("CategoryID")){b=b+" SELECTED ";}} b=b+"VALUE="+oRs("CategoryID")+">"+oRs("CategoryName")+""; oRs.moveNext();b=b+"\n";} Response.Write(b); %>			Units In Stock	""||ah==0&&Request.QueryString("UpID")!=2){Response.Write(ah);} %> " size=7>	Discontinued  0&&Request.QueryString("UpID")!=2&&oRs1("Discontinued")!=0){Response.Write("checked");} else if(aa>0&&Request.QueryString("UpID")!=2&&oRs1("Discontinued")==0){Response.Write(0);} else if(ak!=0&&Request.QueryString("UpID")!=2){Response.Write("checked");} %> onclick="if(checked==1){value=1;}">
Product Name	""&&Request.QueryString("UpID")!=2){Response.Write(ac);} %> ">
Quantity Per Unit	""&&Request.QueryString("UpID")!=2){Response.Write(af);} %> " size=25>		Unit Price	""&&Request.QueryString("UpID")!=2){Response.Write(ag);} %> " size=12>	Units On Order	""||ai==0&&Request.QueryString("UpID")!=2){Response.Write(ai);} %> " size=7>
Reorder Level	""||aj==0&&Request.QueryString("UpID")!=2){Response.Write(aj);} %> " size=7>	ADD!     DELETE!     UPDATE!     CLEAR/REFRESH!