如何在ADO.NET中创建OLEDB命令对象。

有许多方法来构造命令对象。
我们可以通过命令一个SQL查询字符串。
我们可以传递一个字符串和连接，或者我们可以传递它一个字符串，连接和事务。
以下代码显示了三种不同的方法来创建命令对象。
此代码构造连接和SQL字符串：

        ' connection and SQL strings
        Dim ConnectionString As String = " provider=Micosoft.Jet.OLEDB.4.0;" & "Data source= c:\ Northwind.mdb"
        Dim SQL As String = "SELECT OrderID, CustomerID FROM Orders"

现在使用没有参数的构造函数创建OledBCommand对象。
稍后我们将OledBCommand的连接和CommandText属性设置为连接到连接并设置SQL语句，此命令将执行：

        Dim cmd As New OleDbCommand()
        cmd.Connection = conn
        cmd.CommandText = Sql

在第二中方式中，我们可以通过直接将SQL查询和OLEDBConnection对象作为第一个和第二个参数来创建OLEDBCOMMAND对象：

'Create命令对象
OleDb command cmd = New OleDbCommand (SQL, conn)

第三种方式是通过将SQL查询作为参数来创建命令并在稍后设置其连接属性：

'创建命令对象
 Dim cmd As New OleDbCommand(Sql)
        cmd.Connection = conn

使用OLEDBCommand从数据库导入数据示例

如何连接到North Wind Access 2000数据库，从订单表中读取所有记录，并将第一个和第二列数据显示到控制台输出。

Imports System
Imports System.Collections.Generic
Imports System.Text
Imports System.Data.OleDb

Namespace ConsoleApplication1
        Class Program
            Private Shared Sub Main(ByVal args As String())
                ' Connection and SQL strings
                Dim ConnectionString As String = "Provider= Microsoft.Jet.OLEDB. 4.0;" & "Data Source =c:/nothwind.mdb"
                Dim SQL As String = "SELECT * FROM Orders"

                'Create connection object
                Dim conn As New OleDbConnection(ConnectionString)
                ' create command object
                Dim cmd As New OleDbCommand(SQL)
                cmd.Connection = conn

                ' open connection
                conn.Open()
 
                ' Call command's ExcuteReader
                Dim reader As OleDbDataReader = cmd.ExecuteReader()

                While reader.Read()
                    Console.Write("OrderID :" & reader.GetInt32(0).ToString())
                    Console.Write(" ,")
                    Console.WriteLine("Customer: " & reader.GetString(1).ToString())
                End While

                ' close reader and connection
                reader.Close()
                conn.Close()
            End Sub
        End Class
    End Namespace