Ik krijg bij deze Query een foutmelding:
Too few Parameters, expected 2
Query:
'zoek het aantal uitval
Dim Rs As DAO.Recordset
Dim SQL As String
SQL = "SELECT Fouten.Eindmoment " & _
"FROM (Foutteksten INNER JOIN Foutoorzaak ON Foutteksten.[Fouttekst- id] = Foutoorzaak.[Fouttekst-no]) INNER JOIN Fouten
ON Foutoorzaak.[Foutoorzaak-id] = Fouten.[Foutoorzaak-no] " & _
"WHERE (((Fouten.Eindmoment)>=[Forms]![Hoofd]!SubMenu]!
[Beginmoment] And (Fouten.Eindmoment)<=[Forms]![Hoofd]![SubMenu]!
[Eindmoment]) AND ((Foutteksten.Fouttekstcode)='110'));"
Set Rs = CurrentDb().OpenRecordset(SQL, dbOpenDynaset)
Kan iemand hulp bieden, het schijnt volgens Access.Web dat het aan de benaming van de fields op de forms ligt. Die tip heb ik toegepast volgens dat voorbeeld maar dan krijg ik een object required foutmelding, dus terug naar af
Too few Parameters, expected 2
Query:
'zoek het aantal uitval
Dim Rs As DAO.Recordset
Dim SQL As String
SQL = "SELECT Fouten.Eindmoment " & _
"FROM (Foutteksten INNER JOIN Foutoorzaak ON Foutteksten.[Fouttekst- id] = Foutoorzaak.[Fouttekst-no]) INNER JOIN Fouten
ON Foutoorzaak.[Foutoorzaak-id] = Fouten.[Foutoorzaak-no] " & _
"WHERE (((Fouten.Eindmoment)>=[Forms]![Hoofd]!SubMenu]!
[Beginmoment] And (Fouten.Eindmoment)<=[Forms]![Hoofd]![SubMenu]!
[Eindmoment]) AND ((Foutteksten.Fouttekstcode)='110'));"
Set Rs = CurrentDb().OpenRecordset(SQL, dbOpenDynaset)
Kan iemand hulp bieden, het schijnt volgens Access.Web dat het aan de benaming van de fields op de forms ligt. Die tip heb ik toegepast volgens dat voorbeeld maar dan krijg ik een object required foutmelding, dus terug naar af