Autor Tema: Ayuda Para Acceso A Base De Datos (Leído 1124 veces)

laux · « **en:** Martes 19 de Abril de 2005, 04:37 »

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

SoloCodigo

Autor Tema: Ayuda Para Acceso A Base De Datos (Leído 1124 veces)

laux

Ayuda Para Acceso A Base De Datos

FRIJU

Re: Ayuda Para Acceso A Base De Datos