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 derfloh 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
Joined
Oct 2, 2000
Messages
15
Location
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