VBA Access - Capturando Resultados de uma Stored Procedure - Execute Stored Procedure in Sybase with VBA Access in Sybase

#VBA #VBAAccess #Access #StoredProcedure #Sybase

Executar uma SP - Stored Procedure - no Sybase é uma necessidade que pode aparecer eventualmente no nosso dia-a-dia de desenvolvedor.

 Sybase's PROCs 

VBA Access - Execute Stored Procedure with VBA in Sybase

VBA Excel - Execute Stored Procedure with VBA in Sybase

Cria uma Stored Procedure

Execute uma Stored Procedure com Parâmetro

Atualizar Dados Usando uma Stored Procedure

Deletar Registros com uma Stored Procedure

Transações Usando Stored Procedure

Recuperar Múltiplos Resultados 

Exemplo Básico de Execução de Stored Procedure

Executando Stored Procedure com Parâmetros de Entrada

Capturando Resultados de uma Stored Procedure

Executando Stored Procedure com Parâmetros de Saída

Executando Stored Procedure e Capturando Erros

Sub ExecutarStoredProcedureComRetorno()

    Dim conn As Object

    Dim cmd As Object

    Dim connString As String

    Dim rs As Object

    ' Defina sua string de conexão

    connString = "Provider=Sybase.ASEOLEDB;Data Source=SeuServidor;Initial Catalog=SeuBanco;User ID=seuUsuario;Password=suaSenha"

    ' Cria a conexão com o banco de dados

    Set conn = CreateObject("ADODB.Connection")

    conn.Open connString

    ' Cria o objeto de comando para executar a stored procedure

    Set cmd = CreateObject("ADODB.Command")

    cmd.ActiveConnection = conn

    cmd.CommandType = 4 ' 4 = Stored Procedure

    cmd.CommandText = "SuaStoredProcedureComRetorno"

    ' Executa e obtém o recordset de retorno

    Set rs = cmd.Execute

    ' Processa o recordset (exemplo: exibindo os dados)

    Do While Not rs.EOF

        Debug.Print rs.Fields(0).Value ' Exemplo: mostrando a primeira coluna do resultado

        rs.MoveNext

    Loop

    ' Fecha a conexão e o recordset

    rs.Close

    conn.Close

    Set rs = Nothing

    Set cmd = Nothing

    Set conn = Nothing

End Sub

 Clique aqui e nos contate via What's App para avaliarmos seus projetos 

Envie seus comentários e sugestões e compartilhe este artigo!

brazilsalesforceeffectiveness@gmail.com

 Série de Livros nut Project 

  

 PUDIM PROJECT