SQLite y Gambas2

Gambas es otro de los tantos hacks recursivos que se usan, en si el significado es "Gambas Almost Means Basic", pensado como herramienta RAD y con Basic como lenguaje base, pero mejorado, vemos que tambien es multiprosito, en esta ocasión vamos a ver como hacer una conexión a una base de datos SQLite desde Gambas2.

Lo primero que debemos tener disponible para trabajar, ademas de SQLite, es Gambas2, en Debian y derivados:

#apt-get install gambas2

para otras distros podemos encontrar las fuentes en http://gambas.sourceforge.net/
la parte mas importante esta en saber cuales son las herramientas que nos provee el languaje, y los datos de conexión de almacenan en un solo botón, el codigo es el siguiente:

'Instanciamos un objeto de clase Connection
PRIVATE $hConn AS Connection

'Boton de conexión a la base de datos
PUBLIC SUB btnConnect_Click()

DIM sName AS String
DIM hTable AS Table

TRY $hConn.Close


sName = txtName.Text

IF sName <> "" THEN

'Asignamos valores a las propiedades que vamos a usar
WITH $hConn

'Definimos el tipo de base de datos
.Type = "sqlite"

'Definimos el nombre del host
.Host = txtHost.Text

END WITH

'Asignamos el nombre de la conexion
$hConn.Name = sName

'Abrimos la conexion para poder trabajar
$hConn.Open

'Habilitamos los otros formularios
frmDatabase.Enabled = TRUE
frmRequest.Enabled = TRUE

btnConnect.Enabled = FALSE
btnClose.Enabled = TRUE
CATCH

Message.Error(DConv(Error.Text))
ENDIF

END

A continuación capturas de la aplicacion terminada y en diseño.

Antes de terminar debo aclarar que la base de datos debe estar creada, en caso contrario no se realiza la conexión, ademas se debe dar la ruta completa de la ubicación del archivo que contiene dicha base de datos. La aplicación completa para su descarga en el siquiente link:

Descarga