Bienvenidos

Antes de entrar en materia se que ya casi no se usa el Visual Basic 6, somos pocos pero para empezar esta bien, pero para llevar a cabo un pequeño proyecto me di cuenta que esta informacion no estaba recopilada, asi que decidi que si encontraba la solucion la iba a colgar en Taringa que mucho me ha dado.

Decidi hacer la base de datos en SQLite porque es libre y no queria tener problemas con Microsoft por cosas de licencia.

Nota: Para usar este manual se da por hecho que el usuario tiene conocimientos minimos de SQL (crear tablas, introducir valores, borrar tablas, valores etc)

Empecemos.

Crear base de datos por consola

Antes que crear necesitamos abrir el programa SQLite3, que lo podeis descarga de esta pagina,http://http://www.sqlite.org/sqlite-shell-win32-x86-3070500.zip, en el archivo que se descargen solo hay un .exe, descomprimirlo en la carpeta que quieran, en mi caso en C:, asi no complicarme con las rutas en el ejemplo.

A continuacion abrimos el simbolo del sistema, Inicio/Todos los programas/Accesorios/Simbolo del sistema, se abre la consola y vamos mediante comandos a la carpeta que se encuentra el archivo SQLite3.exe (es el que hemos descomprimido del archivo que nos descargamos).
En mi caso solo es:

cd c:



Una vez en la carpeta escribimos el siguiente codigo para crear la base de datos:

sqlite3 "nombre_bd"



Ejemplo:

sqlite3 ejemplo



Este comando lo que hace es si existe la base de datos entramos en ella, pero sino existe la crea y entramos a ella.

Una vez dentro podremos empezar a crear las tablas insertar los datos etc.
Cuando terminemos de crear tablas etc. damos al siguiente comando:

.exit


Eso hara que se creee un archivo con el nombre de nuestra BD en la misma carpeta en la que esta el ejecutable.

Crear ODBC de SQLite


Lo vamos a hacer mediante ODBC asi que necesitamos el driver, que lo descargamos en : http://www.ch-werner.de/sqliteodbc/sqliteodbc.exe, este archivo lo ejecutamos y empezara a instalarse.

Una vez instalado vamos a decirle al ordenador que queremos que conecte nuestra BD de SQLite a un ODBC.
Asi que vamos a Inicio/Panel de control/Herramientras administrativas/Origenes de datos(ODBC).

Aqui se abre una ventana.

Base de datos de SQLite con Visual Basic 6

Vamos a la pestaña de DSN del sistema, aqui ya habra unos creados, la imagen no es mia, asi que le damos agregar, se abre otra ventana que enseñara todos los controladores que estan instalados en el sistema, buscamos el llamado

SQLite3 ODBC Driver

. Le damos a finalizar y abre otra ventana.

VB6

Aqui pide Data source Name, nombre de la base de datos que le vamos a dar. Data base Name, la ruta donde esta el archivo que creamos de la BD. Solo estos 2 datos nos interesa para nuestro simple ejemplo.

En mi caso quedaria.

Data Source Name:

Prueba


Data base Name:

C:ejemplo



le damos a OK y ya tendriamos creada la ODBC, aqui tengo que recalcar que si tenemos mas de una BD tenemos que hacer este mismo procedimiento tantas veces como BD tengamos. Es decir si tenemos 3 BD tenemos que tener en el DSN del sistema 3 controladores de SQLite3 ODBC Driver instalados.

Conectar a Visual Basic 6


Abrimos el VB y en codigo ponemos lo siguiente.

Dim variable As New ADODB.Connection
Dim variable As String
conex = "DSN=nombre_dsn;pwd=Password"
bd.Open conex



A mi me quedaria asi:

Dim bd As New ADODB.Connection
Dim conex As String
conex = "DSN=Prueba
bd.Open conex



Asi ya el se conecta a la base de datos por medio del ODBC que creamos.

Si quieres conectar esa base de datos a un Adodc, por ejemplo seria asi.

Adodc1.ConnectionString = variable_tipo_string



En mi caso

Adodc1.ConnectionString = conex



y ahi en adelante seria conectarla 1 tabla.

Adodc1.CommandType = adCmdTable
Adodc1.RecordSource = "Nombre_tabla"
Adodc1.Refresh



Ejemplo:

Adodc1.CommandType = adCmdTable
Adodc1.RecordSource = "tb1"
Adodc1.Refresh



Y ahi en adelante lo que querais ya solo es tiempo y ganas de programar.

Lo siento por poner pocas imagenes pero como casi todo era con codigo no pude meter mas.

Gracias por la atencion y espero que le sirva a alguien esta informacion, si es asi comentar para saber que no soy el unico que le surgio este problema. Gracias