MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    Vinculo à fonte de dados externa SQL server

    Compartilhe

    Sáh53
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 14
    Registrado : 23/10/2017

    Vinculo à fonte de dados externa SQL server

    Mensagem  Sáh53 em 13/12/2017, 18:09

    Olá, pessoal!

    Estou fazendo um banco de dados para registrar os testes de qualidade que fazemos aqui no meu setor.
    Nesse BD tem uma tabela com as informações dos produtos da empresa que eu uso para registrar os testes, contudo essas informações podem ser alteradas a qualquer momento. Pensei, então, em utilizar um vínculo ao servidor SQL.

    Para fazer essa importação o Access me dá duas opções:
    1. Importar os dados de origem para uma nova tabela do banco de dados atual, em que o software cria uma nova tabela com as informações da tabela que eu escolhi do servidor SQL;
    2. Vincular à fonte de dados criando uma tabela vinculada, em que o access cria uma tabela como se fosse um espelho da tabela de origem.

    Certo?


    Para mim, a melhor opção é a conexão por vínculo, pois preciso das informações atualizadas.
    A minha dúvida é: se eu alterar alguma informação na tabela vinculada dentro do meu BD eu altero as informações do banco de dados as empresa? :O
    Preciso da tabela vinculada, mas não posso alterar, incluir ou excluir os dados no banco de dados da empresa.
    Imagina o problema que eu causaria se isso acontecesse?

    Existe alguma forma de fazer esse vínculo dessa forma?

    Acho que preciso de um curso de Access para entender melhor esses detalhes. rsrs ^^

    Abs.
    avatar
    José Machado
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 93
    Registrado : 13/09/2016

    Re: Vinculo à fonte de dados externa SQL server

    Mensagem  José Machado em 13/12/2017, 18:20

    Olá amigo...

    Melhor você fazer o acesso via ADODB com uma classe de acesso, sendo assim os dados...
    Estou começando a Criar um Blog sobre Access VBA, tudo Orientado a Objetos...

    Link:
    vbaaccessoo.blogspot.com.br

    Att
    José Machado

    Sáh53
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 14
    Registrado : 23/10/2017

    Re: Vinculo à fonte de dados externa SQL server

    Mensagem  Sáh53 em 14/12/2017, 14:58

    Obrigada, José Machado!


    Mas não entendi muito bem como funciona.

    Você poderia explicar melhor?


    Abs.
    avatar
    José Machado
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 93
    Registrado : 13/09/2016

    Re: Vinculo à fonte de dados externa SQL server

    Mensagem  José Machado em 14/12/2017, 15:06

    Sáh53


    Você criar um Módulo de Classe Genérica para acesso ao servidor. Ex:

    Dim connection As New ADODB.connection

    Public result_set As ADODB.Recordset

    Public data_reader As ADODB.Recordset
    'Método para abrir a conexao
    Public Sub Abrir_Conexao()

    Dim connection_string As String

    connection_string = "" 'Essa é string de acesso ao servidor de dados

    Set Connection = New ADODB.Connection
    Connection.CursorLocation = adUseClient
    Connection.Open url_data_base
    End Sub
    'Método para fechar a conexao
    Public Sub Fechar_Conexao()
    Connection.Close
    Set Connection = Nothing
    End Sub
    'Método para executar os comandos CRUD
    Public Sub Executar_Query(query As String)
    Set result_set = New ADODB.Recordset
    Abrir_Conexao
    result_set.Open query, Connection, adOpenStatic
    Set result_set = Nothing
    Fechar_Conexao
    End Sub
    'Método para executar o Select
    Public Sub Executar_Data_Reader(query As String)
    Set data_reader = New ADODB.Recordset
    data_reader.Open query, Connection, adOpenStatic
    End Sub
    'Método para fechar o Select
    Public Sub Fechar_Data_Reader()
    data_reader.Close
    Set data_reader = Nothing
    Fechar_Conexao
    End Sub

    Depois vc instancia o objeto desta classe nos formulários, módulos de classe, módulos, relatórios, etc, sem precisar vincular nada.

    Post um exemplo do que voce tem, para ficar mais fácil ajudar...

    Att
    José

    Sáh53
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 14
    Registrado : 23/10/2017

    Re: Vinculo à fonte de dados externa SQL server

    Mensagem  Sáh53 em 19/12/2017, 18:32

    Agradeço a ajuda José Machado.

    Não tem como fazer isso sem usar código de VBA?
    Gostaria de fazer com os recursos do Access.

    No meu trabalho, poucas pessoas possuem conhecimento em programação e eu gostaria de preparar algo que funcione no longo prazo.

    Beijão.

      Data/hora atual: 17/8/2018, 14:50