webForumDet fria alternativet

Byte av stilmall

1 svar · 224 visningar · startad av Nicklas

NicklasMedlem sedan juni 200133 inlägg
#1

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
#2

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>
132 ms totalt · 3 externa anrop · v20260731065814-full.beb2e261
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
130 ms — hämta tråd, inlägg och bilagor (db)