run time error 3085. undefined function 'dmax' in expression

[karweng]

Hi all,

while trying execute this program from VB6 code, I got the above error message. Any idea how I can work around the error code or work around my coding?

Dim rs_oriTable As Recordset
Dim rs_table As Recordset
Dim sql_ori As String
Set db = DBEngine.Workspaces .OpenDatabase(App.Path & "/incoming.mdb", False, False, ";pwd=happy")

sql_ori = "Select * from lasttrans"

Set rs_oriTable = db.OpenRecordset(sql_ori)

 

[strongm]

The error message suggests that you a trying to use a built-in Access function in your SQL statement (which you can't do when opening an mdb from VB). Which is odd, since there is no dmax in your illustrated code.