Visual Basic 6.0 Tutorial de SQL

Microsoft Visual Basic 6.0 es un entorno de desarrollo para crear aplicaciones empresariales con necesidades diversas, incluyendo el acceso a datos. Visual Basic tiene varias funciones para consultar las tablas de base de datos. Estas funciones son métodos de clases de bases de datos integradas en Visual Basic. Es una simple cuestión de hacer una consulta SQL en una tabla de archivos de texto.

Crear la base de datos de texto

Primero tendrá que crear la tabla de base de datos de texto que su programa de Visual Basic se abrirá y consulta. Crear un directorio llamado "C: \ DB" y crear un nuevo archivo, texto sin formato en que directorio llamado "MyTable.txt." Abrir ese archivo e introduzca estos datos:

Título, año, director
Star Wars de 1977, George Lucas
Excalibur de 1980, John Boorman

Crear el proyecto de Visual Basic

Cierre el archivo, abra "IDE de Visual Basic" (entorno de desarrollo integrado) y crear un nuevo proyecto EXE estándar (Archivo> Nuevo proyecto, EXE estándar). En la ventana de diseño de formularios, arrastre un botón de comando desde la barra de herramientas y soltarlo en el formulario. Doble clic en el botón para entrar en el evento Command1_Click, e introducir este código en dicha subrutina:

Private Sub Command1_Click ()
Dim ConnectionText As New ADODB.Connection
Dim recordSetObj como nuevo ADODB.Recordset
Dim ruta As String

path = "C: \ DB \"

connectionText.Open "Provider = Microsoft.Jet.OleDb.4.0; Data Source =" _
Y ruta & "; Extended Properties = 'text; HDR = SI; FMT = Delimitado'"

recordSetObj.Open "SELECT * FROM myTable.txt donde el año = 1977;", _

connectionText, adOpenStatic, adLockReadOnly, adCmdText

Aunque no hacer recordSetObj.EOF
MsgBox recordSetObj (0) & "," & recordSetObj (1) & "," & recordSetObj (2)

recordSetObj.MoveNext

Lazo

End Sub

Ejecuta el programa

Ejecutar el programa pulsando la tecla "F5". Presione el botón del formulario cuando el formulario aparece. Terminar el programa y volver al entorno de código para explorar y entender el código.

El método de "connectionText.Open" establece la conexión con la base de datos. Observe los varios puntos y comas en la cadena de conexión. Estos caracteres se separan pares de campos que el motor de base de datos Microsoft Jet necesita para conectarse a la base de datos. Cada par consiste en un nombre y el valor de ese nombre, por ejemplo, proveedor, y Microsoft.Jet.OleDb.4.0. Otro par es de origen de datos y la ruta, donde el camino indica la carpeta (C: \ DB) su tabla de base de datos de archivo de texto se almacena en la base de datos Microsoft Jet motor ve esa carpeta como una base de datos..

La declaración recordSetObj.Open hace la consulta real tabla de SQL. Puede visualizar esta consulta como la apertura de un conjunto de registros de la tabla. Cuando se completa la instrucción Open, ese conjunto está contenido en el recordSetObj. El bucle Do While camina por el conjunto de registros, utilizando el método MoveNext para cambiar de un ajuste a la siguiente hasta que se alcance la condición EOF.

Cambie la consulta

Intente cambiar la consulta SQL para incluir una cláusula WHERE, por ejemplo, donde el año = 1.977. A continuación, crear su propia base de datos y consulta que el uso de este programa como modelo.