Programmieren - alles kontrollieren 4.941 Themen, 20.708 Beiträge

Hallo,

bei der Ausführung dieser sql query passiert nix
warum eigetlich ? keine fehlermeldung und gar nichts.

danke


---------------------------------------------------------------
Dim objDB As DAO.Database
Dim objRS As DAO.Recordset
Dim strSQL As String

strSQL = "SELECT total.vorname, total.alter FROM total WHERE (((total.vorname)= 'peter'));"

Set objDB = CurrentDb
Set objRS = objDB.OpenRecordset(strSQL, , DAO.dbSQLPassThrough)


Call objRS.Close
Set objRS = Nothing
Set objDB = Nothing
---------------------------------