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:
Usando parâmetros em consultas SQL
Sub UseParameters()
Dim conn As Object
Set conn = CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\database.accdb;"
Dim cmd As Object
Set cmd = CreateObject("ADODB.Command")
cmd.ActiveConnection = conn
cmd.CommandText = "SELECT * FROM Customers WHERE CustomerID = ?"
cmd.Parameters.Append cmd.CreateParameter("CustomerID", 200, 1, , 1)
Dim rs As Object
Set rs = cmd.Execute
' Agora você tem um conjunto de registros com os resultados da consulta
End Sub
Série de Livros nut Project
Série DONUT PROJECT 2015
Clique aqui e nos contate via What's App para avaliarmos seus projetos
Nenhum comentário:
Postar um comentário