ADO und Access-DB(Abfrage)
- From: "Günter Giel" <guenter.giel@xxxxxx>
- Date: Wed, 9 Jul 2008 10:35:46 +0200
Hallo NG,
ich habe ein kleines Problem mit Access-DB und ADO,
Und zwar, wenn ich mit dem Recordset eine Tabelle öffne, läuft alles super.
Wenn ich mit dem RS aber eine Abfrage öffne,tut sich nichts.
Kann mir jemand helfen?
Ich dachte immer, mit dem Adodb.Recordset kann mann auf Tabellen und
Abfragen zufgreifen?
Private CnA As ADODB.Connection
With CnA
.CursorLocation = adUseClient
.Mode = adModeShareDenyNone
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = strPathToDB
.Open
End With
Private Sub Command1_Click()
Dim RsA As ADODB.Recordset
Dim Table As String
Dim sSQL As String
If CnA.State = adStateClosed Then
MsgBox "keine Connection zur Datenbank", _
vbCritical
Exit Sub
End If
'Fehlerbehandlung
On Error GoTo Abbruch
Set RsA = New ADODB.Recordset
'Tabelle bestimmen
Table = "Artikel"-----------------------Hier ist der Hacken!!!!!Wenn
das eine Abfrage ist, passiert nichts!!!!
'Recordset laden
sSQL = "Select * From " & Table
With RsA
.CursorType = adOpenKeyset
.LockType = adLockReadOnly
.ActiveConnection = CnA
.Open sSQL
End With
'anzeigen in Flexgrid
FlexFillFromRs RsA, MSFlexGrid1
usw....
end sub
Danke vielmals im voraus!!!
.
- Follow-Ups:
- Re: ADO und Access-DB(Abfrage)
- From: Peter Götz
- Re: ADO und Access-DB(Abfrage)
- Prev by Date: Re: Zurückschreiben der DB auf die HD
- Next by Date: Re: Zurückschreiben der DB auf die HD
- Previous by thread: Hierarchische Recordsets
- Next by thread: Re: ADO und Access-DB(Abfrage)
- Index(es):
Relevant Pages
|
