MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    Inserir Usuario e Senha do Autenticador do Proxy

    Compartilhe

    zackzb
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 27
    Registrado : 24/10/2011

    Inserir Usuario e Senha do Autenticador do Proxy

    Mensagem  zackzb em Qui 17 Abr 2014, 20:40

    Alguém consegue ajudar?

    O caso:
    Preciso acessar uma página pelo objeto Internet Explorer e realizar a autenticação do proxy por SO (usuario e senha da rede). Porem não encontro a propriedade no objeto que realiza tal inclusão.

    Segue codigo:

    Código:

    Function fabreUrl()
        Dim ie As New InternetExplorer
      ' Set ie = CreateObject("Internetexplorer.application")
        Dim htm_ As New HTMLDocument

            ie.Visible = False
        Dim urlStr As String
            urlStr = "http://pagina.html"
            ie.navigate urlStr
            Do While ie.readyState <> READYSTATE_COMPLETE
                Debug.Print "Waiting..."
            Loop
           
            Set htm_ = ie.Document
           
            Debug.Print htm_.body.innerHTML
     
            userStr = "usuario"
            userPwdStr = "senha"
        fDelay ie
            htm_.getElementById("Control_Login1_Login1_UserName").Value = userStr
            htm_.getElementById("Control_Login1_Login1_Password").Value = userPwdStr
            htm_.getElementById("Control_Login1_Login1_LoginButton").Click
           
        fDelay ie
            htm_.getElementById("97").Click
        fDelay ie
            htm_.getElementById("ContentPlaceHolder1_Control_Data1_DataInicial").Value = "01/03/2014"
            htm_.getElementById("ContentPlaceHolder1_Control_Data1_DataFinal").Value = "17/04/2014"
            htm_.getElementById("ContentPlaceHolder1_btBuscar").Click
           
            Do While ie.readyState <> READYSTATE_COMPLETE
                Debug.Print "Waiting..."
            Loop
        fDelay ie
         
           
           
           
           


    '
    End Function

    Grato de antemão.

    Dilson
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1602
    Registrado : 11/11/2009

    Re: Inserir Usuario e Senha do Autenticador do Proxy

    Mensagem  Dilson em Seg 07 Jul 2014, 15:07

    Olá zackzb,


    Você conseguiu solução para esse caso ?


    Se conseguiu nos diga como. Eu tive olhando e suspeito que deva se tratar de uma api do windows, pelo que resta agora investigar qual.


    .................................................................................
    Atenção:
    => Antes de implementar qualquer dica, faça um backup do seu projeto;
    => Retorne para marcar o Resolvido ou continuar a discussão;
    => Sempre realize pesquisas antes de postar uma pergunta;

    zackzb
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 27
    Registrado : 24/10/2011

    Re: Inserir Usuario e Senha do Autenticador do Proxy

    Mensagem  zackzb em Seg 07 Jul 2014, 15:37

    Bom dia Dilson,

    Este projeto foi parado exatamente por esta dificuldade. Pesquisei sobre o assunto mas nada encontrei...

    Agradeço o comprometimento.

      Data/hora atual: Sab 03 Dez 2016, 15:35