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


    [Resolvido]Navegador Browser não vai para página quando caixa texto recebe valor de outro form

    avatar
    Convidado
    Convidado


    [Resolvido]Navegador Browser não vai para página quando caixa texto recebe valor de outro form Empty Navegador Browser não vai para página quando caixa texto recebe valor de outro form

    Mensagem  Convidado 16/7/2011, 14:38

    Bem amigos.. tentarei explicar a situação.

    Tenho um form com um Browser, no mesmo tem uma caixa texto Acoplada que tem um endereço de página.
    quando abro o mesmo com esse endereço cadastrado na tabela que é origem do form, o navegador normalmente no endereço contido na caixa texto...

    Mas tenho uma situação que esta caixa recebe o valor de outro form, quando é assim o navegador não vai para o endereço contido na caixa texto..


    Este é o código


    Private Sub Form_Load()
    On Error Resume Next
    'Esta linha segue o envio de alerta para coordenadas não cadastradas
    If IsNull(txtUnidade) = True Then
    Dim HTML As String
    Me.WebBrowser9.Visible = True
    HTML = Forms!frmAcionarAlertaGoogle!txtHTML
    Me.txtHTML = Forms!frmAcionarAlertaGoogle!txtHTML
    Me.MapCenterLatitude = Forms!frmAcionarAlertaGoogle!cboLat.Value
    Me.MapCenterLongitude = Forms!frmAcionarAlertaGoogle!cboLong.Value
    Me.txtLA = Forms!frmAcionarAlertaGoogle!cboLa.Value
    Me.txtLO = Forms!frmAcionarAlertaGoogle!cboLO.Value
    Me.txtArea = "COORDENADA NÃO CADASTRADA"
    Me.WebBrowser9.Navigate = HTML
    MsgBox HTML

    Else
    'Esta linha segue o envio de alerta para localidades previamentes cadastradas
    If IsNull(txtHTML) = False Then
    Me.WebBrowser9.Visible = True
    Me.WebBrowser9.Navigate Me.txtHTML
    Call Alerta
    'Esta linha para quando não há localidades ou cooredenadas a serem visualizadas
    Else
    Me.WebBrowser9.Visible = False
    End If
    End If
    End Sub


    Como viram la no código em azul, tentei tambem com uma variável e mesmo assim não funcionou..


    Se puderem me ajudar fico grato
    avatar
    Convidado
    Convidado


    [Resolvido]Navegador Browser não vai para página quando caixa texto recebe valor de outro form Empty Re: [Resolvido]Navegador Browser não vai para página quando caixa texto recebe valor de outro form

    Mensagem  Convidado 16/7/2011, 14:40

    Perdoe-me amigos.. dei uma bobeada agora

    Me.WebBrowser9.Navigate = HTML


    não tem a igualdade


    Obrigado

      Data/hora atual: 28/4/2024, 08:36