vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 NEU! sevCoolbar 3.0 - Professionelle Toolbars im modernen Design!  
 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
.... 
Autor: Levis
Datum: 15.02.02 22:29
Hi LordOfVB!

Das ist der Code:

If strSQL_ <> "" Then 'wenn strSQL_ gefüllt ist
'Suchbegriffe herausfiltern
tmpTeilSQL = Replace(strSQL_, InvokedFromTextbox.Tag & " Like", "")
tmpTeilSQL = Replace(tmpTeilSQL, "OR", "")
tmpTeilSQL = Replace(tmpTeilSQL, "''", "")
tmpTeilSQL = Replace(tmpTeilSQL, " ", "")
'Suchbegriffe teilen
vErg = Split(tmpTeilSQL, "'")
For i = 0 To UBound(vErg)
If vErg(i) <> "" Then
vRet(n) = vErg(i) <-- hier meldet er Fehler '13'
n = n + 1
End If
Next

'ListBox Inhalte zuweisen
Me.lstSuchbegriffe.AddItem vRet
End If

strSQL_ ist sagen wir mal Title Like 'dBase' OR Title Like 'c++'
InvokedFromTextbox.Tag = "Title"
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Wie soll ich das machen?71Levis15.02.02 15:52
Re: Wie soll ich das machen?38Tolwyn15.02.02 16:56
Fehler?54Levis15.02.02 17:42
Hm ... 460unbekannt15.02.02 19:19
hm 33Levis15.02.02 21:40
Re: hm 291unbekannt15.02.02 21:48
hm... hm... 169Levis15.02.02 22:10
Re: hm... hm... 323unbekannt15.02.02 22:17
....34Levis15.02.02 22:29
Re: ....340unbekannt15.02.02 22:38
Oder Deutsch:376unbekannt15.02.02 22:41
???30Levis15.02.02 22:47
Mach's mal so...305ModeratorDieter15.02.02 23:00
Hi Dieter , ha ja ... 434unbekannt15.02.02 23:07
schade, aber....32Levis15.02.02 22:45
Re: schade, aber....309unbekannt15.02.02 23:03
achso, ok150Levis15.02.02 23:10
Erledigt, Schwamm 'drüber (oT)332unbekannt15.02.02 23:14

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