Flere samtidige brugere

Husker du at lukke din database hvergang med

Conn.close
set conn = nothing

?

www.wservice.dk har indtil for nylig kørt på Access uden problemer, så der kan sagtens være flere samtidige brugere.

Hvordan opdatere du din db?
ADO object eller sql?

Hvis du forbinder til databasen via en ODBC DSN, bør du måske nok lige undersøge, om du måske skulle have afkrydset \"Exclusive\" ved et uheld.

netsrac >> Ja, jeg lukker databasen hver gang.
mwittrock >> Jeg er ærlig talt ikke sikker på hvad du mener?
dazzeler >> Her er et eksempel. Det er et forum jeg har smidt sammen, og den laver en del \"benarbejde\" og derfor det sted hvor jeg oftest støder på problemet, at filen allerede er i brug, og jeg derfor får en fejlmeddelelse.

----------------------------------------------

set conn = server.createobject(\"ADODB.connection\")
strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\" & Server.MapPath(\"../db/forum.mdb\")
conn.open strDSN
   
SQL = \"SELECT * FROM Forum WHERE link=0 order by ID desc\"
set RS = conn.execute( SQL )

If RS.eof then
  Response.write\"LigaForum er tomt.\"
else
  do while (not RS.eof)
    ....skriver indlæg ud med tilhørende besvarelser....
    RS.movenext
  loop
End If
RS = nothing
conn.close
set conn = null

Ups. Nu kom jeg hjem, og kunne se kildekoden som den faktisk ser ud.

To korrektioner til ovenstående.

tredjesidste linie:
SET RS = nothing

sidste linie:
set conn = nothing

Er det muligt på nogen måde at få et recordset, og så lukke forbindelsen til databasen, og stadig arbejde videre med det recordset man har fået?

I så fald vil jeg kunne lukke forbindelsen umiddelbart efter at jeg har fyret min SQL af, og ikke vente til jeg har arbejdet mig ned igennem det hele.

Du kan gøre følgende, og få et såkaldt disconnected recordset, som netop er et recordset der ikke længere har forbindelse til databasen:

Const adUseClient = 3 \' Kun hvis du ikke i forvejen har inkluderet ADO konstanterne

Set objRS = Server.CreateObject(\"ADODB.Recordset\")
Set objDbConn = Server.CreateObject(\"ADODB.Connection\")

objDbConn.Open dsn \' Eller hvordan du nu åbner forbindelsen
objRS.ActiveConnection = objDbConn
objRS.CursorLocation = adUseClient
objRS.Open \"SELECT .... FROM .... WHERE ....\"
Set objRS.ActiveConnection = Nothing
objDbConn.Close

I det oprindelige spørgsmål
http://www.eksperten.dk/spm/80777
leverede kichian svaret på det jeg bad om, så jeg hiver pointene derover så han kan få dem.

mwittrock >> Tak for dit svar. Jeg lader 50 point blive hængende til dig. Jeg håber det er tilfredsstillende?

No problem.