Frigør tabel efter recordsetbrug
ObjektOrienteret problem - eller måske i virkeligheden bare et problem... :-)Jeg kan ikke få frigivet min tabel, fordi den er låst af en anden person eller process - når jeg laver det her...:
Jeg har lavet følgende metode til mit objekt MyDatabase:
----
Set rsFieldNames = ThisApp.DestinationDB.ReturnRecordset(MySQLString) \'Den modtager fx SELECT * FROM Testadr...
---- -->
Public Function ReturnRecordset(SQLstring As String) As ADODB.Recordset
Dim rst As New ADODB.Recordset
rst.Open SQLstring, mvarConnection, adOpenDynamic, adLockOptimistic
If Not rst.EOF Then
\'MsgBox \"succes\"
End If
\'While Not rst.EOF
\'Debug.Print rst.Fields(1).Value
\'rst.MoveNext
\'Wend
\'rst.MoveFirst
Set ReturnRecordset = rst
Set rst = Nothing
End Function
Mit problem er, at når jeg senere vil arbejde på/i den brugte tabel (Her testadr) så er den låst af en anden process. Hvorfor? Og hvordan får jeg så sat min funktion = nothing? - eftersom det må være her problemet ligger begravet... Jeg synes at jeg har prøvet alle kombinationer af adOpen\'s og adLock\'s... HJÆLP!!!...!!!
