Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Wanet Telecoms Ltd on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

automation

Status
Not open for further replies.

tjm77

Programmer
Oct 2, 2000
15
US
I am trying to automate a process that runs through the windows at command. It opens up access97 program that in returns trys to open another application that connects to our mainframe and extracts data. When I click and run it, it works. But when the at command calls it I get the following error : The specified module cannot be found

I don't understand this since it works fine through a user. the code is as followed:


stAppName = GetSetting("CSC", "Defaults", "ProgramFilePath", "")
stSessionName = GetSetting("CSC", "Defaults", "SessionFilePath", "")

Call Shell(stAppName & " " & stSessionName, 1)

startTime = Time
Do While DateAdd("s", 8, startTime) > Time
DoEvents
Loop

Dim myscreen As Object
Dim Sess As Object
Dim Sys As Object
'(fails here)
Set Sys = CreateObject("EXTRA.System")
Set Sess = Sys.ActiveSession
Set myscreen = Sess.Screen
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top