<%@ Language=VBScript%>
<%
Dim hasCookie
Dim pword, email
For each Item in Request.Cookies
if Item = "email" then
email = cstr(Request.Cookies(Item))
end if
Next
For each Item in Request.Cookies
if Item = "pword" then
pword = cstr(Request.Cookies(Item))
end if
Next
if len(pword)>0 and len(email)>0 then
hasCookie = true
end if
%>
Peak Entertainment - Peak Rewards