cmd.Parameters.Add("@CompanyName", OleDbType.VarChar, 40, "CompanyName")
da.InsertCommand = cmd
'''' Create the DeleteCommand.
cmd = New OleDbCommand("DELETE FROM Customers WHERE CustomerID = @CustomerID", conn)
parm = cmd.Parameters.Add("@CustomerID", OleDbType.Char, 5, "CustomerID")
parm.SourceVersion = DataRowVersion.Original
da.DeleteCommand = cmd
'''' Create the UpdateCommand.
cmd = New OleDbCommand("UPDATE Customers SET CustomerID = @CustomerID, CompanyName = @CompanyName WHERE CustomerID = @oldCustomerID", conn)
cmd.Parameters.Add("@CustomerID", OleDbType.Char, 5, "CustomerID")
cmd.Parameters.Add("@CompanyName", OleDbType.VarChar, 40, "CompanyName")
parm = cmd.Parameters.Add("@oldCustomerID", OleDbType.Char, 5, "CustomerID")
parm.SourceVersion = DataRowVersion.Original
da.UpdateCommand = cmd
Return da
End Function
以下两行
parm = cmd.Parameters.Add("@CustomerID", OleDbType.Char, 5, "CustomerID")
parm.SourceVersion = DataRowVersion.Original
可以缩写为
cmd.Parameters.Add("@CustomerID", OleDbType.Char, 5, "CustomerID").SourceVersion = DataRowVersion.Original
类似地当添加参数后马上进行设置参数的值时,也可以进行类似以下缩写
myDataAdapter.SelectCommand.Parameters.Add("@CategoryName", OleDbType.VarChar, 80).Value = "toasters"
myDataAdapter.SelectCommand.Parameters.Add("@SerialNum", OleDbType.Integer).Value = 239
(信息整理来自MSDN)
上一页 [1] [2] [C语言系列]NET 中C#的switch语句的语法 [系统软件]托拽Explore中的文件到VB.net的窗口 [系统软件]Boost库在XP+Visual C++.net中的安装 [常用软件]新配色面板:Paint.Net3.0RC1官方下载 [常用软件]用内建的“Net Meeting”聊天 [VB.NET程序]Henry的VB.NET之旅(三)—共享成员 [VB.NET程序]Henry的VB.NET之旅(二)—构造与析构 [VB.NET程序]Henry的VB.NET之旅(一)—失踪的窗体 [VB.NET程序]在托盘上显示Balloon Tooltip(VB.NET) [VB.NET程序]Henry手记-VB.NET中动态加载Treeview节点(二)
|