|
|
|
|
|
Dicas
|
|
Visual Basic (Miscelâneas)
|
|
|
Título da Dica: Usando o Shell.
|
|
|
|
Postada em 2/9/2004 por vilmarbr
Dim AbrirArquivo as String
AbrirArquivo = Shell("c:windowsotepad.exe") '»»abre o programa notepad. AbrirArquivo = Shell("c:windowscalc.exe") '»»abre o programa calculadora. AbrirArquivo = Shell("start c:winntPescaria.bmp") '»»abre o arquivo Pescaria.bmp com o programa padrão. AbrirArquivo = Shell("start iexplore www.uol.com.br") '»»abre o o programa internet explorer que abre o site do UOL. AbrirArquivo = Shell("start mailto:seu_email@dominio.com.br") '»»abre o programa padrão p/ envio de mensagens de correio eletrônico que abre o site do UOL.
'------------------------------------------------------------------------------------------------------------------------------- 'E por assim vai...escolha o diretório, programa e arquivos que se deseja executar e abrir.
'Criada por: 'Vilmar Brazão de Oliveira '13:17 25/5/2004
|
|
|
|
|