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

    ActiveX InternetBrowser

    Compartilhe

    roberval
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 69
    Registrado : 17/05/2015

    ActiveX InternetBrowser

    Mensagem  roberval em Qui 06 Ago 2015, 15:17

    Bom dia...
    Bom estou usando o activex para navegar pela intranet da empresa sem precisar abrir um navegador.
    Ok, está tudo certo, mas há algum jeito de abrir o site e ja preencher uma caixa de texto que contenha neste site?


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver esta imagem.]

    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8907
    Registrado : 04/11/2009

    Re: ActiveX InternetBrowser

    Mensagem  JPaulo em Qui 06 Ago 2015, 17:58

    Tem sim, veja este meu exemplo;

    [Você precisa estar registrado e conectado para ver este link.]



    .................................................................................
    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

    roberval
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 69
    Registrado : 17/05/2015

    Re: ActiveX InternetBrowser

    Mensagem  roberval em Sex 07 Ago 2015, 13:16

    Vlw JPaulo!
    Era exatamente isso, fiquei até emocionado Smile

    Bem vou aproveitar aqui, e te pergunta uma coisa....
    Peguei esse código a um tempo e acredito que é seu....

    Código:
    'Requer a referencia VBA, Microsoft Scripting Runtime, marcada
    Dim strDiretorio, strPasta, strFicheiros
    strDiretorio = Me.Texto15

    Set fso = CreateObject("Scripting.FileSystemObject")
    Set strPasta = fso.GetFolder(strDiretorio)
    Set strFicheiros = strPasta.Files
    Me.GG.RowSourceType = "Value List"
    For Each File In strFicheiros
    Me.GG.AddItem (File.Name)
    Next

    Bom, ele vai até uma pasta especificada e copia o nome dos arquivos para uma list box... Teria como ele copiar só os que tem a extensão .txt?


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver esta imagem.]

    roberval
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 69
    Registrado : 17/05/2015

    Re: ActiveX InternetBrowser

    Mensagem  roberval em Sex 07 Ago 2015, 13:59

    Outra pergunta, está ja relacionada ao tópico....

    Tem como copiar algumas informações do site, tipo, um html de um hiperlink, ou fazer cópia de um texto?


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver esta imagem.]

      Data/hora atual: Dom 04 Dez 2016, 14:13