Como conectar una base de datos en access 2000 en visual basic 6

necesito conectar una base de datos en access 2000 en vb 6, esta es mi programacion:

cree un modulo y puse esto:

Public v_datos As ADODB.Connection
Public v_tabla_datos_socios As ADODB.Recordset
Public v_tabla_cancelacion_membresia As ADODB.Recordset


Sub ABRIR()

Set v_datos = New ADODB.Connection
v_datos.CursorLocation = adUseClient
v_datos.ConnectionString = "C:\sindi\base de datos\datos.mdb"
v_datos.Provider = "Microsoft.Jet.oledb.4.0"
v_datos.CommandTimeout = 2000
v_datos.Open
End Sub

al programar el boton guardar me sale que no encuentra la tabla, cual puede ser el problema, esto no me permite avanzar.

asi programe el boton guardar

Private Sub guardar_Click()
SQL = "Insert Into v_tabla_datos_socios( licencia, nombres, apellidos, dia_ingreso, mes_ingreso, año_ingreso, domicilio, telefono_casa, telefono_celular, beneficiario) values (" & Val(txt_lic) & ", '" & (txt_nom) & "', '" & (txt_ape) & "', '" & (cob_dia) & "', '" & (cob_mes) & "', " & Val(txt_año) & ", '" & (txt_dom) & "', " & Val(txt_tcasa) & ", " & Val(txt_cel) & ", '" & (txt_ben) & "')"
v_datos.Execute SQL
SQL = "INSERT INTO v_tabla_cancelacion_membrecia ( tm_licencia, tm_nombres, tm_apellidos) values (" & Val(txt_lic) & ", '" & (txt_nom) & "', '" & (txt_ape) & "')"
v_datos.Execute SQL
MsgBox ("Los datos han sido guardados")
End Sub

Añade tu respuesta

Haz clic para o