vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Zippen wie die Profis!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
Re: Blättern in DB? 
Autor: Utzus
Datum: 07.02.02 21:55

Ich hab zwar nichts mit bookmarks am hut, aber ich will es aus der DB löschen, sonst wird die ja immer größer!
Ich weiß zwar nicht wie ihr immer denn code eingebt in diesem fenster, aber ich gebe mal meinen code an:

Private Sub Form_Load()
Dim SQL As String
' Alle Adressen alphabetisch
SQL = "SELECT * FROM Pruegelpause ORDER BY Name"
Set rs = DB.OpenRecordset(SQL)

' Und ab in die ListBox
List1.Clear
If rs.RecordCount > 0 Then
Do Until rs.EOF
List1.AddItem rs!Name
List1.ItemData(List1.ListCount - 1) = rs!ID
rs.MoveNext
Loop
End If
End Sub

Private Sub List1_Click()
' Datensatz suchen
Dim ID As Long

If List1.ListIndex >= 0 Then
ID = List1.ItemData(List1.ListIndex)
rs.FindFirst "ID = " & CStr(ID)
IdText.Text = rs!ID
txtName.Text = rs!Name
txtemail.Text = rs!email
...
End If
End Sub

So und wenn ich jetzt auf einen Namen in der listbox blau markiere (auswähle) und dann auf denn button klicke, dann soll dieser eintrag aus der Datenbak gelöscht werden!

thx,
Utzus
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Blättern in DB?102Utzus07.02.02 18:46
Re: Blättern in DB?204ModeratorDieter07.02.02 19:30
Re: Blättern in DB?38Utzus07.02.02 19:51
Re: Blättern in DB?188ModeratorDieter07.02.02 20:31
Re: Blättern in DB?40Utzus07.02.02 21:55
Na dann eben nochmal199ModeratorDieter07.02.02 22:04
thx und noch ne frage!34Utzus08.02.02 10:07
Re: thx und noch ne frage!190ModeratorDieter08.02.02 10:19

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übersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel