Command 对象简介
Command 对象最主要的工作是透过Connection 对象对数据源下达操作数据库的命令。
我们以下列语法产生Command 对象：
Dim cmA As Command = New ADOCommand
或是在产生对象的时候顺便指定属性：
Dim cmA As Command = New ADOCommand("CommandText",ActiveConnection)
Command 对象常用的属性：
|
属性
|
说明
|
|
ActiveConnection
|
设定要透过哪个连结对象下命令
|
|
CommandBehavior
|
设定Command 对象的动作模式
|
|
CommandType(Text\TableDirect\StoredProcedure)
|
命令型态(SQL 陈述、数据表名称、预存程序)
|
|
CommandText
|
要下达至数据源的命令
|
|
CommandTimeout
|
指令逾时时间
|
|
Parameters
|
参数集合
|
|
RecordsAffected
|
受影响的纪录笔数
|
范例中直接输入数据表名称，将数据表中的所有数据传回：
Dim cmA As Command
cmA.CommandType=CommandType.TableDirect
cmA.CommandText="Members"
Command 对象常用的方法
Execute 透过Connection 对象下达命令至数据源
Cancel 放弃命令的执行
ExecuteNonQuery 使用本方法表示所下达的命令不会传回任何纪录
Prepare 将命令以预存程序储存于数据源，以加快后续执行效率
产生独立的Command 对象
使用Command 对象，不一定要明确地宣告一个Connection 对象。可以在产生Command
对象的时候，将ActiveConnection 参数所要指定的连结对象改成ConnectionString 即可。不过
独立的Command 对象并不代表不需要Connection 对象，而是由Command 对象来自动产生它。在使用独立的Command 对象之前要明确的将连结打开，我们可以利用ActiveConnection.Open()方法来开启连结，如下所示：
Dim cmA As ADOCommand = New _
ADOCommand("SQL 陈述", "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\Inetpub\wwwroot\cr\ch05\MyWeb.mdb;" & _"User ID=Admin"
cmA.ActiveConnection.Open() '将连结打开
下面例子将使用者信息输入到数据库中：
Sub btnSubmit_Click(Sender As Object, e As EventArgs)
Dim strConStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\InetPub\wwwroot\CR\CH05\MyWeb.mdb"
Dim cmA As ADOCommand = New ADOCommand("",strConStr)
CmA.ActiveConnection.Open()
cmA.CommandText="Insert Into Members Values('" & _
Text1.Value & "','" & Text2.Value & "’,'" & _
Text3.Value & "','" & Text4.Value & "','" & _
Text5.Value & "','" & Text6.Value & "')"
cmA.Execute()
Sp1.InnerText="这个叙述影响了" & cmA.RecordsAffected & "笔资料"
End Sub
本文转自 august 51CTO博客，原文链接：http://blog.51cto.com/august/6960，如需转载请自行联系原作者