Executing a VBS Script from Access 2000

[Rich75]

Hi could anybody tell me how to fire off a vbs script from access.....

thanks

Rich

 

[jonscott8]

Access uses VBA, use the Shell command.

Jon Hawkins

 

[Rich75]

Hi i have tried Shell

Public sub
dim retval
retval = ("c:\test.vbs&quot

end sub

this gives me an error of

runtime error '5':
invalid procedure call or argument

 

[tsuji]

Hello Rich75,

Should it not be ?

dim retval As Integer
retval=Shell("c:\test.vbs&quot

regards - tsuji

 

[Rich75]

Hi tsuji

Yes sorry typo on my part
that still gives the same error

however i changed the code to call a .bat script
the .bat script then calls the vbs script

i have used as a work around.

if you have any ideas why it will not call the vbs script directly i would appreciate it


thank

Rich

 

[tsuji]

Hello again,

Would an explicit call to wscript or cscript platform do?

retval=Shell("wscript c:\test.vbs&quot

with all the path implicitly set. If yes, it could just be an unsettled association.

- tsuji

 

[PHV]

Have you tried something like this:|code]
retval=Shell("cscript c:\test.vbs&quot|/code]

Hope This Help
PH.

 

[Rich75]

brilliant that done it

thanks alot for all your help

 

[Rich75]

Hi does anybody have a script where you can display the cursor as an hourglass while the script runs ?

thanks

Rich

 

[PHV]

Can you do it in your Access VBA before to run the script minimized ?

Hope This Help
PH.