Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: AKTUELLEN DATENSATZ AUSWÄHLEN
Autor: Soulfly
Datum: 21.02.03 10:52
Wie waers mit einem ListView ? folgendes Beispiel mit Verbindung zum SQL-Server: Private Sub cmdAusführen_Click() ListView1.ListItems.Clear Dim SqlStmt As String Dim li As ListItem 'Listview aufbauen MousePointer = vbHourglass SqlStmt = "SELECT Feld1,Feld2,Feld3" SqlStmt = SqlStmt & " FROM Tabelle" SqlStmt = SqlStmt & " WHERE Feld2 = 'Kriterium'" rs.Open SqlStmt If rs.EOF Then Meldung = MsgBox("Keine Daten vorhanden", vbOKOnly) MousePointer = vbDefault rs.Close Else Do Until rs.EOF 'Listview schreiben Set li = ListView1.ListItems.Add(, "k" & Feld1, Feld2) li.SubItems(1) = Feld3 rs.MoveNext Loop MousePointer = vbDefault rs.Close End If End Sub

AKTUELLEN DATENSATZ AUSWÄHLEN	527	Markus (*PROBLE...	20.02.03 19:54
Re: AKTUELLEN DATENSATZ AUSWÄHLEN	265	Soulfly	21.02.03 10:52
Re: AKTUELLEN DATENSATZ AUSWÄHLEN	68	moshi	21.02.03 14: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