新客网WWW.XKER.COM:致力做中国最专业的网络学院!
学院: 操作系统 - 网络应用 - 服务器 - 网络安全 - 工具软件 - 办公软件 - Web开发 - 数据库 - 网页设计 - 图形图像 - 媒体动画 - 硬件学堂 - 存储频道 - QQ专区
您的位置:首页 > 软件开发 > .Net开发 > Asp.net教程 > 正文:ADO.NET对象的构造(1)_OleDbDataAdapter

ADO.NET对象的构造(1)_OleDbDataAdapter

新客网 XKER.COM 2004-05-15 来源: 收藏本文
OleDbDataAdapter 构造



n Public Sub New()
n Public Sub New(ByVal selectCommand As OleDbCommand)

n Public Sub New(ByVal selectCommandText As String,ByVal selectConnection As OleDbConnection)

n Public Sub New(ByVal selectCommandText As String,ByVal selectConnectionString As String)



参数

selectCommand OleDbCommand,它是 SELECT 语句或存储过程,被设置为 OleDbDataAdapter 的 SelectCommand 属性。
selectCommandText 一个字符串,它是 SQL SELECT 语句或将由 OleDbDataAdapter 的 SelectCommand 属性使用的存储过程。
selectConnection 表示连接的 OleDbConnection。
selectConnectionString 连接字符串。


备注

当创建 OleDbDataAdapter 的实例时,下面的读/写属性将设置为以下初始值。

Properties
初始值

MissingMappingAction
MissingMappingAction.Passthrough

MissingSchemaAction
MissingSchemaAction.Add





可以通过单独调用属性来更改任何这些属性的值。



示例

Public Sub CreateOleDbDataAdapter()

Dim myOleDbConnection As OleDbConnection = New OleDbConnection("Provider=SQLOLEDB;Data Source=localhost;Integrated Security=SSPI;Initial Catalog=northwind")



Dim custDA As OleDbDataAdapter = New OleDbDataAdapter



Dim myOleDbCommand As OleDbCommand = New OleDbCommand("SELECT CustomerID, CompanyName FROM CUSTOMERS", myOleDbConnection)

Dim custDA As OleDbDataAdapter = New OleDbDataAdapter(myOleDbCommand)



Dim mySelectText As String = "SELECT CustomerID, CompanyName FROM CUSTOMERS"

Dim custDA As OleDbDataAdapter = New OleDbDataAdapter(mySelectText, myOleDbConnection)



Dim mySelectText As String = "SELECT CustomerID, CompanyName FROM CUSTOMERS"

Dim myConnString As String = "Provider=SQLOLEDB;Data Source=localhost;Integrated Security=SSPI;Initial Catalog=northwind"

Dim custDA As OleDbDataAdapter = New OleDbDataAdapter(mySelectText, myConnString)



custDA.MissingSchemaAction = MissingSchemaAction.AddWithKey



custDA.SelectCommand = New OleDbCommand("SELECT CustomerID, CompanyName FROM CUSTOMERS", myOleDbConnection)

custDA.InsertCommand = New OleDbCommand("INSERT INTO Customers (CustomerID, CompanyName) VALUES (?, ?)", myOleDbConnection)

custDA.UpdateCommand = New OleDbCommand("UPDATE Customers SET CustomerID = ?, CompanyName = ? WHERE CustomerID = ?", myOleDbConnection)

custDA.DeleteCommand = New OleDbCommand("DELETE FROM Customers WHERE CustomerID = ?", myOleDbConnection)



custDA.InsertCommand.Parameters.Add("@CustomerID", OleDbType.Char, 5, "CustomerID")

custDA.InsertCommand.Parameters.Add("@CompanyName", OleDbType.VarChar, 40, "CompanyName")



custDA.UpdateCommand.Parameters.Add("@CustomerID", OleDbType.Char, 5, "CustomerID")

custDA.UpdateCommand.Parameters.Add("@CompanyName", OleDbType.VarChar, 40, "CompanyName")

custDA.UpdateCommand.Parameters.Add("@oldCustomerID", OleDbType.Char, 5, "CustomerID").SourceVersion = DataRowVersion.Original



custDA.DeleteCommand.Parameters.Add("@CustomerID", OleDbType.Char, 5, "CustomerID").SourceVersion = DataRowVersion.Original

End Sub



(信息整理来自MSDN)

收藏】 【评论】 【推荐】 【投稿】 【打印】 【关闭
发表评论
要记得去论坛讨论,点击注册新会员匿名评论
评论内容:不能超过250字,需审核后才会公布,请自觉遵守互联网相关政策法规。
阅读排行
随机推荐
实用信息推荐