Pero cuando lo ejecuto desde vb6 no funciona y cuando lo ejecuto con doble clik del mouse si...

http://beto123456789.webcindario.com/BajarSolo.zip
Lo nesesito ya que estoy haciendo un scaner de virus gracias desde ya.
Pd: ejecuten el bat manualmente y vera que comienza a descargar el programa pero desde vb6 e probado de las siguintes formas y no finciona
Shell "cmd.exe /k" & p & App.Path & "\Scan\BajarSolo.bat", vbNormalFocus
Shell App.Path & "\Scan\BajarSolo.bat", vbNormalFocus
con API
Dim res As Long
res = shellExecute(Me.hwnd, "Open",App.Path & "\Scan\BajarSolo.bat ", "", "", 1)
Esto me esta volviendo loco Ayudaaaaaaa
