vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Top-Preis! AP-Access-Tools-CD Volume 1  
 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: Suche in Datenbank 
Autor: Chris
Datum: 12.01.02 18:34

Hi ! ! !

Danke, Lordchen!!! aber wo muss ich nun dies einsetzen???
Ich habe es mal so versucht:
'Datenbank öffnen
Dim Db As Database
Dim Tabelle As Recordset
Dim dbFile As String
Dim N As String, V As String, G As String
dbFile = App.Path + "Daten.MDB"
Set Db = Workspaces(0).OpenDatabase(dbFile, False, False)
Set Tabelle = Db.OpenRecordset("Kunden")
'aktiven Index festlegen
Tabelle.Index = "Sucheingabe"
'Suchen nach "Hans Mustermann , am 12.03.1955 gebohren"
Tabelle.Seek "=", "Hans" ', "Mustermann", "12.03.1955"
'Prüfen, ob Suche erfolgreich
If Not Tabelle.NoMatch Then
'Datensatz gefunden
Do While Not Tabelle.EOF
N = "" : V = "": G = ""
With Tabelle
If Not IsNull(!Name) Then N= !Name
If Not IsNull(!Vorname) Then V = !Vorname
If Not IsNull(!GebDatum) Then G = !GebDatum
.MoveNext
End With
List1.Additem N & " " & V & ", " & G
Loop
Else
'kein Datensatz vorhanden
MsgBox "Kein entsprechender Datensatz gespeichert."
End If

Aber das funktioniert nicht, was habe ich falsch gemacht???

Danke,
MfG
Chris
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Suche in Datenbank62Chris12.01.02 16:42
Re: Suche in Datenbank223unbekannt12.01.02 17:50
Re: Suche in Datenbank31Chris12.01.02 18:34
Re: Suche in Datenbank221unbekannt12.01.02 19:05
Re: Suche in Datenbank35Chris12.01.02 19:34
Re: Suche in Datenbank196unbekannt12.01.02 19:39
Hab den Fehler !21Chris12.01.02 19:40
Re: Suche in Datenbank30Chris12.01.02 20:32
Re: Suche in Datenbank220unbekannt12.01.02 20:38
Danke für die schnelle Hilef!!! (oT)25Chris12.01.02 20:58
Re: Suche in Datenbank27Chris12.01.02 21:41
Re: Suche in Datenbank212unbekannt12.01.02 21:50
Re: Suche in Datenbank28Chris12.01.02 22:21
Nö, einfach so214unbekannt12.01.02 22:35
Re: Nö, einfach so28Chris13.01.02 08:40
Re: Nö, einfach so202ModeratorDieter13.01.02 11:11

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