MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    abrir uma pagina no web brauwser com codigo html.

    avatar
    nilto
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1
    Registrado : 11/12/2015

    abrir uma pagina no web brauwser com codigo html. Empty abrir uma pagina no web brauwser com codigo html.

    Mensagem  nilto 16/7/2018, 16:26

    Olá Amigos

    Sou novato em código em programação.

    Gostaria de um código para abrir um site no web brauwser com a seguinte tag (  ''a href="http://www.google.com" target="_self">Link
    Se alguém poder me ajudar agradeço.

    Nilto - Teresina - Piuai

    Whats: 86 98872-2147

    Obrigado pela atenção.
    avatar
    delsonk
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 203
    Registrado : 26/11/2013

    abrir uma pagina no web brauwser com codigo html. Empty Re: abrir uma pagina no web brauwser com codigo html.

    Mensagem  delsonk 16/7/2018, 17:10

    Boa tarde!
    Para testar este exemplo, crie um formulário e adicione um botão de comando denominado Command0. Cole o código a seguir em um módulo de formulário e alterne para o modo de formulário:

    Private Sub Form_Load()
       Dim ctl As CommandButton

       Set ctl = Me!Command0
       With ctl
           .Visible = False
           .HyperlinkAddress = "http://www.google.com/"
           .Hyperlink.Follow
       End With
    End Sub

    Fonte: https://msdn.microsoft.com/pt-br/vba/access-vba/articles/hyperlink-follow-method-access

      Data/hora atual: 21/11/2024, 20:27