webForumDet fria alternativet

Cookie som ger fel??

ASP

4 svar · 246 visningar · startad av limpon

Medlem sedan sep. 2001175 inlägg
Frågan#1

Får det här felet nu.

Körningsfel i Microsoft VBScript error '800a000d'
Inkompatibla typer: 'cint'
/default.asp, line 147

Fick det inte förrut förrän jag lade till en ny röstning.

<%
SQLstmt = "SELECT * FROM rosta order by id desc"
Set rs = nothing
set rs = databas.execute(sqlstmt)
id = rs("id")
if cint(request.cookies("dannerocookie")) <> id then
%>
              <p> 
              <p><b><font size="2" face="Georgia"><img src='img/bit7.gif' border='0' width="13" height="14">&nbsp;&nbsp;Omröstning</font></b><br>
                <%
response.write rs("fraga")&""
%>
            </td>
          </tr>
          <tr> 
            <td> 
              <form method="post" action="rosta.asp">
                <input type="hidden" name="id" value="<%=rs("id")%>">
                <select size="1" name="rosta">
                  <option value="ja">Ja</option>
                  <option value="nej">Nej</option>
                  <option value="vetej">Vet ej</option>
                </select>
                <input type="submit" name="submit" value="Rösta"></form>
                <%

elseIF id = cint(request.cookies("dannerocookie")) then

%>
                <%
response.write "<p><b><font size='2' face='Georgia'><img src='img/bit7.gif' border='0' width='13' height='14'>&nbsp;&nbsp;Omröstning</font></b><br>"
response.write "<i>"&rs("fraga")&"</i><br>"
response.write "Ja: <b>"&rs("ja")&"</b>.<br>"
response.write "Nej <b>"&rs("nej")&"</b>.<br>"
response.write "Vet ej: <b>"&rs("vetej")&"</b>.<br>"
response.write "Totalt: "&rs("ja")+rs("nej")+rs("vetej")&"."

end if
%>

Där är då själva sidan som visar ut, jag antar det det är den som felar. Men jag visar rosta.asp också.

<%
SQL="SELECT * FROM Rosta order by id desc"
set rs=databas.execute(sql)
id=rs("id")

id2=request.form("id")
varde = request.form("rosta")

if varde = "nej" then
response.cookies("dannerocookie") = id
response.cookies("dannerocookie").expires = #December 30, 2020#

SQL = "UPDATE rosta set nej = nej +1 where id="&id2
databas.execute(sql)
response.redirect("default.asp")

elseif varde = "ja" then
response.cookies("dannerocookie") = id
response.cookies("dannerocookie").expires = #December 30, 2020#

SQL = "UPDATE rosta set ja = ja +1 where id="&id2
databas.execute(sql)
response.redirect("default.asp")

elseif varde = "vetej" then
response.cookies("dannerocookie") = id
response.cookies("dannerocookie").expires = #December 30, 2020#

SQL = "UPDATE rosta set vetej = vetej +1 where id="&id2
databas.execute(sql)
response.redirect("default.asp")
end if

%>

Vore ju om någon kunde förklara för mig vad jag har gjort fel.

mvh Jimmy

Medlem sedan feb. 20012 412 inlägg
#2

Hej,

som jag ser det kan det bero på 2 saker:

  1. request.cookies("dannerocookie") är tom
  2. innehållet i request.cookies("dannerocookie") är inte enbart siffror utan också bokstäver.

Vad får du om du skrivet ut rs("id") och request.cookies("dannerocookie") ?

SQLstmt = "SELECT * FROM rosta order by id desc"
[b]Set rs = nothing[/b]
set rs = databas.execute(sqlstmt)
id = rs("id")

vad gör den fetmarkerade raden där?

Medlem sedan sep. 2001175 inlägg
#3

Just jag får

2
2

Men jag har ju röstat och fått cookien.

Men på tidigare röstningen så var id:et 1.

Då funkade det kanon och allt, men jag vet inte.. alls bombsäkert på hur cookien fungerar vet bara att man sparar variablar i dom lr?

Det är ett mycket konstigt fel det här. Det funkade först, sedan då jag lade till en ny röstning så vart det felande. Kan det bero på att dannerocookie har fortfarande samma värde. 1 d.vs.
?

Medlem sedan sep. 2001175 inlägg
#4

det fetmarkerade sätter rs till inget , jag har använt det förrut också, i en öppning tidigare på dokumentet.

Medlem sedan sep. 2001175 inlägg
#5

Måste man deleta cookien först?

259 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
123 ms — deklarationer (db)
0 ms — hämta statistik (cache)
131 ms — hämta tråd, inlägg och bilagor (db)
126 ms — ändringar (db)