BANCO DE DADOS

USUARIO.EXCLUIDOS 22/04/2007 11:47:48
#213218
Esse é o meu codigo de conexão

Dim db As Database
Dim rsLista As Recordset
Dim strDBLocal As String


Private Sub Form_Load()

strDBLocal = "ListaVend.mdb"
Set db = OpenDatabase(strDBLocal)
Set rsLista = db.OpenRecordset("VENDEDORES", dbOpenTable)
Call Limpar
End Sub


Quando executo ele dá este erro :::: TYPE MISMATCH
Tópico encerrado , respostas não são mais permitidas