EXECUTAR UMA PROGRAMA EXTERNO C/DADOS ADICIONAIS
Pessoal
No VB6 tenho que executar um programa (DOS) de envio de email que leva dados adicionais . Com o comando Shell não dá, nem shellexecute.
a linha de comando é PATH.APP & SMTPSEND.EXE -@ARQUIVO.SMT > MSG.TXT
Qual a melhor rotina para este tipo de execucao?
Obrigado
Julio
No VB6 tenho que executar um programa (DOS) de envio de email que leva dados adicionais . Com o comando Shell não dá, nem shellexecute.
a linha de comando é PATH.APP & SMTPSEND.EXE -@ARQUIVO.SMT > MSG.TXT
Qual a melhor rotina para este tipo de execucao?
Obrigado
Julio
use o shell, mas coloque o CMD com o parametro -E que é para excutar comandos externos com parametros, veja se funciona:
CMD.exe -e PATH.APP & SMTPSEND.EXE -@ARQUIVO.SMT > MSG.TXT
Quyalquer coisa grita ae !!
Abraços !!!
CMD.exe -e PATH.APP & SMTPSEND.EXE -@ARQUIVO.SMT > MSG.TXT
Quyalquer coisa grita ae !!
Abraços !!!
Prezado ESLEY:
Obrigado pela resposta, todavia o comando não funcionou.
Quando coloco:
SHELL( CMD.exe -e PATH.APP & SMTPSEND.EXE -@ARQUIVO.SMT > MSG.TXT) apresenta erro de sintaxe
Se tento colocar entre aspas o conteúdo entre parêntieses
SHELL( [Ô]CMD.exe -e PATH.APP & SMTPSEND.EXE -@ARQUIVO.SMT > MSG.TXT[Ô]) aparentemente parece que o comando vai rodar mas não envia o email. Via DOS (estou usando o Windows XP) o comando é executado normalmente e é enviado.
...
Se possÃvel mande um teste usando o comando por você indicado.
Obrigado.
Julio
Obrigado pela resposta, todavia o comando não funcionou.
Quando coloco:
SHELL( CMD.exe -e PATH.APP & SMTPSEND.EXE -@ARQUIVO.SMT > MSG.TXT) apresenta erro de sintaxe
Se tento colocar entre aspas o conteúdo entre parêntieses
SHELL( [Ô]CMD.exe -e PATH.APP & SMTPSEND.EXE -@ARQUIVO.SMT > MSG.TXT[Ô]) aparentemente parece que o comando vai rodar mas não envia o email. Via DOS (estou usando o Windows XP) o comando é executado normalmente e é enviado.
...
Se possÃvel mande um teste usando o comando por você indicado.
Obrigado.
Julio
só uma observação posso estar errado mas não seria APP.PATH ao invés de PATH.APP
acho que é isso que você quer fazer:
Shell Environ$([Ô]COMSPEC[Ô]) & [Ô] /C notepad c:ela-i.txt[Ô], vbHide
ou assim
Shell Environ$([Ô]COMSPEC[Ô]) & [Ô] /C dir[Ô], vbNormalNoFocus
Shell Environ$([Ô]COMSPEC[Ô]) & [Ô] /C notepad c:ela-i.txt[Ô], vbHide
ou assim
Shell Environ$([Ô]COMSPEC[Ô]) & [Ô] /C dir[Ô], vbNormalNoFocus
Tópico encerrado , respostas não são mais permitidas