Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: sql ergebnis in Variable in VBA
Autor: tomcat
Datum: 07.06.03 13:40
Dim db as database Dim rs as recordset Dim strSQL as string 'Anzahl Datensätze dim counts as long strSQL = ("SELECT Gen_ID FROM Genre Where Gen_Bezeichnung = " & ein_genre & ";") 'Aktuelle Datenbank Set db = currentDB 'Recordset Set rs = CurrentDb.OpenRecordset(strSQL , dbOpenSnapshot) If rs.BOF Then MsgBox "Keine Datensätze" Exit Sub End If rs.MoveLast rs.MoveFirst counts = rs.RecordCount 'Hier durchlaufe ich alle zurückgegebenen Datensätze und gebe sie aus. 'Die Daten kannst Du beliebigen Variablen oder Strukturen zuweisen. '(Wenn es sicher nur einen Treffer gibt, dann kannst Du Dir die Schleife sparen und 'nur den einen Datensatz ausgeben) For i = 1 To counts MsgBox rs("GEN_Bezeichnung) rs.moveNext next set db = nothing rs.close set rs = nothing

sql ergebnis in Variable in VBA	238	Fiddell	06.06.03 19:33
Re: sql ergebnis in Variable in VBA	153	tomcat	07.06.03 13:33
Re: sql ergebnis in Variable in VBA	317	tomcat	07.06.03 13:40

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen