Compile Error Expected: =

K

Keith

In Access 2000 I get the following error message:

Compile Error
Expected: =

The code I am running is as follows:

Sub efile_cleanup()

Dim tbl As Recordset
Dim db As Database
Dim jobvar As String
Dim lastcriteria As String


Set db = CurrentDb()
Set tbl = db.OpenRecordset("QRY_CLOSED_JOBS", dbOpenDynaset)

tbl.MoveLast
lastcriteria = tbl("JOB_NO")
tbl.MoveFirst

jobvar = tbl("JOB_NO")

Do Until jobvar <> lastcriteria

'Call efile_delete_files(jobvar)
Debug.Print jobvar
tbl.MoveNext
jobvar = tbl("JOB_NO")

Loop

End Sub

Note that I commented out the function call in case that was the source of
the problem. Any help would be greatly appreciated.

Thanks,

Keith
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top