webForumDet fria alternativet

Jäfmröa Session med recordset.

ASP

43 svar · 679 visningar · startad av magnusfernstrom · sida 3 av 3

Frågan, av magnusfernstrom

Hej hej! Jag vill jämföra en Session med ett recordset för att kolla om användarens Id är lika med det ID som meddelandent är till. Annars ska man redirectas till meddelande sidan. Jag får det inte att fungera med den här koden: If Session("userID") = rs("To") Then 'koden som skriver ut meddelanden Jag får inget felmeddelande, men ingen data dyker helt enkelt upp på sidan. Jag kanske f

Läs frågan i sin helhet →
Medlem sedan mars 20033 686 inlägg
#41

FANTASTISKT!
Det fungerar :)
Du förstår inte hur glad jag är nu :)

Eller nu ska vi inte ta i. Allt fungerar ju antagligen inte.
Men jag återkommer om fler fel uppstår (med andra ord återkommer jag :) )

MVH Magnus Fernström

Medlem sedan mars 20033 686 inlägg
#42

Hmm det här är skumt...

Inkorgen kan endast visas när det finns något meddelande!
När den är tom får jag det här meddelandet:
error '80020009'

/slauson/db/1/meddelanden.asp, line 10

Säger ju inte en så mycket...
Vad är fel nu då?

<%
If Session("inloggad") = "ja" Then

Set db = Server.CreateObject("ADODB.Connection")
db.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("users.mdb")
SQL = "SELECT * FROM meddelanden WHERE Till = " & Session("userID") & ""
Set rs = db.Execute(SQL)

If IsNumeric(Session("userID")) Then
     If CLng(Session("userID")) = CLng(rs("Till")) Then

Do until rs.EOF
%>
<table border="0" cellpadding="1" cellspacing="1">
<td width="300" height="" valign="center" align="left" bgcolor="EEEEEE">
<a href="message.asp?MID=<%=rs("MID")%>"><%=rs("Rubrik")%></a>
</td>
<td width="200" height="" valign="center" align="left" bgcolor="EEEEEE">
<a href="users.asp?userID=<%=rs("Fran")%>"><%=rs("FranUser")%></a>
</td>
<td width="100" height="" valign="center" align="left" bgcolor="EEEEEE">
<a href="delete_message.asp?MID=<%=rs("MID")%>">ta bort</a>
</td>
<%
rs.MoveNext
Loop
Set rs = nothing

Else
Response.Redirect "login.asp"
End If
End If
End If
%>
Medlem sedan juni 200032 967 inlägg
#43

Du kan ta bort de här if-satserna:

If IsNumeric(Session("userID")) Then
     If CLng(Session("userID")) = CLng(rs("Till")) Then

(och de end if som hör ihop med dem, eftersom du har den jämförelsen i SQL-frågan.

Mvh

Medlem sedan mars 20033 686 inlägg
#44

aha okej...

260 ms totalt · 4 externa anrop · v20260731065814-full.6fe65c25
124 ms — deklarationer (db)
0 ms — hämta statistik (cache)
133 ms — hämta tråd, inlägg och bilagor (db)
124 ms — ändringar (db)