Eu creio q seja a mesma coisa pra maioria dos BDs...

Sendo:

Dim ConexaoOracle as ADODB.Connection

 

inserir novo

 

ConexaoOracle.Execute "INSERT INTO (Id,Nome) VALUES (1,'Joao')"

 

Consultar

 

Set RS = ConexaoOracle.Execute ("SELECT campo1, campo2 FROM Tabela WHERE campo1 = 'AB%')

 

ou

 

RS.ActiveConnection = ConexaoOracle

RS.Open "SELECT campo1, campo2 FROM Tabela WHERE campo1 = 'AB%'"

 

Alterar

 

ConexaoOracle.Execute "UPDATE Tabela SET campo2 = 'Joao' WHERE Id = 1"

 

Excluir

 

ConexaoOracle.Execute "DELETE FROM Tabela WHERE Id = 1"

 

t+

String de conexão, usando ODBC:

 

 ObtemStrConexao = "Provider=MSDAORA.1;" & _
                             "Data Source=PSTS_DES;" & _
                             "User Id=login;" & _
                             "Password=senha;Persist Security Info=true"

 

PSTS_DES é um DSN.

O cliente do oracle deve estar instalado no micro.