jeg prøver at sætte en cookie og gør præcis som jeg plejer og det plejer at
virke. Jeg har på fornemmelsen at jeg har overset en idiotisk fejl og håber
derfor at andre kan hjælpe mig.
admin.asp gør følgende:
hvis siden vises for første gang eller brugeren ikke har indtastet et
kodeord, bliver der vist en formular til indtastning. Den består af en
rullemenu og et indtastningsfelt.
Hvis siden kaldes fra formularen med pass=sukker, så skriver den davs til
personen og sætter en cookie med personens navn. JEg udskriver cookien lige
efter og det virker fint. Når jeg så kalder siden igen er cookien tom (under
case "")
Hvad er det jeg gør galt?
SumSum
<%@ LANGUAGE="VBSCRIPT" %>
<%
select case request.form("pass")
case "sukker"
response.Cookies("asvinn").Expires = date + 365
Response.Cookies("asvinn") = request.form("navn")
Response.write ("Hej " & Request.Cookies("asvinn") & ". Du er nu logget
ind som administrator")
Session("admin") = "JA"
Session.Timeout = 30
navnstr=Request.Cookies("asvinn")
response.write("*" & navnstr & "*")
case ""
navnstr=Request.Cookies("asvinn")
response.write("*" & navnstr & "*")
%>
<form name="form" method="post" action="admin.asp">
<table border=0>
<tr><td>Vælg navn:<td><SELECT NAME="navn" SIZE=1>
<%
' sæt det navn cookien indeholder som selected
if navnstr="Dragonfire" then
response.write("<OPTION VALUE=""Dragonfire"" selected>Dragonfire")
else
response.write("<option value=""Dragonfire"">Dragonfire")
end if
if navnstr="Halgrim Helgrimson" then
response.write("<OPTION VALUE=""Halgrim Helgrimson"" selected>Halgrim
Helgrimson")
else
response.write("<option value=""Halgrim Helgrimson"">Halgrim Helgrimson")
end if
%>
</SELECT>
<tr><td>kode: <td><input type="password" name="pass" size="24">
<tr><td colspan=2 align=right><input type="submit">
</table>
</form>
<%
case else
response.write("Forkert password")
end select
%>
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com).
Version: 6.0.373 / Virus Database: 208 - Release Date: 01-07-2002