vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Schützen Sie Ihre Software vor Software-Piraterie - mit sevLock 1.0 DLL!  
 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: SQl Abfrage mit Wildcard 
Autor: TheDestroyer
Datum: 10.12.01 23:38

Hier das ganze:

Private Sub txtArtistSearch_Change()
Dim adoRS As New ADODB.Recordset
Dim adoConn As New ADODB.Connection
Dim strSQL As String
Dim blnTest As Boolean

If txtArtistSearch.Text = "" Then
lstArtist.Clear
Exit Sub
End If

Set adoConn = OpenConn(GetConnString, blnTest)
If blnTest = False Then
MsgBox "Es ist ein Fehler beim Öffnen der Datenbank aufgetreten. Datenbank defekt oder fehlt!", vbCritical
Exit Sub
End If

strSQL = "select * from tblHSP where artist like '" & txtArtistSearch.Text & "%' order by artist asc"
Set adoRS = FetchRSText(strSQL, adoConn)

If adoRS.EOF = True Then
lstArtist.Clear
Exit Sub
End If

lstArtist.Clear

Do Until adoRS.EOF = True
lstArtist.AddItem adoRS.Fields!artist & " - " & adoRS.Fields!Title
lstArtist.ItemData(lstArtist.NewIndex) = adoRS.Fields!listnum
adoRS.MoveNext
Loop

adoRS.Close
adoConn.Close
Set adoRS = Nothing
Set adoConn = Nothing

End Sub

Wenn Daten in der Listbox sind, dann Arbeit alles andere exakt weiter, wei gesagt habe nur das Prob mit dieser Wildcard, weil ein User gerne
Individuell Suchen möchte....Z.z. wird immer ab: "Eingabe links" aufwärts gesucht....

Gruss und jetzt schon mal Tausend mal Dank
Ralf
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
SQl Abfrage mit Wildcard72TheDestroyer10.12.01 22:06
Re: SQl Abfrage mit Wildcard342ModeratorDieter10.12.01 22:17
Re: SQl Abfrage mit Wildcard35TheDestroyer10.12.01 22:50
Re: SQl Abfrage mit Wildcard394ModeratorDieter10.12.01 23:02
Re: SQl Abfrage mit Wildcard33TheDestroyer10.12.01 23:25
Re: SQl Abfrage mit Wildcard305ModeratorDieter10.12.01 23:30
Re: SQl Abfrage mit Wildcard80TheDestroyer10.12.01 23:38
Re: SQl Abfrage mit Wildcard36TheDestroyer11.12.01 21:58
Re: SQl Abfrage mit Wildcard276ModeratorDieter11.12.01 22:00
Ist doch ganz einfach:361unbekannt11.12.01 22:06
Genau schau mal32dany13.12.01 00:15

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