Programación General > Visual Basic 6.0 e inferiores

 Ayuda Para Acceso A Base De Datos

(1/1)

laux:
hola, un problemita  .. tengo vb 6.0 y access 2003 y pongo este codigo desde un modulo de clase principal (cpBase  = con 3 funciones abre la bd de tres formas .. dynaset, snapshop.. etc).. y me da error en la definicion de "cpbase as new database"...  sera algo especial q las bases de datos no se definfen asi para access 2003 o q ????

les paso el cod.

Private mbase As Database    :( aqui da error

Private Sub Class_Initialize()
    Set mbase = abrirbase(App.Path & "C:\BalanzaNavios\Navios.mdb")
End Sub

mil gracias...

LAUX

FRIJU:
Public DB As ADODB.Connection

Public Sub Opendb()

    Set DB = New ADODB.Connection
DB.Open ("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=PATH Y NOMBRE DE LA BASE DE DATOS.mdb;Persist Security Info=False")

END SUD

CADA VEZ QUE QUIERAS ACCEDER HACES UNA LLAMADA AL MODULO

CALL Opendb

Navegación

[0] Índice de Mensajes