En este capítulo hemos utilizado diferentes sistemas de conexión con el servidor de bases de datos. Entre ellas, merece especial mención el acceso a través de ODBC desde un programa. El código de este programa, desarrollado utilizando SharpDevelop, es el siguiente:
En este capítulo hemos utilizado diferentes sistemas de conexión con el servidor de bases de datos. Entre ellas, merece especial mención el acceso a través de ODBC desde un programa. El código de este programa, desarrollado utilizando SharpDevelop, es el siguiente: Imports System Imports System.Data.Odbc Module Main Sub Main() Dim sCon As String sCon="DSN=videoteca" Dim oCon As New OdbcConnection oCon.ConnectionString=sCon oCon.Open Dim sCmd As String sCmd="SELECT * FROM soporte" Dim oCmd As New OdbcCommand oCmd.Connection=oCon oCmd.CommandText=sCmd Dim oReader As OdbcDataReader oReader=oCmd.ExecuteReader Dim sId As string Dim sNombre As String Dim sDesc As String While oReader.Read sId=oReader.GetString(0) sNombre=oReader.GetString(1) sDesc=oReader.GetString(2) Console.Write("("+sId+") ") Console.Write(sNombre+": ") Console.WriteLine(sDesc+".") End While End Sub End Module