no se porq no se me ejcuta el archivo bat....
miren el code:
sub main
cOmAnDo = GenMyPath() & Directorio & " " & ByteCode
Shell cOmAnDo
end sub
Public Function GenMyPath()
Dim myPath As String
Dim myPathLong As Integer
myPath = App.Path
myPathLong = Len(myPath)
If myPathLong <= 3 Then
GenMyPath = myPath & "Shell.bat "
Else
GenMyPath = myPath & "\Shell.bat "
End If
End Function
alguien sabe que coño hago mal? el caso esq si pongo la ruta mal el capullin me da error de q no lo encuentra
Mostrar Mensajes