VBA Outlook - Usando o VBA no Outlook - Using Visual Basic for Applications in Outlook - Conectando ao Banco de Dados usando ADO (Connecting to the Database using ADO)

Aqui está um exemplo de como você pode usar o VBA do Outlook para acessar bancos de dados externos.

 Série VBA Outlook: 

  

  

  

O exemplo está comentado para ajudá-lo a entender o que cada parte do código está fazendo:

Conectando ao banco de dados usando ADO

Sub ConnectToDatabase()

    Dim conn As Object

    Set conn = CreateObject("ADODB.Connection")

    conn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\database.accdb;"

    ' Agora você está conectado ao banco de dados

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 Donut Project 

  

 Clique nas capas abaixo e compre também: 

VBA Outlook - Usando o VBA no Outlook - Using Visual Basic for Applications in Outlook - Executando uma Consulta SQL (Executing an SQL Query)

Aqui está um exemplo de como você pode usar o VBA do Outlook para acessar bancos de dados externos.

 Série VBA Outlook: 

  

  

  

O exemplo está comentado para ajudá-lo a entender o que cada parte do código está fazendo:

Executando uma consulta SQL

Sub RunSQLQuery()

    Dim conn As Object

    Set conn = CreateObject("ADODB.Connection")

    conn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\database.accdb;"

    

    Dim rs As Object

    Set rs = conn.Execute("SELECT * FROM Customers")

    ' Agora você tem um conjunto de registros com os resultados da consulta

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 Donut Project 

  

 Clique nas capas abaixo e compre também: 

VBA Outlook - Usando o VBA no Outlook - Using Visual Basic for Applications in Outlook - Lendo Dados do Conjunto de Registros (Reading Recordset Data)

Aqui está um exemplo de como você pode usar o VBA do Outlook para acessar bancos de dados externos.

 Série VBA Outlook: 

  

  

  

O exemplo está comentado para ajudá-lo a entender o que cada parte do código está fazendo:

Lendo dados do conjunto de registros

Sub ReadData()

    Dim conn As Object

    Set conn = CreateObject("ADODB.Connection")

    conn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\database.accdb;"

    

    Dim rs As Object

    Set rs = conn.Execute("SELECT * FROM Customers")

    

    While Not rs.EOF

        Debug.Print rs.Fields("CustomerName").Value

        rs.MoveNext

    Wend

    ' Isso imprimirá o nome de cada cliente no depurador imediato

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 Donut Project 

  

 Clique nas capas abaixo e compre também: