Alguem sabe ou tem um exemplo para conectar um banco back-end pela rede via ADO
usando o Access?
Estou usando o codigo
no formulario ele faz a conexão mas quando uso no suform ele faz a conexao mas
nao vincula os campos mestre e filho do subform, ou seja, nao filtra, como se nao tivesse
alguem sabe usar essa funçao de conexão ADO para subform? parece q tanto no form quanto no subform nao da para alterar
desde ja agradeço
usando o Access?
Estou usando o codigo
- Código:
Private cn1 As New ADODB.Connection
Private rs1 As New ADODB.Recordset
Private Sub Form_Load()
'Seu back-end
MyDatabase= "C:\ADO\base.accdb "
'Instrução SQL que irá carregar os daos
Dim mOrigem
mOrigem = "Select * from usuarios"
'Cria e abre a conexão com o banco de dados
cn1.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & MyDatabase
'carrega o recordeset através da coenxão aberta
rs1.CursorLocation = adUseClient
rs1.Open mOrigem, cn1, adOpenDynamic, adLockOptimistic
'vincula a conexão aberta ao formulário desejado
Set Forms("subform").Recordset = rs1
'Fecha a conexão
rs1.closed
cn1.closet
Set rs1 = Nothing
Set cn1 = Nothing
End Sub
no formulario ele faz a conexão mas quando uso no suform ele faz a conexao mas
nao vincula os campos mestre e filho do subform, ou seja, nao filtra, como se nao tivesse
alguem sabe usar essa funçao de conexão ADO para subform? parece q tanto no form quanto no subform nao da para alterar
desde ja agradeço