Compartilhar via

Converter o código DAO em ADO

  • Artigo

Aplica-se ao: Access 2013, Office 2013

Observação

As versões da biblioteca DAO anteriores à versão 3.6 não são fornecidas e nem têm suporte no Access.

De DAO para mapa de objeto ADO

DAO

ADO (ADODB)

Observação

DBEngine

Nenhum

Espaço de trabalho

Nenhum

Banco de dados

Conexão

Conjunto de Registros

Conjunto de Registros

Dynaset-Type

Conjunto de chaves

Recupera um conjunto de ponteiros para os registros no conjunto de registros.

Tipo de instantâneo

Estático

Recupera registros completos, mas um conjunto de registros Estáticos não pode ser atualizado.

Table-Type

Conjunto de chaves com opção adCmdTableDirect.

Campo

Campo

Quando mencionado em um conjunto de registros.

DAO

Abrir um Conjunto de Registros

 Dim db as Database
 Dim rs as DAO.Recordset
 Set db = CurrentDB()
 Set rs = db.OpenRecordset("Employees")

Editar um Conjunto de Registros

 rs.Edit 
 rs("TextFieldName") = "NewValue"
 rs.Update

ADO

Abrir um Conjunto de Registros

 Dim rs as New ADODB.Recordset
 rs.Open "Employees", CurrentProject.Connection, _
         adOpenKeySet, adLockOptimistic

Editar um Conjunto de Registros

 rs("TextFieldName") = "NewValue" 
 rs.Update

Observação

O deslocamento do foco do registro atual por meio de MoveNext, MoveLast, MoveFirst, MovePrevious sem usar primeiro o método CancelUpdate executará implicitamente o método Update.

Sobre os colaboradores

Link fornecido pela comunidade UtterAccess. UtterAccess é o fórum principal de wiki e de ajuda do Microsoft Access.