Forums Neueste Beiträge
 

irgendwas mach ich da falsch... aber was

03/11/2007 - 14:22 von Mirco Wilhelm | Report spam
Moin,

so ganz kann ich das nicht nachvollziehen.

Ich hab ein Formular mit einer ComboBox, bei der ich onChange eine ADODB
Abfrage starte.

Diese soll mir dann alle Ergebnisfelder in das Formular packen (also
ausfüllen).

Nur...

Function getInventoryRecordData(strInventoryNo As String) As String

Dim rst As New ADODB.Recordset
Dim conn As ADODB.Connection

Set conn = CurrentProject.Connection

Set rst.ActiveConnection = conn
rst.LockType = adLockOptimistic
rst.CursorType = adOpenKeyset

rst.Open "SELECT * FROM Load WHERE InventarNr = " & strInventoryNo

Beim Select gehts nicht mehr weiter wegen:

Run-time error '-2147217913 (80040e07)'
Data type mismatch in criteria expression

Ok, hab ich gedacht. Du hast seit Jahren kein Access VBA mehr programmiert,
aber laut meinen alten Dateien hab ich das schon immer so gemacht, und das
ging damals!?

Hab ich was übersehen?

mfg
mirco
 

Lesen sie die antworten

#1 Jörg Ackermann
03/11/2007 - 14:40 | Warnen spam
Hallo,

Mirco Wilhelm meinte:

Data type mismatch in criteria expression



...WHERE InventarNr = '" & strInventoryNo & "'"


Gruß

Ähnliche fragen