webForumDet fria alternativet

problem med något...

ASPur ASP

6 svar · 197 visningar · startad av McMiller

Medlem sedan okt. 2000238 inlägg
Frågan#1

Jag har ett problem med en inloggningssida som jag håller på med det står att ett objekt saknas men jag ser inget fel för allting som koden pekar på finns....kan nån hjälpa mig hitta felet?

Här är koden jag har problem med:

<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={MicroSoft Access Driver (*.mdb)};dbq=" & Server.MapPath("/c2/db/craddle.mdb")

Visa = "SELECT online, nick, id FROM users WHERE nick= '"&TRIM(Session("UserId"))&"' "

RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic
%>
<% RecSet("online")=TRUE %>
<%
RecSet.Update
RecSet.Close
Set RecSet = Nothing
Connect.Close
Set Connect = Nothing
%>

//McMiller

------------------
www.jelly-head.net ---- Din nya nöjesguide!!!

Medlem sedan juni 2000145 inlägg
#2

Testa med:
Visa = "SELECT online, nick, id FROM users WHERE nick=" & TRIM(Session("UserId"))

Medlem sedan juni 200032 967 inlägg
#3

kan det inte vara så att du glömt:

set RecSet = server.createobject ("adodb.recordset")

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
that's what brian boitano would do!</A>

Medlem sedan okt. 2000238 inlägg
#4

Jag provade med att lägga till set RecSet = server.createobject ("adodb.recordset") i koden men då kom det upp att det var inkompitabla typer eller nåt liknande.........

------------------
www.jelly-head.net ---- Din nya nöjesguide!!!

Medlem sedan dec. 19996 721 inlägg
#5

Men du behöver den raden...

Jag antar att du inkluderar adovbs.inc el. likn. någonstans, annars funkar inte adOpenStatic, adLockOptimistic etc.

Detta borde funka:

<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={MicroSoft Access Driver (*.mdb)};dbq=" & Server.MapPath("/c2/db/craddle.mdb")

Visa = "SELECT online, nick, id FROM users WHERE nick='" & TRIM(Session("UserId")) & "'"

set RecSet=server.createobject("adodb.recordset")

RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic
RecSet("online")=TRUE
RecSet.Update
RecSet.Close
Set RecSet = Nothing
Connect.Close
Set Connect = Nothing 
%>

men detta är bättre:

<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={MicroSoft Access Driver (*.mdb)};dbq=" & Server.MapPath("/c2/db/craddle.mdb")

Visa = "UPDATE users SET online=TRUE WHERE nick='" & TRIM(Session("UserId")) & "'"

Connect.Execute(Visa)
Connect.Close
Set Connect = Nothing 
%>
Medlem sedan okt. 2000238 inlägg
#6

Jag har fått ordning på problemet nu. Det räckte med att ta bort Set RecSet=nothing och Set Connect=nothing. Har en databaskoppling direkt efter den jag hade problem med och nu har jag bara RecSet=nothing och den andra där istället och nu fungerar det...:)

Den där sista kopplingsmetoden du skrev är den bättre än den jag använder???
Skulle vilja ha nån sorts beskrivning av den, samt hur man tar bort lägger till och hämtar från db:n....får nog leta lite på nätet....eller om det finns tillgängligt här på webforum..

//McMiller

------------------
www.jelly-head.net ---- Din nya nöjesguide!!!

Medlem sedan dec. 19996 721 inlägg
#7

Det sista är inte en kopplingsmetod, utan ren SQL. Titta i SQL-forumet, och på nätet, så hittar du nog massor.

mvh

131 ms totalt · 3 externa anrop · v20260731065814-full.4bcf49fe
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
128 ms — hämta tråd, inlägg och bilagor (db)