ADO Tutorial de SQL Server

Tener los conocimientos necesarios para crear y utilizar una conexión ADO a SQL Server le puede ahorrar tiempo cuando se necesita para consultar los datos de una base de datos. SQL Server es un sistema de gestión de base de datos relacional se utiliza comúnmente para crear grandes bases de datos disponibles para múltiples usuarios en múltiples ubicaciones. Puede utilizar conexiones ADO en múltiples lenguajes de programación; este ejemplo se utiliza Microsoft Visual Basic.NET. VB.NET es un lenguaje de programación orientado a objetos que es relativamente fácil de aprender y utilizar.

Instrucciones

1 Abra Microsoft Visual C # Express y seleccionar "Nuevo proyecto ..." en el panel izquierdo de la pantalla. Haga clic en "Visual Basic" en "Plantillas instaladas" doble clic "Aplicación de Windows Forms".

2 Haga clic en el panel "Herramientas" y haga doble clic en "botón" para añadir un nuevo botón a su formulario. Haga clic en el menú "Proyecto" y seleccione "<Nombre del Proyecto> Propiedades". Haga clic en "Referencias" y luego seleccionar "Añadir". Seleccione "COM" y haga clic en "" Microsoft ActiveX Data Objects <número de versión> Biblioteca "". Haga clic en Aceptar."

3 Haga doble clic en "Button1" para abrir el módulo "Form1.vb". Escriba lo siguiente en la primera línea de arriba "Public Class Form1":

Las importaciones de ADODB

4 Escribe lo siguiente para declarar las variables más adelante "Button1_Click":

con Dim As New ADODB.Connection

Como primer tenue New ADODB.Recordset

Dim como secuencia sXMLResult

5 Escribe lo siguiente para abrir la conexión con la base de datos de SQL Server:

con.ConnectionString = "Provider=SQLNCLI10;" _

Y "Servidor = el nombre del servidor;" _

Y "Base de datos = el nombre de la base de datos"; _

& "Integrated Security = SSPI;" _

& "DataTypeCompatibility = 80;" _

Y "Conexión MARS = false;"

con.Open ()

6 Escribe lo siguiente para consultar una tabla de base de datos de SQL Server:

rst.ActiveConnection = con

= primer con.Execute ( "SELECT TableName.FieldName DE nombreTabla;")

7 Escriba lo siguiente para recorrer todos los registros en la tabla:

Mientras (no rst.EOF)

sXMLResult = rst.Fields("fieldName").Value

MsgBox (sXMLResult)

rst.MoveNext ()

Mientras End

8 Escribe lo siguiente para cerrar la conexión y liberar variable de la memoria:

con.Close()

con = Nada

Pulse la tecla "F5" para ejecutar el programa y haga clic en "Button1".