%@ LANGUAGE="VBSCRIPT" %> <% if Session("username") = "" then Response.Redirect("/logon.asp") end if %> <%sql="SELECT max([Customer ID]) AS Maxcustid FROM Customer"%> <%Set Conn = Server.CreateObject("ADODB.Connection")%> <%Conn.Open "Xtreme sample data"%> <%Set RS = Conn.Execute(sql) %>