Connecting Lotus DB to Access through OLE

[doulostheou]

I could really use some help. I am trying to write an agent in LotusScript that will move information from the Lotus database into an access database. I know how to use OLE to connect to an access database in VBA, but I can't seem to figure it out in LotusScript even though it is similar. The following code is the closest I have gotten. It opens the database, but I can't seem to access the recordset. I get the following error message: Automation object member not found. Any suggestions would be greatly appreciated!

	Dim AccDB As Variant
	Dim RST As Variant
	
	Set AccDB = CreateObject("Access.Application")
	AccDB.OpenCurrentDatabase ("H:\db1.mdb")
	Set RST = accDB.currentdb.OpenRecordset("Select * from Test;") 'I can't get past this line
	rst.addnew
	RST.fields("Field1") = "This just might work."	
	rst.update
	AccDB.CloseCurrentDatabase
	
	Set RST = Nothing
	Set accdb = Nothing