Privacidad: Recuerde que la información escrita en los foros de programación es 100% pública y que su ip será registrada asociada a su mensaje. Si encuentra un mensaje fuera de lugar, por favor, notifiquelo para su revisión y eliminación.
Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por Agueda el día 17 de junio de 2003
Hola a todos,
Tengo un problema y es que acabo de empezar con Visual Basic y Acces 2000 y necesito conectar mi aplicacion de Visual Basic con dicha base de datos, pero cada vez que pongo un data en mi aplicación y en DataBaseName escribo el nombre de la base de datos y luego en RecordSource intento buscar una tabla de mi BBDD me da un error que pone \"No se reconoce el formato de la base de datos\", ¿por qué puede ser?.
La base de datos no está conectada, para conectarla con la aplicación simplemente pongo un data, ¿hay alguna otra forma?.
Muchas gracias por todo, y espero por favor que me contesteis porque me urge.
Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por angeles el día 17 de junio de 2003
Utiliza ADO. El control de datos asociado es Adodc, para utilizarlo debes incluir el componente "Microsoft ADO Data Control". Otra forma es al crear un proyecto nuevo en vez de seleccionar la opción "EXE Estándar" seleccionar "Proyecto de Datos".
Con ADO las lista y los combos para enlazar son DataCombo, Datalisr, es decir todo lo que empiece por la palabra data.
Suerte
Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por AGUEDA el día 17 de junio de 2003
Muchas gracias, pero me sigue dando el mismo problema, el componente Ado ya lo tengo incluido pero nada de nada. Lo que me he dado cuenta es que si la base de datos en vez de estar hecha en Access 2000 está en Access 97 funciona sin problemas.
Re: Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por angeles el día 17 de junio de 2003
Vete a Proyecto ==> Refenrecias y selecciona:
Microsoft ActiveX Data Objects 2.algo Library
Probablemente sea 2.5 o 2.6.
Con esto ya tira Access 2000.
Si no en la conexxion selecciona Micorsoft Jet 4.0
Re: Re: Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por Agueda el día 17 de junio de 2003
Muchas gracias de nuevo,
Eso lo tengo y parece que funciona porque en el DataEnviroment hago una prueba de conexión y me sale satisfactoria, pero lo que me pasa es que en un formulario pongo un DATA y le doy el nombre de la base de datos y no me deja seleccionar la tabla de la BBDD que quiero utilizar.
Re: Re: Re: Re: Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por Agueda el día 17 de junio de 2003
Ahora estoy perdida del todo, entonces como tengo que conectar mi base de datos??, que tengo que hacer??, yo lo que hacía era un Data y ahí le ponía el nombre de la base de datos y con las demás propiedades hacía las consultas, modificaciones..., pero si ahora no puedo, como lo hago??
Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por Axel el día 12 de mayo de 2008
Hola necesito conectar una base de datos de acces en visual basic 6.0 quieroencontrar la manera mas sencilla con tu codigo es mas facil me podrias mandar este e indicarme paso a paso la coneccion necesito hace un search a la base de datos un insert , deleter update ayudame please tengo que hacer un proyecto de eso
Re: Re: Re: Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por aldyr el día 17 de octubre de 2003
bueno, el problema que tiene al trabajar con bases de datos access, ya sea 2000 o 97, es en que proveedor utilizar, por ejemplo data maneja el microsoftjet 3.5 cuando utilizas bases de datos 2000 necesitas utilizar el microsoftjet 4.0, de todas formas es aconsejable que utilices una conexion ADO, y no con el obtejo sino con la programacion ADO, para esto necesitas poner un Modulo con el siguiente codigo:
Public base as New Connection
Sub Main()
base.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\PREDIOS\PREDIOS.mdb;Persist Security Info=False;JET OLEDB:DATABASE PASSWORD=PREDIOS"
fonvis.Open
End Sub
y listo, si necesitas conectar una base de datos 97 solo cambias el proveedor a 3.51 y listo
Re: Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por Robert el día 29 de julio de 2004
deja el data y sus propiedades solo indicandole que el recurso es access y cuando lo vayas a usar usa el sgte codigo
data1.databasename=("Tu Base")
data1.connect=";PWD=TUPassword"
data1.recordsource("REgistro")
data1.refresh
Re: Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por MALDOSO el día 9 de mayo de 2006
lo que quiza te este causando problemas es que, primero debes de convertir tu base de datos de version y lo puedes hacer en accces en la barra de menu en herramientas y conversion de base de datos, solo le das converti a version 98 y listo, espero que te sirva ...
Re: Re: Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por TONY el día 27 de mayo de 2006
\'librerías hablilitadas
Microsoft Activex Data Objets 2.1 Library , y
Microsoft ADO EXt. 2.1 for DDl and Security
\'Ojo olvídate de los Adocd, CointrolData, Data remote, y solucionado el problema...
Es por la versión de Db, seguro que usas una versión de conexion antigua...te doy un ejemplo
para conectarme a data base Ole 4.0 hago lo siguiente
**********************************************************************
\'esto en un módulo bas
Public Con as ADODB.Conexion
Public Rec as ADODB.Recordset
Private Function Conexion(ByVal NomDB as String, _ ByVal SQLDB as String)
ON Error Goto ErrordeConex
\'Establecemos
Public Con= New ADODB.Conexion
Public Rec = New ADODB.Recordset
With con
.open \"Provider=Microsoft.Jet.OleDB.4.0; Data _
source=\" & trim(NomDB)
end with
\' y para el recorset
With Rec
.open SQLDB,Con, 1,2
end with
ErrordeConex:
if Err.Number then
Msgobox\"No se estableció una conexión\"
exit function
end if
End Function
\' ****************************************************************
\'esto ecn cualquier lugar de tu un boton form
\' si quieres agregar los datos en una lista llamas a al funcion
Conexion \"tu data base\",\"Tu sql\"
y tu lista
Do while not Rec .EOF
List.Additem \"\" & Rec!NOmbreCampo
\'obs: \"\" &: es para omitir espacios en blanco de tu MDB
.MoveNext
Loop
Nota: si quieres conectarte con una versión de Acces anterior:
\"Provider=Microsoft.Jet.OleDB.3.51; Data _
source=\" & trim(NomDB)
Re: Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por Tony el día 27 de mayo de 2006
'librerías hablilitadas
Microsoft Activex Data Objets 2.1 Library , y
Microsoft ADO EXt. 2.1 for DDl and Security
'Ojo olvídate de los Adocd, CointrolData, Data remote, y solucionado el problema...
Es por la versión de Db, seguro que usas una versión de conexion antigua...te doy un ejemplo
para conectarme a data base Ole 4.0 hago lo siguiente
**********************************************************************
'esto en un módulo bas
Public Con as ADODB.Conexion
Public Rec as ADODB.Recordset
Private Function Conexion(ByVal NomDB as String, _ ByVal SQLDB as String)
ON Error Goto ErrordeConex
'Establecemos
Public Con= New ADODB.Conexion
Public Rec = New ADODB.Recordset
With con
.open "Provider=Microsoft.Jet.OleDB.4.0; Data _
source=" & trim(NomDB)
end with
' y para el recorset
With Rec
.open SQLDB,Con, 1,2
end with
ErrordeConex:
if Err.Number then
Msgobox"No se estableció una conexión"
exit function
end if
End Function
' ****************************************************************
'esto ecn cualquier lugar de tu un boton form
' si quieres agregar los datos en una lista llamas a al funcion
Conexion "tu data base","Tu sql"
y tu lista
Do while not Rec .EOF
List.Additem "" & Rec!NOmbreCampo
'obs: "" &: es para omitir espacios en blanco de tu MDB
.MoveNext
Loop
Nota: si quieres conectarte con una versión de Acces anterior:
"Provider=Microsoft.Jet.OleDB.3.51; Data _
source=" & trim(NomDB)
Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por el tony el día 27 de mayo de 2006
Es por la versión de Db, seguro que usas una versión de conexion antigua...te doy un ejemplo
para conectarme a data base Ole 4.0 hago lo siguiente
'OJo: Habilita en referencias Microsoft Activex Data Objets 2.1 Library , y Microsoft ADO Ext. 2.1 for DDl and SEcurity
**********************************************************************
'esto en un módulo bas
Public Con as ADODB.Conexion
Public Rec as ADODB.Recordset
Private Function Conexion(ByVal NomDB as String, _ ByVal SQLDB as String)
ON Error Goto ErrordeConex
'Establecemos
Public Con= New ADODB.Conexion
Public Rec = New ADODB.Recordset
With con
.open "Provider=Microsoft.Jet.OleDB.4.0; Data _
source=" & trim(NomDB)
end with
' y para el recorset
With Rec
.open SQLDB,Con, 1,2
end with
ErrordeConex:
if Err.Number then
Msgobox"No se estableció una conexión"
exit function
end if
End Function
' ****************************************************************
'esto ecn cualquier lugar de tu un boton form
' si quieres agregar los datos en una lista llamas a al funcion
Conexion "tu data base","Tu sql"
y tu lista
Do while not Rec .EOF
Combo.Additem "" & Rec!NOmbreCampo
'obs: "" &: es para omitir espacios en blanco de tu MDB
.MoveNext
Loop
Nota: si quieres conectarte con una versión de Acces anterior:
"Provider=Microsoft.Jet.OleDB.3.51; Data _
source=" & trim(NomDB)
eso es todo adios........................ tony,...olvidate de los controles activex, Utiliza las librerías..los vidrios
Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por raquel el día 18 de junio de 2003
a mi me paso lo mismo una vez. Para conectarte a access 2000 puedes utilizar tanto ado como el componente data. A mi me daba problemas por tratarse de access 2000 (con 97 sí me funcionaba, prueva tu código con access 97 y seguramente te funcionará), debes bajarte de internet (de la web de microsoft) el service pack 5.
Entonces, por ej. con el data, pones:
data.DatabaseName = App.Path & \"\\ejemplo.mdb\"
data.RecordSource = \"tablax\"
y pon en su propiedad connect access 2000.
Para verificar si funciona agrega al formulario un dbgrid y ponle en su propiedad datasource el nombre del control data. Si funciona, al ejecutarlo se debería mostrar la tabla seleccionada en el dbgrid.
Con ado se haría diferente, utilizando otras variables (en realidad, aún estoy investigando...), pero si prefieres utilizar esta librería ya te pasaré lo que tenga.
Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por grey el día 19 de junio de 2003
Agueda yo tenia el mismo problema todas mis bd estaban echas en access97 y no podia enlazar porque instale office2000 y lo solucione haciendo las bd en access2000 y luego en herramientas/utilidades de bases de datos/combertir bases de datos/a una version anterior y no me complico la vida
si quieres mas explicaciones me mandas un correo
Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por Jose Peñarrieta el día 13 de septiembre de 2003
Gracias , yo tb tenia el mismo problema, las dos soluciones (la del service pack, y la de las herramientas de acces) me funcionaron perfectamente pero creo que la mejor solucion es la del service pakc porque al convertir una base de datos de acces2000 a acces97 se pierden algunas opciones exclusivas del acces2000 pero si no las usas es mejor ir a herramientas ya que el service pack es muy pesado
Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por luis abarca el día 19 de octubre de 2003
si cambia el tipo de coneccion, o estas utilizando data, utiliza el adocd, que es mas eficiente, lo unico es que este componente no permite el uso de el Seek.
cambia la coneccion y verifica la ubicacion de la base de datos
bendiciones
desde costa rica
Enviado por Vladimir Araque el día 4 de febrero de 2004
He visto tantas locuras escritas que decidi no responder la pregunra original. Me molesta enormemente que digan esa cantidad de sandeces investiguen un poquito y veran lo facil que es la coneccion con acces 2000 u otra ODBC usen el cerebro gracias...
mira vladimir todos decimos lo que los podria ayudar no estamos diciendo que sabemos todo.... tal vez tu seas un experto pero yo no y sinceramente uno lo hace con motivo de ayudar no para que nos ofendas bye..
Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por fernando_diaz25 el día 10 de febrero de 2004
Hola soy de mexico yo tambien tengo el problema que comentas ya tiene algo de tiempo que no uso visual studio pero ahora voy a empezar un nuevo proyecto voy a intentar utilizar access 2000 voy hacer los metodos que te dieron en tus respuestas y te aviso si funciona de la misma manera espero que tu me digas si te funcionaron vi dos opciones una por medio de menus y otra por medio de programacion aunque ahi tuve una duda con un comando que se encuntra antes del endsub. pero en fin te mando saludos y estamos en contacto. gracias
Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por Edgar el día 27 de marzo de 2004
tienes que abrir u modulo. Luego ecribes lo siguiente en el general de claracion del modulo
Public CN As New ADODB.Connection
___________________________________
Public Function conectar()
On Error GoTo showerror
CN.Open "Provider = Microsoft.Jet.OLEDB.4.0; Data Source=" + App.Path + "\nombre de base de datos.mdb"
conectar = True
Exit Function
showerror:
conectar = False
--------------------------------
Hasta aquí el código que haría falta. Ahora unas aclaraciones.
Provider=Microsoft.Jet.OLEDB.4.0 :
esto es para conectar a una base de datos de ACCESS 2000
Provider=Microsoft.Jet.OLEDB.3.51
esto es para conectar a una base de datos CREADA en ACCESS 97, independientemente de que en tu sistema tengas instalado el windows 2000
Para que todo esto funcione, además se debe agregar la referencia (Proyectos->Referencias) de Microsoft ActiveX Data Objects 2.x Library
Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por Arturo el día 26 de agosto de 2004
Mira lo que necesitas es bajarte de internet el parche vs6sp5, en la página de Microfot lo encuentras tarda aproximadamente una hora en bajarse, eso depende de la rapidez de tu internet, y con eso solucionas problema, vas a poder conectar tu base de datos
Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por Miguel Angel Zavala Vizcaya el día 10 de septiembre de 2004
Que tal a todos...
Yo tuve el mismo problema y lo resolvi usando cnn2.Provider = "Microsoft.Jet.OLEDB.4.0"
cnn2.Open "C:\Samples\northwind.mdb", "admin", ""
Aca entre nos.. un cuate me menciono que pusiera 4.0,, (antes tenia 3.5) ... pero ... el razonamiento o le porque no me lo dijo...
Los proveedores en que paquetería vienen ???,, es decir... estoy haciendo mi trabajo en un win2000 pero al hacer un instalador o paquete,,, se necesita una libreria, a parte del microsoft activex data object 2.5,,,???
Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por Ironfx el día 15 de septiembre de 2004
Yo tenia el mismo problema y no quise convertir la bd lo que hice fue bajar el service pack 8 que contiene el jet 4 de la pagina de microsoft, lo instale. y despues lo que hice fue insertar un datacontrol y en la propiedad "Connect" elegir Access 2000 y listo es todo lo que necsitas para acceder a tu bd sin convertir a version anterior
Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por davidvalo el día 15 de septiembre de 2004
Hola Ironfx, veo que has resuelto el mismo problema que tengo yo, es decir, conectar visual basic 6.0 con access 2000. He leído la forma en que lo has resuelto y he hecho exactamente lo mismo pero algo he debido hacer mal porque no he conseguido resolver el problema. Me he bajado el pack 8 para xp, lo he instalado y cuando he ido a conectar el data control con access 2000, en la propiedad connect, nada ha cambiado, no me pone access 2000 como creo q a tí sí te pone, sólamente pone access, lo selecciono y me sigue saliendo el problema de siempre, que no reconoce el formato de la bbdd... ¿qué he hecho mal? ¿cómo puedo solucionarlo?. Espero tu respuesta. Gracias.
Re: Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por Ironfx el día 15 de septiembre de 2004
david se me paso un detalle que tambien es importante.
Hace falta un servicepack para visualbasic 6 que puedes bajar de la pagina de visual basic el problema es que esta un poco grande el archivo son como 28 mb.
es el servicepack numero 6 para visual basic
Suerte
Re: Re: Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por davidvalo el día 16 de septiembre de 2004
Hola otra vez Ironfx, como me has dicho me he bajado el service pack 6 y lo he instalado pero sigo con el mismo problema. Lo he instalado en la carpeta del visual studio, quizá ese haya sido mi error, en qué otra carpeta dentro del visual studio hay q instalarlo?y si ése no es el problema, cuál es?. Gracias.
Re: Re: Re: Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por Ironfx el día 16 de septiembre de 2004
ya solo ejecuta el archivo extraido llamado SETUPSP6 y posteriormente tendras la opcion access 2000 en la propiedad conect.
No importa el lugar donde extraigas los archivos
Re: Re: Re: Re: Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por davidvalo el día 16 de septiembre de 2004
Siento ser pesado Ironfx, he ejecutado el setupsp6 como me has dicho pero da error: "because setup did not detect a Visual Studio 6.0 product that matches the language setting of your operating system, it cannot automatically update your visual studio product...", comprobé que el pack no diese problemas con xp, he desinstalado visual y vuelto a instalarlo pero me sigue saliendo el mismo problema, qué puede pasar?.
También he intentado la otra solución que en este foro se comenta, la de utilizar el control adodc, este control sí q me conecta con access 2000 pero el problema ahora aparece cuando quiero que los registros de access aparezcan en un textox, ya que al ir a seleccionar el registro en "data field" de las propiedades del textbox,me aparece el error: "error de sintaxis en la cláusula FROM", ¿?. Gracias.
Re: Re: Re: Re: Re: Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por invitado el día 16 de septiembre de 2004
si trabajas con access2000 y el data tienes que convertir la bbdd a una version anterior, cuando tengas diseñada la bbdd en herramienta-- utilidades de bbdd--conversion de bbdd--version anterior
Necesito que alguien me ayude. Estoy haciendo una simple pantalla con dos texbox, uno de login y otro de password. Mi intención es realizar una conexión del Visual Basic 6.0 con Acces 2000 utilizando el ADODC. Ya coloque este control en el formulario, le especifique la ruta de la base de datos, genere el connectString, especifique los correspondientes DataSource, Data Field, Recordsource, etc. Es decir, la pude establecer la conexión. Mi problema es que no he podido realizar el codigo correspondiente para que esto funcione, de manera que el usuario meta su login y password, la aplicación verifique esto en la base de datos para despues continuar con los otros procesos. Si alguien me puede mandar un ejemplo de codigo, y me explique que debo hacer, se lo agredeceré . Saludos.
Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por Rafa el día 24 de noviembre de 2004
Hay varias formas de conexión a una BD. mediante codigo fuente puro (es mas dificil), mediante un Data Control (ADO) o bien mediante un DataEnvironment. Lo que tienes que hacer y posiblemente te pase esto: Tu tienes la versión 2000 de Office o la XP o 2003 seguramente y tengas la versión 6 de Visual Basic. Si lo haces por alguno de los metodos anteriores, te dará error. Te indico como hacerlo:
1. Añade el componente Microsoft ADO Data Control 6.0.
2. agrega el cotnrol al formulario y con el boton derecho clic y en propiedades le das a GENERAR para buscar la base de datos con la que quieras conectar. Selecciona MICROSOFT JET PROVIDER 4.0 Library porque si elijes la 3.51 no te reconoce las versiones de 2000 en adelante de Access. Una vez conectada con la base de datos, dale a PROBAR CONEXIÓN y te tiene que decir que ha sido satisfactoria. ACEPTA
3. Dale ahora a la pestaña que pone algo asi como ACCESO A DATOS y seleccionas TABLA y el nombre de la tabla y ACEPTA.
4. Por ultimo a cada control textbox, etc... asigna primero en DATARESOURCE (datos fuente) el nombre del control ADO y en DATAFIELD(dato del campo) elijes el campo o tupla con el que quieres enlazar un control determinado.
Creo que no se me olvida nada, no obstante, si tienes dudas o no te va si quieres me envias un email a rafaconpu@hotmail.com y te lo detallo mejor. Un saludo.
Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por manuel el día 10 de diciembre de 2004
amigo no se que fecha sea en que solicitaste la respuesta, pero por ahora estoy en lo mismo yo he logrado conectar la aplicacion a la base de datos acces, pero no puedo recuperar en un listbox la informacion de la base dedatos, cualquier cosa ayudame si te es posible.
Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por jose el día 30 de diciembre de 2004
tienes que trasformar la base de datos de acces a una vercion anterior para que puedas conectarla
tienes que ir a erramientas en acces2000. luego tienes para abir la base de datos nueva tienes que abrir en modo exclusivo
Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por C lo mas el día 12 de agosto de 2005
eso pasa por trabajar con esa mentira tan grande que es visual que asco de lenguaje, cambiensen a otro como la gente y se olvidan de las boludeces de librerias que version que aquello guakala lo odio a visual basic
Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por chritian el día 25 de marzo de 2006
mira no se mucho de visual basic pero si se que bisual basic no reconoce todos los tipos de archivos aunque sean de acces se que primero lo tienes que con vertir en archivo de acces 97 esa opcion esta en acces creo que esta en la de herramientas lo conbiertes y despues bisual basic lo econoce fasilmente.
rudo
Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por Bob el día 12 de abril de 2006
Hola
al problema de" No se reconoce el formato de la base de datos\"
Yo lo unico que hago es que a la hora de guardar mi base de datos en Acces 200o utilizo Tools-Database utilites y despues convert database to prior database version y con eso me funciona.
Otra cosa alguien me podria decir que tipo de objeto me podria ayudar a accesar a una base da datos en internet (de tipo acces) y como mostrarla, porque apenas comienso en VB y no entiendo muy bien lo del Mysql.
Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por TONY el día 27 de mayo de 2006
\'librerías hablilitadas
Microsoft Activex Data Objets 2.1 Library , y
Microsoft ADO EXt. 2.1 for DDl and Security
\'Ojo olvídate de los Adocd, CointrolData, Data remote, y solucionado el problema...
Es por la versión de Db, seguro que usas una versión de conexion antigua...te doy un ejemplo
para conectarme a data base Ole 4.0 hago lo siguiente
**********************************************************************
\'esto en un módulo bas
Public Con as ADODB.Conexion
Public Rec as ADODB.Recordset
Private Function Conexion(ByVal NomDB as String, _ ByVal SQLDB as String)
ON Error Goto ErrordeConex
\'Establecemos
sET Con= New ADODB.Conexion
SET Rec = New ADODB.Recordset
With con
.open \"Provider=Microsoft.Jet.OleDB.4.0; Data _
source=\" & trim(NomDB)
end with
\' y para el recorset
With Rec
.open SQLDB,Con, 1,2
end with
ErrordeConex:
if Err.Number then
Msgobox\"No se estableció una conexión\"
exit function
end if
End Function
\' ****************************************************************
\'esto ecn cualquier lugar de tu un boton form
\' si quieres agregar los datos en una lista llamas a al funcion
Conexion \"tu data base\",\"Tu sql\"
y tu lista
Do while not Rec .EOF
List.Additem \"\" & Rec!NOmbreCampo
\'obs: \"\" &: es para omitir espacios en blanco de tu MDB
.MoveNext
Loop
Nota: si quieres conectarte con una versión de Acces anterior:
\"Provider=Microsoft.Jet.OleDB.3.51; Data _
source=\" & trim(NomDB)
Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por clau el día 2 de mayo de 2006
primero da ctrl +t y escoje microsoft data despues da sig y asi sucesivamente, despues abre la ventana de propiedades en tu form y da true a la conexion..... espero que sepas como
Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por jmc el día 4 de mayo de 2006
Hola!! Tengo unas BBDD implementadas en Foxpro y quisiera saber como puedo conectarlas con una aplicacion de Visul Basic. Soy nuevo en esto se nota no? Gracias
Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por RAFA el día 27 de mayo de 2006
\'librerías hablilitadas
Microsoft Activex Data Objets 2.1 Library , y
Microsoft ADO EXt. 2.1 for DDl and Security
\'Ojo olvídate de los Adocd, CointrolData, Data remote, y solucionado el problema...
Es por la versión de Db, seguro que usas una versión de conexion antigua...te doy un ejemplo
para conectarme a data base Ole 4.0 hago lo siguiente
**********************************************************************
\'esto en un módulo bas
Public Con as ADODB.Conexion
Public Rec as ADODB.Recordset
Private Function Conexion(ByVal NomDB as String, _ ByVal SQLDB as String)
ON Error Goto ErrordeConex
\'Establecemos
sET Con= New ADODB.Conexion
SET Rec = New ADODB.Recordset
With con
.open \"Provider=Microsoft.Jet.OleDB.4.0; Data _
source=\" & trim(NomDB)
end with
\' y para el recorset
With Rec
.open SQLDB,Con, 1,2
end with
ErrordeConex:
if Err.Number then
Msgobox\"No se estableció una conexión\"
exit function
end if
End Function
\' ****************************************************************
\'esto ecn cualquier lugar de tu un boton form
\' si quieres agregar los datos en una lista llamas a al funcion
Conexion \"tu data base\",\"Tu sql\"
y tu lista
Do while not Rec .EOF
List.Additem \"\" & Rec!NOmbreCampo
\'obs: \"\" &: es para omitir espacios en blanco de tu MDB
.MoveNext
Loop
Nota: si quieres conectarte con una versión de Acces anterior:
\"Provider=Microsoft.Jet.OleDB.3.51; Data _
source=\" & trim(NomDB)
Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por El tony el día 27 de mayo de 2006
Es por la versión de Db, seguro que usas una versión de conexion antigua...te doy un ejemplo
para conectarme a data base Ole 4.0 hago lo siguiente
**********************************************************************
\'esto en un módulo bas
Public Con as ADODB.Conexion
Public Rec as ADODB.Recordset
Private Function Conexion(ByVal NomDB as String, _ ByVal SQLDB as String)
ON Error Goto ErrordeConex
\'Establecemos
Public Con= New ADODB.Conexion
Public Rec = New ADODB.Recordset
With con
.open \"Provider=Microsoft.Jet.OleDB.4.0; Data _
source=\" & trim(NomDB)
end with
\' y para el recorset
With Rec
.open SQLDB,Con, 1,2
end with
ErrordeConex:
if Err.Number then
Msgobox\"No se estableció una conexión\"
exit function
end if
End Function
\' ****************************************************************
\'esto ecn cualquier lugar de tu un boton form
\' si quieres agregar los datos en una lista llamas a al funcion
Conexion \"tu data base\",\"Tu sql\"
y tu lista
Do while not Rec .EOF
List.Additem \"\" & Rec!NOmbreCampo
\'obs: \"\" &: es para omitir espacios en blanco de tu MDB
.MoveNext
Loop
Nota: si quieres conectarte con una versión de Acces anterior:
\"Provider=Microsoft.Jet.OleDB.3.51; Data _
source=\" & trim(NomDB)
Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por jORGE el día 4 de junio de 2006
Oye, si trabajas con visual basic 6.0 y Acces 2000 debes tener el Service Pack 6.0 para que visual reconosca el formato de la base de datos.
El Service Pack 6 pesa 27 Mb y te lo podes bajar de internet!
Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por Skazi el día 5 de junio de 2006
A mi me interesa saber como abro la base de datos de Access 2000 desde visual basic, pero en modo exclusivo, asi como para cambiarle la contraseña.
Espero respuestas
Re: Re: Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por AndruColon el día 10 de junio de 2006
Hola! Tengo un problema q no puedo solucionarlo.. Hice un sistema de facturacion en Visual 6.0 con Acces 2000, uso ADO... El sistema digamos es multiusuario, la base está en el servidor, pero dos por tres me salta este error en el ejecutable y me cierra el programa... El error que me tira es : \"El usuario \'Admin\' de la maquina \'NombrePC\' ha situado la base de datos en un estado que impide que sea abierta o bloqueda\"... Se le da aceptar y me da error de automatizacion y me sale del programa...
La verdad es que no se como solucionarlo, probe de cerrar el recordset cada vez que hace el recordsource, pero me sigue el mismo error... Si alguien puede ayudarme se lo agradeceria muchisimo
Re: Conexión de BBDD Access 2000 en Visual Basic 6.0
Enviado por oscar eduardo sanchez castillo el día 18 de junio de 2006
lo que tiene que hacer es cambiar el formato de la base de datos de 2000 a 1997 se hace de la siguiente manera
herramientas/utilidades de la base de datos/convertir base de datos/ a formato de archivos de 1997
hola que tal estoy aprendiendo VB6 y vi que estan hablando sobre conecciones, yo las hago sin el data control pero tengo un problema y no se como solucionarlo el problema es que no se si estoy haciendo bien mi coneccion por que me marca \"ERROR 13 NO COINCIDEN LOS TIPOS\" cuando ejecuto el form les mando mi codigo haber quien me puede ayudar
Option Explicit
Private db As Database
Private rs As Recordset
Private Sub Form_Load()
Dim db As Database
Dim rs As Recordset
Const sPathBase As String = \"C:\\Archivos de programa\\Microsoft Visual Studio\\VB98\\BIBLIO.MDB\"
\' Crear el objeto de base de datos
Set db = OpenDatabase(sPathBase)
\' Crear el recordset con la tabla que queremos manipular
Set rs = db.OpenRecordset(\"Select [Au_ID],[Author],[Year Born] FROM Authors\", dbOpenDynaset)
Foros de debate
Visual Basic
