Database.Método Execute em um banco de dados externo.

Vemos sempre nos códigos referência ao método execute:

CurrentDb.Execute" Insert Into SuaTabela (Campo1) Values (""' & SuaInformacao & """)

Os métodos disponíveis são:
> Insert Into
> Update
> Delete


Para utilizar o comando Execute em um banco de dados externo basta referenciar o banco de dados:

Dim StrPath As String
Dim db As Database
'--------------------------------
'Variáveis para o banco de dados
'--------------------------------
'String com path para conexão com a base de dados.
StrPath = "C:\Teste" & Banco.accdb Conecta ao banco de dados local
'----------------------------------------
'Seta a variável abrindo o banco de dados
'----------------------------------------
Set db = OpenDatabase(StrPath)
'--------------------------------
'insere os dados na tabela acesso
'--------------------------------
db.Execute "INSERT INTO Acessos (Usuario,Computador) Values (""" & Usuario & """,""" & GetComputerName & """)"


Comentários
Você pode usar as seguintes constantes [url=HV10073920.htm]RecordsetOptionEnum[/url] para options.
[th]Constante[/th][th]Descrição[/th]

dbDenyWrite	Nega permissões de gravação para outros usuários (apenas espaços de trabalho do Microsoft Access (Espaço de trabalho do Access: um espaço de trabalho que usa o o motor de banco de dados do Access para acessar uma fonte de dados. A fonte de dados pode ser uma arquivo de banco de dados do Access, um banco ODBC, como o Paradox, ou um banco ISAM.)).
dbInconsistent	(Padrão) Executa atualizações inconsistentes (apenas espaços de trabalho do Microsoft Access).
dbConsistent	Executa atualizações consistentes (apenas espaços de trabalho do Microsoft Access).
dbSQLPassThrough	Executa uma consulta passagem SQL. Configurar esta opção passa a instrução SQL para um banco de dados ODBC para processamento (apenas espaços de trabalho do Microsoft Access).
dbFailOnError	Devolve as atualizações se ocorrer um erro (apenas espaços de trabalho do Microsoft Access).
dbSeeChanges	Gera um erro em tempo de execução se outro usuário estiver alterando dados que você estiver editando (apenas espaços de trabalho do Microsoft Access).
dbRunAsync	Executa a consulta de maneira assíncrona (apenas os objetos ODBCDirect Connection e QueryDef).
dbExecDirect	Executa a instrução sem chamar antes a função SQLPrepare ODBC API (apenas os objetos ODBCDirect Connection e QueryDef).

Cumprimentos.