Joined: 20 Aug 2012
I am writing a VB Script macro in an Excel to connect and get data from IBM Personal Communication Emulator.
As of now i'm able to establish connection between Excel and PCOMM, however unable to receive and send text strings from/to excel. Below is the piece of code I have tried -
Dim PSObj As Object
Dim autECLConnList As Object
Dim PSText As String
Set autECLConnList = CreateObject("PCOMM.autECLConnList")
Set PSObj = CreateObject("PCOMM.autECLPS")
X = PSObj.StartCommunication()
PSText = PSObj.GetText(1, 1, 80)
MsgBox "PsText -" & PSText
Please suggest the issue with the above code.