Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Datenbank
Autor: King Kong
Datum: 18.05.02 18:48
Hallo, Also ganz checke ich deine Frage nicht, du willst den DBINHALT bekommen? Was meinst du damit? Falls du den Tabelleninhalt meinst, also die Recordsets, dann kann ich dir natürlich eine Lösung geben. Notlösung: (AUSLESEN) Dim strStaetment as String Dim arriID() as integer Dim arriListIndex as integer Dim strNewListtext 'OpenDatabase...... and Recordset ...... strStaetment = "SELECT NameID Firstname, Lastname from Testtable" 'Execute Staetment Dim i as integer i = 0 While Not objRS.EOF strNewListtext = objRS.Fields("Firstname") & " " & objRS.Fields("Lastname") 'add ID to Array for Delete or Select Redim preserve arriID(i) as integer Redim preserve arriListIndex(i) as integer arriID(i) = objRS.Fields("NamID") arriListIndex(i) = i i = i + 1 lstName.additem strNewListtext Wend 'Close Recordset objRs.close NOTLÖSUNG: (LÖSCHEN) strStaetement = "Delete Testtable Where NameID = " & arrIndex(lstName.listindex) 'EXECUTE Staetment Hoffe das hilft dir, falls du es brauchst. Für Fragen, frag nur.... Grüsse King Kong

Datenbank	43	[young]mann	17.05.02 19:36
Re: Datenbank	61	King Kong	18.05.02 18:48

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