NicklasMedlem sedan juni 200133 inlägg Jag försöker att göra ett script som byter stilmall efter personligt val och med hjälp av cookies. Jag tror jag har fått det att fungera någorlunda men jag måste trycka på Refresh varje gång, jag vet inte hur jag ska få till så att valet uppdateras automatiskt (Refresh)
Någon som vet eller finns det bättre sätt att göra detta på ?
Här kommer koden.
<html>
<head>
<title>Style</title>
<%
response.cookies("Style").Expires = date + 365
num=request.cookies("Style")
If num = "" Then
Response.Write "<link rel=""StyleSheet"" HREF=""pnp.css"" type=""text/css"">"
Else
Response.Write "<link rel=""StyleSheet"" HREF=""pnp1.css"" type=""text/css"">"
End If
%>
<%
Select Case Request.Querystring("page")
Case "", "pnp"
response.cookies("Style") = ""
Case "pnp1"
response.cookies("Style") = 1
End Select
%>
</head>
<body>
<a href="style.asp?page=pnp">Style</a>
<a href="style.asp?page=pnp1">Style1</a>
</body>
</html>
/Nicklas
NicklasMedlem sedan juni 200133 inlägg Löste det !
<html>
<head>
<title>Style</title>
<%
Response.Buffer = true
response.cookies("Style").Expires = date + 365
num=request.cookies("Style")
If num = "" Then
Response.Write "<link rel=""StyleSheet"" HREF=""pnp.css"" type=""text/css"">"
Elseif num = 1 Then
Response.Write "<link rel=""StyleSheet"" HREF=""pnp1.css"" type=""text/css"">"
Elseif num = 2 Then
Response.Write "<link rel=""StyleSheet"" HREF=""pnp2.css"" type=""text/css"">"
Elseif num = 3 Then
Response.Write "<link rel=""StyleSheet"" HREF=""pnp3.css"" type=""text/css"">"
End If
%>
<%
Select Case Request.Querystring("page")
Case "pnp"
response.cookies("Style") = ""
response.redirect "style.asp"
Case "pnp1"
response.cookies("Style") = 1
response.redirect "style.asp"
Case "pnp2"
response.cookies("Style") = 2
response.redirect "style.asp"
Case "pnp3"
response.cookies("Style") = 3
response.redirect "style.asp"
End Select
%>
</head>
<body>
<a href="style.asp?page=pnp">Style</a><br>
<a href="style.asp?page=pnp1">Style1</a><br>
<a href="style.asp?page=pnp2">Style2</a><br>
<a href="style.asp?page=pnp3">Style2</a><br>
</body>
</html>