PPyromanMedlem sedan aug. 20033 inlägg Frågan#1 Har problem med följande if-sats.
Vet ej vart problemet ligger..
Någon som vet vad det kan tänkas vara för fel och vad jag skall göra åt det?
if Request.Querystring("ID") = 'Session("userID")' then
response.write "En text."
else
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("databasen")
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "SELECT * FROM tabell"
RecSet.Open Addera, Conn, 3, 3
RecSet.AddNew
RecSet("Asker") = Session("userID")
RecSet("Confirmer") = Request.QueryString("id")
RecSet("LoginName") = Request.Querystring("LoginName")
Recset.Update
RecSet.Close
Conn.Close
Set RecSet = nothing
Set Conn = nothing
End if
SSebbeMedlem sedan jan. 20032 285 inlägg if Request.Querystring("ID") = Session("userID") then
Så ska det nog stå. :)
Välkommen till wF förresten!
SSebbeMedlem sedan jan. 20032 285 inlägg Vad är det som är fel då?
PPyromanMedlem sedan aug. 20033 inlägg att jag inte lyckas få fram texten som ska komma om session("userID") är samma som ID i querrystringen..
SSebbeMedlem sedan jan. 20032 285 inlägg Det kanske funkar bättre såhär?
if CInt(Request.Querystring("ID")) = CInt(Session("userID")) then
response.write "En text."
else
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("databasen")
strSQL = "INSERT INTO tabell (Asker, Confirmer, LoginName) VALUES (" & Session("userID") & ", " & Request.QueryString("id") & ", '" & Request.QueryString("LoginName") & "')"
Conn.Execute(strSQL)
Conn.Close
Set Conn = nothing
End if
Gjorde även koden lite effektivare. :)
