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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Link para web site
Henrique Ribas
não registrado
ENUNCIADA !
Postada em 17/07/2004 14:22 hs   

Caros Amigos,

 

Alguém saberia me dizer como posso fazer para colocar um link para um web site num formulário da minha aplicação em VB?

 

O link ficaria localizado em um frame onde constariam vários labels com informações da empresa mais o link para o web site.

 

Agradeço desde já.

Abraço a todos.

   
Octopus
ITAQUAQUECETUBA
SP - BRASIL
Postada em 17/07/2004 22:05 hs            
Quando eu preciso colocar link, desse jeito eu faço do meu jeito eu crio o link com um label, tipo deixo ele azul sublinhado e altero a propriedade MousePointer para 99-Custom depois acima onde tem MouseIcon eu coloco aquele cursor que se transforma em mão, entende e para colocar o link você faz o seguinte código
 
dim x as variant
x = shell("Explorer http:\www.vbweb.com.br")
 
e pronto cara  espero ter ajudado inté
     
Elieser Topassi
Pontos: 2843 Pontos: 2843
SÃO JOSÉ DO RIO PRETO
SP - BRASIL
Postada em 18/07/2004 16:09 hs            
Concordo com a solução do Octopus, com uma pequena diferença:
 
uso shellExecute() no lugar de shell(), assim funciona mesmo que o usuario tenha outro navegador como padrão, tipo Netscape ou Opera for Windows.
 
A API para chamar o shellExecute é a seguinte:
 
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
(Isso tudo em uma linha só)
 
A chamada depois fica assim:
 

ShellExecute Me.hwnd, vbNullString,"http:\www.vbweb.com.br", vbNullString, vbNullString, SW_SHOWNORMAL

(Tudo em uma linha)

 

Tenta desse jeito, acho que vale a pena usar a interface do windows (API) para ter certeza de não da pau. O ShellExecute não executa um programa, e sim procura o programa registrado para abrir o arquivo passado no terceiro parametro, assim só não abre se não tiver nenhum navegador instalado no computador...

 

Elieser Carlos Topassi

São José do Rio Preto, SP

     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



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