一个经典的ADO.NET入门例子
程序员文章站
2022-10-14 22:34:05
众所周知,ado.net相对于ado的最大优势在于对于数据的更新修改可以在与数据源完全断开联系的情况下进行,然后再把数据更新情况传回到 数据源。这样大大减少了连...
众所周知,ado.net相对于ado的最大优势在于对于数据的更新修改可以在与数据源完全断开联系的情况下进行,然后再把数据更新情况传回到
数据源。这样大大减少了连接过多对于数据库服务器资源的占用。下面是我在《ado.net实用指南》这本书上看到的一个例子,比较清楚的讲解
了ado.net的使用方法。
imports system.data.sqlclient
imports system.data
imports system.data.common
public class form1
inherits system.windows.forms.form
private sub button1_click(byval sender as system.object, byval e as system.eventargs) handles button1.click
dim conn as new sqlconnection("data source=localhost;initial catalog=studentcourse;" & _
"user id=;password=;")
dim ds as new dataset
try
conn.open() '在形成sqldataadapter前打开conn
dim daauthors as new sqldataadapter("select * from sc", conn)
dim bldr as new sqlcommandbuilder(daauthors)
daauthors.fill(ds,"sc")
conn.close() '在填充完ds后关闭连接,接着对ds进行操作
dim tbl as new datatable
tbl = ds.tables("sc")
dim rowvals(3) as object
rowvals(0) = "5"
rowvals(1) = "00003"
rowvals(2) = "0001"
rowvals(3) = 99
dim insertedrow as datarow
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()
catch ex as exception
messagebox.show(ex.message)
end try
end sub
end class
数据源。这样大大减少了连接过多对于数据库服务器资源的占用。下面是我在《ado.net实用指南》这本书上看到的一个例子,比较清楚的讲解
了ado.net的使用方法。
imports system.data.sqlclient
imports system.data
imports system.data.common
public class form1
inherits system.windows.forms.form
private sub button1_click(byval sender as system.object, byval e as system.eventargs) handles button1.click
dim conn as new sqlconnection("data source=localhost;initial catalog=studentcourse;" & _
"user id=;password=;")
dim ds as new dataset
try
conn.open() '在形成sqldataadapter前打开conn
dim daauthors as new sqldataadapter("select * from sc", conn)
dim bldr as new sqlcommandbuilder(daauthors)
daauthors.fill(ds,"sc")
conn.close() '在填充完ds后关闭连接,接着对ds进行操作
dim tbl as new datatable
tbl = ds.tables("sc")
dim rowvals(3) as object
rowvals(0) = "5"
rowvals(1) = "00003"
rowvals(2) = "0001"
rowvals(3) = 99
dim insertedrow as datarow
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()
catch ex as exception
messagebox.show(ex.message)
end try
end sub
end class
上一篇: php中session定期自动清理的方法
推荐阅读
-
php 面向对象的一个例子
-
Python入门(一个有趣的画图例子实战)你肯定不会
-
一个经典的PHP验证码类分享
-
一个经典实用的PHP图像处理类分享
-
java当中JDBC当中请给出一个sql server的dataSource的helloworld例子
-
纯PHP生成的一个树叶图片画图例子
-
Flex中创建一个简单计算器的例子
-
JAVA WEB快速入门之从编写一个基于SpringBoot+Mybatis快速创建的REST API项目了解SpringBoot、SpringMVC REST API、Mybatis等相关知识
-
PowerShell函数中把参数传入另一个函数的函数传参例子
-
java中给出一个主线程要join子线程的例子