Hallo zusammen,
ich versuche ein RecordSet zu erstellen, in dem nach 2 Parametern gesucht wird. Dabei handelt es sich um einen String- (SN) und einen Integerwert (P). Einzeln funktioniert dies jedoch als AND-Verknüpfung nicht. Die Fehlermeldung lautet: Typenunverträglichkeit
Kann da mal jemand einen Blick drauf werfen!? Ich finde den Fehler nicht... :-[
Private Sub Form_AfterUpdate()
Dim t_min As Double
Dim SN As String
Dim P As Integer
SN = Me.Sachnummer
P = Me.Punkt
t_min = 99
Dim db As DAO.Database
Set db = CurrentDb
With CurrentDb().OpenRecordset("SELECT Vorgaben_Messwerte_SZV.Sachnummer, Vorgaben_Messwerte_SZV.Punkt, Vorgaben_Messwerte_SZV.T_min2 FROM Vorgaben_Messwerte_SZV WHERE Sachnummer='" & SN & "'" And "Punkt= P")
.Edit
.Fields("t_min2") = t_min
.Update
db.Close
Set db = Nothing
End With
End Sub
Hi,
was passiert mit:
With CurrentDb().OpenRecordset("SELECT Vorgaben_Messwerte_SZV.Sachnummer, Vorgaben_Messwerte_SZV.Punkt, Vorgaben_Messwerte_SZV.T_min2 FROM Vorgaben_Messwerte_SZV WHERE Sachnummer='" & SN & "' And "Punkt= " & me.Punkt)
Harald
Hallo,
beide Variablen sind überflüssig, Du kannst Dich direkt auf die Formularfelder beziehen.
... WHERE Sachnummer='" & Me.Sachnummer & "' And Punkt= " & Me.Punkt)
Vielen Dank, hat funktioniert! Die Variablen habe ich auch wieder entfernt. Das war nur ein Test ob es evtl. so funktioniert. THX!