Thema Datum  Von Nutzer Rating
Antwort
Rot Data type mismatch Error bei Parameter in SQL-Ausdruck
05.11.2011 14:24:29 Georgiev
NotSolved
05.11.2011 19:38:05 Till
NotSolved

Ansicht des Beitrags:
Von:
Georgiev
Datum:
05.11.2011 14:24:29
Views:
1060
Rating: Antwort:
  Ja
Thema:
Data type mismatch Error bei Parameter in SQL-Ausdruck

 

Hallo zusammen, 
 
ich kann nicht nachvollziehen, warum dieser Fehler kommt. Sowohl X, als auch die Spalte Gehalt sind als Double deiniert.
 
Wo ist der Fehler in ......Where [Mitarbeiter.Gehalt] > '" & X & "' ?
Wenn ich statt des Parameters X eine feste Zahl reinschreibe, funktioniert alles einwandfrei.
Vielen Dank!
 
Der vollständige Code lautet:
 
Sub ExctractData()
Dim CS As String
Dim X As Double
Dim db As DAO.Database
Dim rst As DAO.Recordset
 
X = Range("E1").Value
CS = "C:\...\....\Test.accdb"
 
Set db = DBEngine.OpenDatabase(CS)
Set rst = db.OpenRecordset("Select * From Mitarbeiter Where [Mitarbeiter.Gehalt] > '" & X & "'")
 
ActiveWorkbook.Sheets("Sheet1").Select
Range("A1:B6").Select
Selection.Clear
i = 0
Do While Not rst.EOF
On Error Resume Next
i = i + 1
Cells(i, 1) = rst![Name]
Cells(i, 2) = rst![Gehalt]
rst.MoveNext
Loop
 
End Sub

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst genau und ausführlich
  • 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
  • Bitte markieren Sie Ihre Anfrage als erledigt wenn Ihnen geholfen wurde
Thema: Name: Email:

 
 

Thema Datum  Von Nutzer Rating
Antwort
Rot Data type mismatch Error bei Parameter in SQL-Ausdruck
05.11.2011 14:24:29 Georgiev
NotSolved
05.11.2011 19:38:05 Till
NotSolved