Como chamar um procedimento armazenado sql usando vba acesso ms

Chamar um SQL Stored Procedure Usando MS Access VBA

Saber como chamar um procedimento armazenado Microsoft SQL Server a partir do Microsoft Office Access usando o Visual Basic for Applications (VBA) você pode economizar tempo quando você precisa executar o procedimento armazenado. SQL Server é um sistema de gerenciamento de banco de dados relacional usado para grandes bancos de dados. O acesso também é um sistema de gerenciamento de banco de dados relacional, mas comumente usado para bancos de dados menores. VBA é uma linguagem de programação de computador usado para automatizar tarefas de rotina em aplicativos do Microsoft Office, como o Access.

  • Inicie o Microsoft Office Access 2007 e selecione "Banco de dados em branco," então clique "Crio." Clique "Ferramentas de banco de dados" e selecione "Visual básico." Clique no "Inserir" campo e selecione "Módulo."

  • Selecione os "Ferramentas" Menu e clique "Referências..." Marque a caixa ao lado "Microsoft ActiveX Data Objects Biblioteca." Clique "ESTÁ BEM."

  • Digite o seguinte para criar uma nova sub-rotina e declarar variáveis:

    Public Sub createDataToAnalyze ()

    Dim objConnection As New ADODB.Connection

    Dim objCom Como ADODB.Command

    Dim provStr As String

  • Digite o seguinte para definir a conexão com o servidor SQL:

    Definir objCom = Novo ADODB.Command

    objConnection.Provider = "sqloledb"

    provStr = "Fonte de dados = SERVERNAME-" & "Initial Catalog = DATABASE NAME-User ID = USUÁRIO ID-Password = por senha"

    editar o "provStr" corda e inserir suas informações de conexão, como nome do servidor, nome do banco de dados, ID de usuário e senha.



  • Digite o seguinte para definir a sua informação procedimento armazenado:

    objConnection.Open provStr

    com objCom

    .ActiveConnection = objConnection

    .CommandText = "spCreateUserTbl"

    .CommandType = adCmdStoredProc

    .Executar

    End With

    End sub

    Edite a seguinte linha e digite o nome do procedimento armazenado:

    .CommandText = "spCreateUserTbl"

  • pressione "F5" para executar o sub-rotina.

De esta maneira? Compartilhar em redes sociais:

LiveInternet