CONEXAO COM SQL
Pessoal estou com um pequeno probleminha de esquecimento, qual a sintax para esses codigos mesmo
dim conexao as new Connection
dim rs as new Recordset
Private Sub Form_Load()
conexao.provider "Microsoft.Jet.Oledb.4.0"
Conexao.open ............................
rs.open .......................................
pessoal não lembro mesmo como se faz essa conexao se alguem poder ajudar agradeço obrigado, se estiver faltando algo, e poderem ajudar agradeço
vlw galera
dim conexao as new Connection
dim rs as new Recordset
Private Sub Form_Load()
conexao.provider "Microsoft.Jet.Oledb.4.0"
Conexao.open ............................
rs.open .......................................
pessoal não lembro mesmo como se faz essa conexao se alguem poder ajudar agradeço obrigado, se estiver faltando algo, e poderem ajudar agradeço
vlw galera
Faz assim
Sacou?
Dim cnn As New ADODB.Connection
Dim rst As New ADODB.Recordset
Dim sql As String
Dim muda As String
'Abre a conexão
cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c: este.mdb;"
sql = "select * from tabela"
rst.Open sql, cnn, adOpenKeyset, adLockOptimistic, adCmdText
Sacou?
Tópico encerrado , respostas não são mais permitidas