S
SelfTaught1
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.
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.