ABRIR UM PROGRAMA NA MINHA PASTA

GRANOLA 02/08/2007 13:44:47
#229091
Seguinte o comando shell
seria assim
shell C:\programa.exe

+ eu queria q o programa q eu fiz abrisse outro programa q esteja na pasta q ele esteja
seja qual for as patas

ficaria como ?
shell ......programa.exe

abrir um programa na mesma pasta
LCSD 02/08/2007 13:46:10
#229093
Shell app.path +"\programa.exe"


Ele vai pegar o EXE que estiver na mesma pasta do executável do seu sistema.
USUARIO.EXCLUIDOS 02/08/2007 13:53:06
#229097
O q o LCSD falo ta certo. Mais ao colocar no root (c:\, d:\) vai ficar com dois \\. Então faz o seguinte, adiciona a função:

Function certo(s As String) As String
If Right(s, 1) = "\" Then
certo = s
Else
certo = s & "\"
End If
End Function


'explicação:
'se o ultimo char da str for "\" então esta certo. caso contrario adiciona o "\". ficaria assim:


Shell certo(App.Path) & "programa.exe"

LCSD 02/08/2007 16:01:18
#229149
BOA SASUK... GOSTEI da correção....
Tópico encerrado , respostas não são mais permitidas