Hello.. the following code runs a batch file.. it works but it prompts to "RUN" the file.. Is there a way to bypass the "RUN" prompt?

Sub Batch_Test()

Dim retval As Long
Dim strCommand As String
Dim wsh As WshShell
Set wsh = New WshShell

Application.DisplayAlerts = False

strCommand = Chr(34) & "W:\Project Mgmt Records\00-PMO Requests\test.bat" & Chr(34)

retval = wsh.Run(strCommand, WindowStyle:=1, WaitOnReturn:=False)

If retval <> 0 Then
 Problem = 1
End If

End Sub