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


3 participantes

    [Resolvido]Acessar link pelo access

    avatar
    Flavirosk
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1
    Registrado : 25/04/2011

    [Resolvido]Acessar link pelo access Empty [Resolvido]Acessar link pelo access

    Mensagem  Flavirosk 8/7/2015, 23:22

    Antes de mais nada, muito obrigado a todos...

    So me apresentando rapidinho... sou apenas um usuário que está aos poucos desenvolvendo um sistema no Access para me auxiliar no meu trabalho do dia-a-dia... não manjo de programação VBA..... mais estou conseguindo fazer bastante coisas interessantíssimas.... e desenvolvendo meu sistema que está ficando até fantástico para meu conhecimento.

    acredito que minha duvida já foi postada por alguém, mais não sei bem como expressar ela ou mesmo tentar buscar... Até gostaria que vcs me dessem um vocábulo para essa pergunta hehehhehe
    Fiz um banco de dados todo segmentado, que busca outras referencias em varias tabelas... interna... nela tenho formulários, relatórios e assim vai...

    Duvida é::: como colocar um link de internet e nesse link inclua o registro ou outra informação de uma tabela??? (difícil a compreensão dessa pergunta né???!!!?)

    Traduzindo a pergunta

    Vamos dizer que eu queria criar uma rotina única para acessar um link de internet, so que se eu estiver em um registro, o numero desse registro teria que completar o link
    Tipo assim:::: http://api.convenios.gov.br/siconv/v1/consulta/propostas.html?id_proponente=18316174000123

    Sendo que esse seria o link fixo:
    http://api.convenios.gov.br/siconv/v1/consulta/propostas.html?id_proponente=

    e os números ao final, seriam o CNPJ que deveria completar o link..
    18316174000123

    Novamente, me desculpem, é que já quebrei bastante a cabeça....
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7919
    Registrado : 15/03/2013

    [Resolvido]Acessar link pelo access Empty Re: [Resolvido]Acessar link pelo access

    Mensagem  Alvaro Teixeira 12/7/2015, 11:59

    Olá Flavirosk, bem-vindo ao fórum.

    Tente assim:

    Dim strURL As String
    strURL = "http://api.convenios.gov.br/siconv/v1/consulta/propostas.html?id_proponente=" & CampoDaTabela
    Application.FollowHyperlink strURL, , True


    Deve alterar o CampoDaTabela pelo seu que tem a origem do registo para ver.

    Abraço
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7919
    Registrado : 15/03/2013

    [Resolvido]Acessar link pelo access Empty Re: [Resolvido]Acessar link pelo access

    Mensagem  Alvaro Teixeira 13/10/2015, 08:37

    Olá, como ficou a situação?
    Os utilizadores do fórum merecem e agradecem o retorno.
    Abraço
    avatar
    tiaoaeiou
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 27/09/2017

    [Resolvido]Acessar link pelo access Empty Re: [Resolvido]Acessar link pelo access

    Mensagem  tiaoaeiou 5/12/2017, 18:12

    Fiz um parecido. Porém está dando erro:

    Código:
    Dim strURL As String
    strURL = "http://www.facebook.com.br/" & [b]id[/b]
    Application.FollowHyperlink strURL, , True

    id é o CampodaTabela

    Quero cadastrar o ID do facebook por pessoa, para quando eu clicar no botão, ele abra o site facebook.com.br/id
    Abrindo o facebook.com.br/ acompanhado do ID que eu cadastrar. Está dando Erro em tempo de execução '8':
    Não é possivel transferir as informações solicitadas.
    na linha Application.FollowHyperlink strURL, , True

    Alguem poderia me ajudar?
    avatar
    tiaoaeiou
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 16
    Registrado : 27/09/2017

    [Resolvido]Acessar link pelo access Empty Re: [Resolvido]Acessar link pelo access

    Mensagem  tiaoaeiou 6/12/2017, 10:28

    Agradeço a todos! Felizmente, consegui fazer.

    Código:
    Private Sub btnFacebook_Click()
    Dim wshshell As Object
    Dim strUrl As String
    Set wshshell = CreateObject("WScript.Shell")
    strUrl = "http://www.facebook.com.br/" & [id]
    wshshell.Run strUrl
    End Sub


    Problema resolvido. Deixarei o código acima a título de pesquisa

    eduardo.mcp gosta desta mensagem

    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7919
    Registrado : 15/03/2013

    [Resolvido]Acessar link pelo access Empty Re: [Resolvido]Acessar link pelo access

    Mensagem  Alvaro Teixeira 6/12/2017, 11:03

    Olá Tião, obrigado pelo retorno.
    O fórum agradece.

    Apesar do colega Flávirosk não ter dado retorno (lamentável), vou dar o tópico como resolvido.

    Abraço

    Conteúdo patrocinado


    [Resolvido]Acessar link pelo access Empty Re: [Resolvido]Acessar link pelo access

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 26/4/2024, 22:20