<% IF Application("JBSX_sSettings_CookiesIsEnable") = "True" THEN If ((Cstr(Request.Cookies("JBSX")("aEmail")) = "") Or Cstr(Request.Cookies("JBSX")("aPassword")) = "") Then Response.Redirect "login.asp" Else if ((Cstr(Session("JBSX_aContactName") = "")) Or Cstr(Session("JBSX_aContactName") = "")) Then strSQL = "SELECT AdvertiserID, aEmail, aContactName, aCompanyName FROM JBS_Advertiser WHERE aEmail = '" & Request.Cookies("JBSX")("aEmail") & "' AND aPassword = '" & Request.Cookies("JBSX")("aPassword") & "' " Set objRS = Conn.Execute(strSQL) if Not objRS.EOF then Session("JBSX_AdvertiserID") = objRS("AdvertiserID") Session("JBSX_aEmail") = objRS("aEmail") Session("JBSX_aContactName") = objRS("aContactName") Session("JBSX_aCompanyName") = objRS("aCompanyName") Session("JBSX_aLogin") = "True" else Response.Redirect "login.asp" end if objRS.Close : Set objRS = Nothing end if End If ELSE If ((Cstr(Session("JBSX_aEmail")) = "") Or Cstr(Session("JBSX_aPassword")) = "") Then Response.Redirect "login.asp" Else if ((Cstr(Session("JBSX_aContactName") = "")) Or Cstr(Session("JBSX_aContactName") = "")) Then strSQL = "SELECT AdvertiserID, aEmail, aContactName, aCompanyName FROM JBS_Advertiser WHERE aEmail = '" & Session("JBSX_aEmail") & "' AND aPassword = '" & Session("JBSX_aPassword") & "' " Set objRS = Conn.Execute(strSQL) if Not objRS.EOF then Session("JBSX_AdvertiserID") = objRS("AdvertiserID") Session("JBSX_aEmail") = objRS("aEmail") Session("JBSX_aContactName") = objRS("aContactName") Session("JBSX_aCompanyName") = objRS("aCompanyName") Session("JBSX_aLogin") = "True" else Response.Redirect "login.asp" end if objRS.Close : Set objRS = Nothing end if End If END IF %>