Hejdisconnected recordset
Jag har lite problem och hittar inte nån bra info:
Jag vill koppla till en databas fylla ett recordset och sedan stänga kopplingen till databasen, men ändå ha möjligheten att navigera genom recordsetet. Jag skrev följade kod för att testa:
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim sql As String
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset
cn.Open "nwind"
sql = "SELECT CustomerID FROM Customers"
rs.CursorLocation = adUseClient
rs.Open sql, cn, adOpenStatic, adLockBatchOptimistic
cn.Close
Do Until rs.EOF
List1.AddItem rs(0)
rs.MoveNext
Loop
...men får då felmeddelandet att jag inte kan köra "do until rs.eof" för att objektet inte är öppet... Men är det inte det som (delvis) är grejen med disconnected recordsets? Jag vet att man kan spara ner till fil eller lägga det i en array, men det bästa hade ändå varit att kunna navigera som vanligt i recordsetet.
Går det?