Truco de Visual Basic.NET - Recuperar el esquema de columna con el proveedor de OLE DB .NET
Si queremos recuperar el esquema de columna con el proveedor de OLE DB .NET. podemos utilizar este código fuente:
Dim cn As New OleDbConnection
Dim cmd As New OleDbCommand
Dim schemaTable As DataTable
Dim myReader As OleDbDataReader
Dim myField As DataRow
Dim myProperty As DataColumn
cn.ConnectionString = "Provider=SQLOLEDB;Data Source=server;User ID=login;" & _
"Password=password;Initial Catalog=Northwind"
cn.Open()
cmd.Connection = cn
cmd.CommandText = "SELECT * FROM Employees"
myReader = cmd.ExecuteReader()
schemaTable = myReader.GetSchemaTable()
'Para cada campo de la tabla...
For Each myField In schemaTable.Rows
'Para cada propiedad del campo...
For Each myProperty In schemaTable.Columns
'Mostrar el nombre y el valor del campo.
Console.WriteLine(myProperty.ColumnName & " = " & myField(myProperty).ToString())
Next
Console.WriteLine()
Next
myReader.Close()
cn.Close()
Pon el truco en tus favoritos