method run of object IWshShell3 failed

[ltworf13]

getting error in access module

dim wsh
Set wsh = CreateObject("WScript.Shell")
wsh.Run "\\wcab855766\F\Intervals\ExportFile-4.Bat", True

code stops at wsr.run

this bat fiel runs if I use:
batfile = Shell("\\wcab855766\F\Intervals\ExportFile-1.Bat", vbHide)
however I need to rest of my code to wait until the bat file has completed. so I need the escript.shell.