Assigning text from outside source to Access form text box

I am trying to scrap text from a Personal Communication(IBM PCOMM) screen and
assign the text to a text box on an Access form. The data will not be stored
in any table. I am using the following code that generats a Syntax error:

[PCOMM SCRIPT HEADER]
LANGUAGE=VBSCRIPT
DESCRIPTION=
[PCOMM SCRIPT SOURCE]
autECLSession.SetConnectionByName(ThisSessionName)

REM This line calls the macro subroutine
subSub1_

sub subSub1_()
dim AcApp, Acmdb

set AcApp = CreateObject("Access.Application")
Acapp.opencurrentdatabase "Z:\mortgage.mdb"
AcApp.visible = true
with autECLSession.autECLPS
Acapp.Forms!FormName!TxtPolicy = .GetText(2, 3, 30)

End With

Any help would be greatly appreciated.