一个经典的ADO.NET入门例子

时间:2021-05-25

众所周知,ADO.NET相对于ADO的最大优势在于对于数据的更新修改可以在与数据源完全断开联系的情况下进行,然后再把数据更新情况传回到

数据源。这样大大减少了连接过多对于数据库服务器资源的占用。下面是我在《ADO.NET实用指南》这本书上看到的一个例子,比较清楚的讲解

了ADO.NET的使用方法。
ImportsSystem.Data.SqlClient
ImportsSystem.Data
ImportsSystem.Data.Common

PublicClassForm1
InheritsSystem.Windows.Forms.Form

PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.Click
DimconnAsNewSqlConnection("datasource=localhost;initialcatalog=StudentCourse;"&_
"UserID=;Password=;")
DimdsAsNewDataSet
Try
conn.Open()'在形成SqlDataAdapter前打开conn
DimdaAuthorsAsNewSqlDataAdapter("Select*FromSC",conn)
DimbldrAsNewSqlCommandBuilder(daAuthors)
daAuthors.Fill(ds,"SC")
conn.Close()'在填充完ds后关闭连接,接着对ds进行操作

DimtblAsNewDataTable
tbl=ds.Tables("SC")

DimrowVals(3)AsObject
rowVals(0)="5"
rowVals(1)="00003"
rowVals(2)="0001"
rowVals(3)=99
DiminsertedRowAsDataRow
insertedRow=tbl.Rows.Add(rowVals)'添加一行

tbl.Rows(0).Delete()'删除一行

tbl.Rows(1).BeginEdit()
tbl.Rows(1)("score")=89'修改一行
tbl.Rows(1).EndEdit()

conn.Open()
daAuthors.Update(ds.Tables("SC"))'须将结果传回数据源时打开连接,update
conn.Close()
CatchexAsException
MessageBox.Show(ex.Message)
EndTry
EndSub
EndClass

声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。

相关文章