Jeg har nogle problemer med at få min count til at virke. Jeg er næsten
sikker på at det ligger i måden jeg åbner Recordsettet på, men har ikke
kunne finde på at løse problemet uden at ændre måden hvorpå Recordsettet
åbnes. Denne metode vil jeg gerne beholde hvis det kan lade sig gøre?
Dim strSQL
Set strSQL = oConn.Execute("Select count(NewsSygeplejeskerID) FROM tblNews
WHERE NewsSygeplejeskerID = "& strPersonId &" ")
Ovenstående bruger jeg til at tælle antal poster der er i en tabel, men den
giver fejlen
Error Type:
Microsoft VBScript runtime (0x800A01F4)
Variable is undefined: 'oConn'
Men oConn er jo defineret, se nedenstående funktion der åbner Recordsettet.
Nogen der har et bud på hvad der skal gøres anderledes for at få det til at
virke?
Function openRecordset(strSQL)
Dim oRs, oConn
Set oConn = Server.CreateObject("ADODB.Connection")
Set oRs = Server.CreateObject("ADODB.Recordset")
oConn.Open Session("DBGYM")
oRs.ActiveConnection = oConn
oRs.CursorType = adOpenKeyset
oRs.LockType = adLockOptimistic
oRs.Source = strSQL
oRs.Open
Set openRecordset = oRs
Set oRs = Nothing
End Function
--
Mvh / Regards
-=< Christian >=-
What capital has 164 letters in its name? See my web page to find out.
http://www.cmnielsen.dk ICQ: 25308942
" If something's hard to do, then it's not worth doing. Homer J. Simpson"