Wobbler
10-01-2002, 08:31 PM
Can sombody help me make this cookie to html code so if you:
Enter the index.htm page a splash image will be shown, and under the image there is a checkbox.
When you check that box it will save a cookie that makes when you you visit the site next time you will enter index2.htm page directly instead to click the splash image at the index.htm page!!
' Update cookie if box checked
if Request.Form.Count > 0 then
Response.Cookies("goupdates") = Request.Form("goupdates")
' The Cookie send only to first page
' on www.???.com
Response.Cookies("goupdates").domain = "www.???.com"
Response.Cookies("goupdates").path = "/"
' Expires after a month
Response.Cookies("goupdates").Expires = DateAdd("m",1,now())
Server.Transfer("index2.htm")
end if
' Go to default site if nothing checked
if Request.QueryString("show") = "" and Request.Cookies("goupdates") = "TRUE"
then
Server.Transfer("index2.htm")
end if
Enter the index.htm page a splash image will be shown, and under the image there is a checkbox.
When you check that box it will save a cookie that makes when you you visit the site next time you will enter index2.htm page directly instead to click the splash image at the index.htm page!!
' Update cookie if box checked
if Request.Form.Count > 0 then
Response.Cookies("goupdates") = Request.Form("goupdates")
' The Cookie send only to first page
' on www.???.com
Response.Cookies("goupdates").domain = "www.???.com"
Response.Cookies("goupdates").path = "/"
' Expires after a month
Response.Cookies("goupdates").Expires = DateAdd("m",1,now())
Server.Transfer("index2.htm")
end if
' Go to default site if nothing checked
if Request.QueryString("show") = "" and Request.Cookies("goupdates") = "TRUE"
then
Server.Transfer("index2.htm")
end if