ERLEDIGT
NEIN
NEIN
ANTWORTEN
4
4
ZUGRIFFE
897
897
EMPFEHLEN
-
Hallo ich hab folgenes Problem und zwar möchte ich mit diesem sql befehl
herrausfinden ob dies schon in der Datei steht, müssteja eigentlich möglich sein, jedoch wirft er mir den FehlrCode :1
If Exists("SELECT * FROM BXT03PF WHERE SYPGM = 'Marius'") Then..
"Typen unverträglich" aus, wieso ? Ist der SQL Befehl falsch ?
Bitte um hilfe!
-
MS Access? Oder ein Zugriff auf Oracle? Oder auf MySQL?
Exists? hm... Wirklich VB6? Ich kenn den Befehl so nicht.---------------------------------------------------------------------------------------------------
item: Ich habe es mir aus gesundheitlichen Gründen abgewöhnt unformatierten Code zu lesen (Auch SQL-Statements kann man formatieren!)
item: Tutorial: [PHP][MySQL] Debug Queries
item: Schreibt mir keine PN mit Fragen die im Forum beantwortet werden können - ich mache kein persönliches coaching
item: Bitte zur besseren Lesbarkeit PHP-Code in [PHP]...[/PHP], SQL in [SQL]...[/SQL], Visual Basic in [VB]...[/VB] etc. schreiben
-
01.03.10 14:34 #3
- Registriert seit
- Sep 2004
- Ort
- Möglingen (BaWü)
- Beiträge
- 3.109
Ich bin zu lange aus VB raus um das noch aus dem Kopf zu schreiben. Aber du kannst nicht mit IF eine SQL Anweisung ausführen bzw. deren Ergebnis prüfen.
Müsste irgendwie so aussehen:
Code :1 2 3 4 5 6 7 8
Dim db as Database Dim rs as Recordset Set db = Opendatabase("xyz") Set rs = "SELECT * FROM BXT03PF WHERE SYPGM = 'Marius'" If (rs.count <> 0) Then end ifSollte ein Tipp von mir geholfen haben, habe ich nichts gegen eine entsprechende Bewertung oder ein Danke und wenn ein Problem gelöst ist, dann den Beitrag bitte auch als erledigt markieren.
Was ich gar nicht leiden kann sind User die es nicht für nötig halten auf Antworten zu reagieren, die Themen nicht als erledigt markieren und/oder die sich nicht für Hilfe bedanken.
-
Hm wenn ih das mache
Code :1 2 3 4 5 6 7 8 9
rs.Open "Select * from nauerz.bxt03pf where SYPGM = 'Marius3'" If rs.fields.count > 0 Then MsgBox "Vorhanden" Exit Sub Else cn.Execute "INSERT INTO " & Form1.txtBib.Text & " (" & txttable & ") VALUES ('" & txtoutput & "')" End If rs.Close End If
Dann gibt er mir an das rs.fields.count 19 ergibt -.- wieso ?
-
01.03.10 15:55 #5
- Registriert seit
- Sep 2004
- Ort
- Möglingen (BaWü)
- Beiträge
- 3.109
Fields.Count bedeutet doch auch das er die Anzahl der Felder in der Tabelle zählt !!
Bei dir müsste rs.RecordCount den gewünschten Erfolg bringen.Sollte ein Tipp von mir geholfen haben, habe ich nichts gegen eine entsprechende Bewertung oder ein Danke und wenn ein Problem gelöst ist, dann den Beitrag bitte auch als erledigt markieren.
Was ich gar nicht leiden kann sind User die es nicht für nötig halten auf Antworten zu reagieren, die Themen nicht als erledigt markieren und/oder die sich nicht für Hilfe bedanken.
Ähnliche Themen
-
Per Button Abfrage starten aber wie ?
Von Roumeo im Forum Office-AnwendungenAntworten: 4Letzter Beitrag: 20.03.08, 19:57 -
If-Abfrage geht nur im IE aber nicht im FF
Von cofter im Forum Javascript & AjaxAntworten: 0Letzter Beitrag: 22.11.07, 09:58 -
[MySql] Exists in Where-Klause - komplexe Abfrage
Von Subwoover im Forum Relationale DatenbanksystemeAntworten: 9Letzter Beitrag: 16.10.06, 14:31 -
abfrage aus DB, aber komisch
Von Zero2000 im Forum Relationale DatenbanksystemeAntworten: 4Letzter Beitrag: 15.09.06, 08:40 -
[Oracle] Abfrage mit "NOT EXISTS"
Von elmyth_ im Forum Relationale DatenbanksystemeAntworten: 1Letzter Beitrag: 21.06.06, 17:28





Zitieren


Login





