Skip Navigation Links
Novas Tecnologias
Ferramentas Adicionais
Ferramentas Adicionais


Dica No :
141
Assunto : Visual Basic
Titulo: Abrir uma URL no navegador padrão

Gostou do texto ? Vote e dê sua opinião! Pontuação atual :

Translate this page now :






Adicione aos Favoritos!
BlogBlogs Rec6 Linkk Ueba Technorati Delicious DiggIt! StumbleUpon



Para abrir uma URL no navegador padrão podemos utilizar a API ShellExecute. Esta API executa uma instrução no sistema operacional, mas ao contrário da instrução shell do Vb, ela pode interpretar a URL e abri-la no browser padrão.

Primeiramente precisamos declarar a API. Veja :

Private Declare Function ShellExecute Lib "shell32.dll" _
Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long

Em seguida chamamos a API a partir de um click de um botão :


Private Sub command1_Click()
Dim iret As Long
iret = ShellExecute(Me.hwnd, vbNullString, "http://www.bufaloinfo.com.br", vbNullString, "c:\", SW_SHOWNORMAL)

End Sub


Nome :
E-mail:
Comentarios :
 
 
Os Últimos Comentários
data: 1/31/2017 11:02:00 PM
nome: KzQEnWfDKmGCuOmor
email: derby451@hotmail.com
comentário:
VRRWev http://www.y7YwKx7Pm6OnyJvolbcwrWdoEnRF29pb.com

data: 1/31/2017 12:22:00 PM
nome: GaidgjgRvcGaVLznbiM
email: derby451@hotmail.com
comentário:
VQf6DD http://www.y7YwKx7Pm6OnyJvolbcwrWdoEnRF29pb.com

data: 1/29/2017 10:02:00 PM
nome: NaoqMIlvxffbsWSyW
email: derby451@hotmail.com
comentário:
6q3qBy http://www.y7YwKx7Pm6OnyJvolbcwrWdoEnRF29pb.com

data: 1/29/2017 9:00:00 PM
nome: iGHKtcCnkPMhCrRjV
email: jogcbfn@hotmail.com
comentário:
1q9nH9 http://www.y7YwKx7Pm6OnyJvolbcwrWdoEnRF29pb.com

data: 1/29/2017 10:00:00 AM
nome: CUpBCecqciqCDFnfzL
email: derby451@hotmail.com
comentário:
BOlR2h http://www.y7YwKx7Pm6OnyJvolbcwrWdoEnRF29pb.com

 1  
Dicas
Dica do Dia
Receba Dicas Por Email
E-mail :  
 


 (help)
Aceito receber informativos do devASPNet, informações de eventos e treinamentos

Veja Quais Informativos Você Receberá

Pesquisar Dicas
Pesquisar Artigos, Dicas e Noticias

Banco de Dados
Algumas Entrevistas
Links Importantes

Búfalo Informática, Treinamento e Consultoria
R. Alvaro Alvim, 37/920 Centro - Cinelândia - Rio de Janeiro Cep: 20031-010
Tel : (21) 2262-1368 (21) 9240-5134 E-mail : Contato@bufaloinfo.com.br