Morning all,
I have used VBA sucessfully to talk from EXCEL to EXTRA, but am now trying to use a web site to talk to EXTRA. I need to convert the EXCEL VBA script I have to VBscript, I think unless someone has a better idea. I only know Classic ASP not ASP.NET. I cannot get past the connection to the system object. It returns an error when i try to create the session and screen objects. This is the EXCEL VBA code to make the connection......
Set system = CreateObject("EXTRA.System") ' Gets the system object
Set sessions = system.sessions
Dim Sess0 As Object
SessName0$ = "CSS.EDP"
Set Sess0 = system.ActiveSession
If Not Sess0.Visible Then Sess0.Visible = True
Set Screen = system.ActiveSession.Screen
Do
rowText$ = Sess0.Screen.Getstring(1, 35, 4)
If rowText$ <> "MAIN" Then
MsgBox "Please put CSS on MAIN MENU Screen, and try again"
GoTo exithere
Else
Exit Do
End If
Loop
When I put it inside the <%.......%> tags it fails on the second line e=when trying to set the session, so I think I need to re-write what I got on VBA to VBScript.
Any help?
Victor
I have used VBA sucessfully to talk from EXCEL to EXTRA, but am now trying to use a web site to talk to EXTRA. I need to convert the EXCEL VBA script I have to VBscript, I think unless someone has a better idea. I only know Classic ASP not ASP.NET. I cannot get past the connection to the system object. It returns an error when i try to create the session and screen objects. This is the EXCEL VBA code to make the connection......
Set system = CreateObject("EXTRA.System") ' Gets the system object
Set sessions = system.sessions
Dim Sess0 As Object
SessName0$ = "CSS.EDP"
Set Sess0 = system.ActiveSession
If Not Sess0.Visible Then Sess0.Visible = True
Set Screen = system.ActiveSession.Screen
Do
rowText$ = Sess0.Screen.Getstring(1, 35, 4)
If rowText$ <> "MAIN" Then
MsgBox "Please put CSS on MAIN MENU Screen, and try again"
GoTo exithere
Else
Exit Do
End If
Loop
When I put it inside the <%.......%> tags it fails on the second line e=when trying to set the session, so I think I need to re-write what I got on VBA to VBScript.
Any help?
Victor