Question : OpenRecordset

I am getting operation Not supported with this code.
Dim rs As Recordset
    Dim Job_Number As Long
    Dim db
 
        Set db = DBEngine(0).OpenDatabase("\\Host\gds\GDS-Clients_be.mdb")
        Set rs = CurrentDb.OpenRecordset("Wo_Create_job")

I only get the error when I split the table to the server

Answer : OpenRecordset

Change your last line of code to read:

Set rs = Db.OpenRecordset("Wo_Create_job")

since you set your variable DB to the database and not the variable CurrentDB.

Also, it would be good if you Dim DB as Database.

Have fun!
Random Solutions  
 
programming4us programming4us