home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
221.214.14.186
/
221.214.14.186.tar
/
221.214.14.186
/
zb
/
Notepad-1
/
style.asp
< prev
next >
Wrap
Text File
|
2004-12-09
|
447b
|
21 lines
<%
response.buffer=true
dim style,referer
referer=request.servervariables("http_referer")
if referer="" then
referer="index.asp"
end if
style=request.querystring("style")
if style="" or not isNumeric(style) then
style=1
else
style=int(style)
end if
if cookiePath<>"" then
response.cookies("style").Path=cookiePath
end if
response.cookies("style")=cstr(style)
response.cookies("style").expires=dateadd("m",1,now())
response.redirect referer
%>