栏目分类:
子分类:
返回
终身学习网用户登录
快速导航关闭
当前搜索
当前分类
子分类
实用工具
热门搜索
终身学习网 > IT > 软件开发 > 后端开发 > asp

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

asp 更新时间:发布时间: 百科书网 趣学号
众所周知,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
转载请注明:文章转载自 www.051e.com
本文地址:http://www.051e.com/it/59998.html
我们一直用心在做
关于我们 文章归档 网站地图 联系我们

版权所有 ©2023-2025 051e.com

ICP备案号:京ICP备12030808号