<% if formatnumber(Session("numitemsincart"),0) = 0 then response.redirect "cart.asp" end if if request("action") = "existingcustomer" then session("isreturncustomer") = 1 email2 = replace(request("email2"),"'","''") password = replace(request("password"),"'","''") Set rsLogin = Server.CreateObject("ADODB.Recordset") rsLogin.ActiveConnection = MM_objconn_STRING rsLogin.Source = "SELECT * FROM tblAccounts where email = '" & email2 & "' and password = '" & password & "'" rsLogin.Open() if not rsLogin.eof then Session("existingcustomer") = "yes" Session("billingname") = rsLogin("billingname") Session("billingaddress1") = rsLogin("billingaddress1") Session("billingaddress2") = rsLogin("billingaddress2") Session("billingcity") = rsLogin("billingcity") Session("billingstate") = rsLogin("billingstate") Session("billingcountry") = rsLogin("billingcountry") Session("billingzipcode") = rsLogin("billingzipcode") Session("shippingname") = rsLogin("shippingname") Session("shippingaddress1") = rsLogin("shippingaddress1") Session("shippingaddress2") = rsLogin("shippingaddress2") Session("shippingcity") = rsLogin("shippingcity") Session("shippingstate") = rsLogin("shippingstate") Session("shippingcountry") = rsLogin("shippingcountry") Session("shippingzipcode") = rsLogin("shippingzipcode") Session("email") = rsLogin("email") Session("password") = rsLogin("password") Session("phone") = rsLogin("phone") Session("accountid") = rsLogin("accountid") response.redirect "EditAccount.asp" rsLogin.Close() set rsLogin = nothing end if rsLogin.Close() set rsLogin = nothing msg2 = "ERROR: Unable to Authenticate" end if if request("action") = "newcustomer" then session("billingname") = replace(request("firstname"),"'","''") & " " & replace(request("lastname"),"'","''") session("shippingname") = replace(request("firstname"),"'","''") & " " & replace(request("lastname"),"'","''") Session("email") = replace(request("email1"),"'","''") response.redirect "EditAccount.asp" end if %> Denali BioTechnologies
<%=formatnumber(Session("numitemsincart"),0)%> Items in Cart (<%=formatcurrency(session("carttotal"))%>) [View Cart] [Checkout]
Denali BioTechnologiesDenali BioTechnologies
Denali BioTechnologies Secure Checkout

New Customers | Please create account
 <%=msg1%>
First Name:    
Last Name:  
Email Address:  
A valid email address is required to create account.
   
    Returning Customers | Please login
 <%=msg2%>
Email Address:  
Password:  
   
     
Lost Password?