oConn.Execute

jeg glemte at nævne at jeg skal lukke browseren og starte en ny for at komme forbi fejlen.

Hmm kan ejg ikke prøve at se koden?

//>Rune

Det er en god ide altid at lukke for recordset og forbindelse til databasen efter du har brugt dem, det kan måske være derfor:

RS.Close
set RS = nothing

oConn.close
Set oConn = nothing

Det gør jeg for så vidt altid. Jeg kan selvfølgelig ha glemt det hist og her men prøver ihvertfald og huske det.
Kan jeg på nogen måde checke enten hvor jeg ikke har fået lukket recordset'ene eller gøre et eller andet for at lukke dem alle.

du kan gøre  noget i stil med for at sikre man ikke får fejl når man lukker forbindelsen. På samme måde kan gøre med recordset.

if not (oConn is nothing) then
  oConn.close
  Set oConn = nothing
end if

En typsik "fejl" hvor man ikke får lukket et recordset kommer når man åbner det på denne  måde:

Set rs = oConn.Execute(SQL)
..
..
..
'Disse to linier bliver mange gange glemt når man bruger Set
rs.Close
Set rs = nothing


Men derimod husker man den tit når man gør sådan her:
rs.Open SQL, oConn, 1
..
..
..
rs.Close
Set rs = nothing


Det er min erfaring og når jeg kigger i noget af de kode jeg har lavet så har jeg også flere steder glemt det hvor jeg bruger Set rs = connection  til at åbne recordsetet.

Kan man bygge ind i den her at hvis fx oRs2 findes og ikke er lukket så skal den lukkes. Så vil jeg lave en include og smide i bunden af alle sider der sørger for at lukke dem der findes og ikke er lukkede

if not (oConn is nothing) then
  oConn.close
  Set oConn = nothing
end if

if not (oRs2 is nothing) then
  oRs2.close
  Set oRs2 = nothing
end if

jo men hvad nu hvis oRs2 ikke findes på siden. Får jeg så ikke en fejlmeddelse?

if 'en skulle sikre at der ikke kommer fejl.

Hvis oRs2 ikke findes så er den lig med nothing

if not (oRs2 is nothing) then

Eagleeye> Nu er jeg lidt i tvivl... Skal det ikke hede

if not IsNothing(oRs2) then
  oRs2.close
  Set oRs2 = nothing
end if

?

eller

if IsEmpty(oRs2) then
  oRs2.close
  Set oRs2 = nothing
end if

?
//>Rune

? Hvorfor har jeg fået points?

Well, anyway
Thx 4 Poinz

//>Rune