USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  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
 


CyberWEB Network Ltda.    © Copyright 2000-2018   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página