<%@ LANGUAGE = JScript %> <% Response.Expires= -1 %> <% var oConn, oRs, oRs1, a, b="", aa, ab, ac, ad, ae, af, ag, ah, ai, aj, ak, al, am=0,as; aa=Request.QueryString("CustomerID");ab=Request.QueryString("CUID"); ac=Request.QueryString("CompanyName");ad=Request.QueryString("ContactName");ae=Request.QueryString("ContactTitle"); af=Request.QueryString("Address");ag=Request.QueryString("City");ah=Request.QueryString("Region"); ai=Request.QueryString("PostalCode");aj=Request.QueryString("Country");ak=Request.QueryString("Phone"); al=Request.QueryString("Fax");as=Request.QueryString("Act"); oConn = Server.CreateObject("ADODB.Connection"); oConn.Open(as); if(Request.QueryString("UpID")==1){ a=" Select Max(case when CompanyName='"+ac+"' And Address='"+af+"' And City='"+ag+"' And PostalCode='"+ai+"' then '1' "; a=a+"else '0' end) FROM Customers;"; oRs = oConn.Execute(a); if(oRs.Fields.Item(0).Value>=1){am=1;} else{a="insert into Customers (CustomerID, CompanyName, ContactName, ContactTitle, Address, City, Region, PostalCode, Country, "; a=a+"Phone, Fax) values ('"+ab+"','"+ac+"','"+ad+"','"+ae+"','"+af+"','"+ag+"','"+ah+"','"+ai+"','"+aj+"','"+ak+"','"+al+"')"; oConn.Execute (a);}} if(Request.QueryString("UpID")==2){oConn.Execute("Delete from Customers where CustomerID='"+ab+"';");} if(Request.QueryString("UpID")==3){a=" update Customers SET CompanyName='"+ac+"',ContactName='"+ad+"',ContactTitle='"+ae+"',"; a=a+"Address='"+af+"',City='"+ag+"', Region='"+ah+"',PostalCode='"+ai+"',Country='"+aj+"', Phone='"+ak+"'"; a=a+", Fax='"+al+"' Where CustomerID='"+ab+"';"; oConn.Execute(a);} %>

Company ID

<% if(Request.QueryString("UpID")!=2&&aa>""){Response.Write("SELECT FROM LIST\n");} else{Response.Write("SELECT FROM LIST\n");} oRs = oConn.Execute("Select * From Customers Order By CompanyName;"); while(oRs("CustomerID")!=null&&oRs.EOF!=1){ b=b+"""&&oRs("CustomerID").Value==aa){b=b+" selected";} b=b+">"+oRs("CompanyName")+" - "+oRs("City")+" - "+oRs("Region")+" - "+oRs("PostalCode")+""; oRs.moveNext();b=b+"\n";} Response.Write(b); %>

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

---

Customer ID	""&&Request.QueryString("UpID")!=2){Response.Write(ab);} else if(Request.QueryString("UpID")==1){ a="Select * FROM Customers Where CompanyName='"+ac+"' And ContactName='"+ad+"' And ContactTitle='"+ae+"' And Address="; a=a+"'"+af+"' And City='"+ag+"' And Region='"+ah+"' And PostalCode='"+ai+"' And Country='"+aj+"' And Phone="; a=a+"'"+ak+"' And Fax='"+al+"';"; oRs1 = oConn.Execute (a); Response.Write(oRs1("CustomerID"));} %> " size=11>	Company Name	""&&Request.QueryString("UpID")!=2){Response.Write(ac);} %> " size=60 onchange="if(MnFrm.CUID.value==''){MnFrm.CUID.value=MnFrm.CompanyName.value.substring(0,5).toUpperCase();}">
Contact Title	""&&Request.QueryString("UpID")!=2){Response.Write(ae);} %> " size=5>	Contact Name	""&&Request.QueryString("UpID")!=2){Response.Write(ad);} %> " size=60>
Address	""&&Request.QueryString("UpID")!=2){Response.Write(">"+oRs("Address")+"");} else if(af>""&&Request.QueryString("UpID")!=2){Response.Write(">"+af+"");} else {Response.Write(">");} %>
City	""&&Request.QueryString("UpID")!=2){Response.Write(ag);} %> " size=30>		Region	""&&Request.QueryString("UpID")!=2){Response.Write(ah);} %> " size=25>			Postal Code   ""&&Request.QueryString("UpID")!=2){Response.Write(ai);} %> " size=15>
Country	""&&Request.QueryString("UpID")!=2){Response.Write(aj);} %> " size=45>			Phone Number	""&&Request.QueryString("UpID")!=2){Response.Write(ak);} %> " size=30>
Fax Number	""&&Request.QueryString("UpID")!=2){Response.Write(al);} %> " size=35>			ADD!     DELETE!     UPDATE!     CLEAR/REFRESH!