Thema Datum  Von Nutzer Rating
Antwort
12.09.2005 09:30:24 Mishelle
NotSolved
Blau Aw: vba syntaxfehler
12.09.2005 11:22:50 Rasta
NotSolved
12.09.2005 13:55:05 Mishelle
NotSolved
12.09.2005 15:37:51 Rasta
NotSolved
13.09.2005 09:00:39 Mishelle
NotSolved
13.09.2005 09:17:10 Rasta
NotSolved
13.09.2005 10:44:01 Mishelle
NotSolved
13.09.2005 11:34:06 Rasta
NotSolved
13.09.2005 12:04:44 Mishelle
NotSolved
13.09.2005 12:33:07 Mishelle
NotSolved
13.09.2005 13:23:00 Rasta
NotSolved
13.09.2005 14:40:32 Mishelle
NotSolved
13.09.2005 14:43:19 Rasta
NotSolved
13.09.2005 15:26:01 Mishelle
NotSolved
13.09.2005 15:34:31 Rasta
NotSolved
13.09.2005 15:39:07 Mishelle
NotSolved
13.09.2005 15:59:05 rasta
NotSolved
Blau Blau AW
14.09.2005 07:45:49 Mishelle
NotSolved
13.09.2005 11:32:17 Rasta
NotSolved
13.09.2005 12:02:18 Mishelle
NotSolved

Ansicht des Beitrags:
Von:
Rasta
Datum:
12.09.2005 11:22:50
Views:
1261
Rating: Antwort:
  Ja
Thema:
Aw: vba syntaxfehler
Hallo Mishelle,

vielen dank :-)

du kannst den vba-code auch im einzelschritt durchwandern, um dann immer die werte der einzelnen variablen usw. zu kontrollieren. f5 oder f8 ist das....

ich vermute, der fehler liegt darin begründet, das das recordset nicht geleert wird.

versuch mal mit rs.clear nach dem "do until" zu arbeiten. ich denke, das es dann funktionieren sollte!

lass mich wissen, ob es das war

viel erfolg und viele grüße

rasta

Mishelle schrieb am 12.09.2005 09:30:24:

hallo :) an alle

@rasta herzlichen glückwunsch zur bestandenen prüfung!

hab wieder n kleines problemchen.... :(
bekomme immer die fehlermeldung (in der zeile Set rs = cmd.Execute):
syntaxfehler (fehlender operator) in abfrageausdruck 'user_20040126-02.userid'

mein code:
Private Const Pfad = "C:\Documents And Settings\Test.mdb"

Sub test_1()

Dim conn As New ADODB.Connection
Dim cmd As New ADODB.Command
Dim rs As New ADODB.Recordset
Dim sConnString As String
Dim zeile As Long

conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Pfad & ";Persist Security Info=False"

'conn.Open sConnString
Set cmd.ActiveConnection = conn
zeile = 1
Do Until Cells(zeile, 1) = ""
cmd.CommandText = "SELECT User_20040126-02.UserID FROM User_20040126-02 WHERE User_20040126-02.UserID = " & Cells(zeile, 2)
cmd.CommandType = adCmdText
Set rs = cmd.Execute
Cells(zeile, 3) = rs.Fields("Kost")

zeile = zeile + 1
Loop

Set rs = Nothing
Set cmd = Nothing
conn.Close
Set conn = Nothing

End Sub

welcher operator fehlt denn?

gruß
mishelle

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
12.09.2005 09:30:24 Mishelle
NotSolved
Blau Aw: vba syntaxfehler
12.09.2005 11:22:50 Rasta
NotSolved
12.09.2005 13:55:05 Mishelle
NotSolved
12.09.2005 15:37:51 Rasta
NotSolved
13.09.2005 09:00:39 Mishelle
NotSolved
13.09.2005 09:17:10 Rasta
NotSolved
13.09.2005 10:44:01 Mishelle
NotSolved
13.09.2005 11:34:06 Rasta
NotSolved
13.09.2005 12:04:44 Mishelle
NotSolved
13.09.2005 12:33:07 Mishelle
NotSolved
13.09.2005 13:23:00 Rasta
NotSolved
13.09.2005 14:40:32 Mishelle
NotSolved
13.09.2005 14:43:19 Rasta
NotSolved
13.09.2005 15:26:01 Mishelle
NotSolved
13.09.2005 15:34:31 Rasta
NotSolved
13.09.2005 15:39:07 Mishelle
NotSolved
13.09.2005 15:59:05 rasta
NotSolved
Blau Blau AW
14.09.2005 07:45:49 Mishelle
NotSolved
13.09.2005 11:32:17 Rasta
NotSolved
13.09.2005 12:02:18 Mishelle
NotSolved