<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>数据库编程</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body>
<p align="center">第7章 数据库编程</p>
<p>7.1 连接数据库 <br>
操作数据库的第一步是建立与数据库的连接。SqlConnection和OleDbConnection类对象定义的语法格式为:<br>
Dim 对象名 As New SqlConnection([ConnectionString])<br>
Dim 对象名 As New OleDbConnection([ConnectionString]) <br>
参数ConnectionString是连接串,用于指定数据连接方式。创建Connection对象后,就可使用Connection对象的属性和方法。Connection对象的常
用属性和方法分别列于表中。表中的ConnectionString属性用于获取或设置与数据库的连接字符串。<br>
连接OLE DB数 据源,ConnectionString属性通常包括以下参数:连接OLE DB数据源,ConnectionString属性通常包括以下参数:<br>
Provider:设置数据源的OLE DB驱动程序。 <br>
Data Source:设置数据源的实际路径。<br>
Password:设置登录数据库时所使用的密码。<br>
User ID: 设置登录数据库时所使用的帐号。<br>
Data Source: 设置需连接的数据库服务器名。<br>
Initial Catalog:设置连接的数据库名称。<br>
Integrated Security:服务器的安全性设置,是否使用信任连接。<br>
Workstation Id: 数据库客户端标识。<br>
Packet Size:获取与SQL Server通信的网络数据包的大小,单位为字节。<br>
User ID:登录SQL Server的帐号。<br>
Password(Pwd):登录SQL Server的密码。<br>
Connection Timeout:设置SqlConnection对象连接SQL数据库服务器的超时时间。 </p>
<p align="center"><img src="image/slide7image001.PNG" width="595" height="330"><br>
<img src="image/slide7image002.PNG" width="594" height="178"></p>
<p>Connection对象的事件有以下两个:<br>
(1) InfoMessage:在.NET数据提供程序发送警告或信息时触发该事件。<br>
(2) StateChange:当数据连接状态改变时(即调用Open()或Close()方法)触发该事件。例如,以下代码打开与Access数据库的连接:<br>
<%@ Import Namespace="System.Data" %><br>
<%@ Import Namespace="System.Data.OleDb" %><br>
<SCRIPT Language="VB" Runat="Server"> <br>
Sub Page_Load(Sender As Object, e As EventArgs)<br>
Dim conn As OleDbCOnnection()'定义Connetction对象设置Connetction对象的ConnectionString属性<br>
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data
Source=" &_ Server.MapPath("Student.mdb")<br>
conn.Open()'打开与数据库的连接 <br>
End Sub <br>
</SCRIPT><br>
以下代码打开与SQL Server 2000数据库的连接:<br>
<%@ Import Namespace="System.Data" %> <br>
<%@ Import Namespace="System.Data.SqlClient" %> <br>
<SCRIPT Language="VB" Runat="Server"> <br>
Sub Page_Load(Sender As Object, e As EventArgs)<br>
Dim conn As SqlCOnnection() '定义Connetction对象 <br>
conn.ConnectionString = "Data Source = localhost; Integrated Security=SSPI"
&_ "Catalog=webdata; Packet Size=4096"<br>
conn.Open() '打开与数据库的连接 <br>
End Sub <br>
</SCRIPT> <br>
若不再需要访问数据库,则可在代码中加入conn.Close()语句,关闭与数据库的连接。<br>
7.2 执行SQL命令 <br>
7.2.1 Command对象 <br>
创建Command对象的语法格式为:<br>
Dim 对象名 As New OleDbCommand(cmdText,connection) 'OLE DB数据源<br>
Dim 对象名 As New SqlCommand(cmdText,connection)'SQL Server数据库 Command对象的主要属性和方法分别列于下表:</p>
<p align="center"><img src="image/slide7image003.PNG" width="615" height="261"><br>
<img src="image/slide7image004.PNG" width="612" height="260"></p>
<p> Command对象的CommandType属性用于设置命令的类别:可以是存储过程、表名或SQL语句。当将该属性值设为CommandType.TableDirect时,要求CommandText的值必须是表名而不能
是SQL语句。例如:<br>
Dim cmd As New OleDbCommand()<br>
cmd.CommandText = "students" <br>
cmd.CommandType = Command.TableDirect<br>
cmd.Connection = conn<br>
使用Command对象的ExecuteNonQuery()方法可执行对数据库的更新操作,包括 添加、修改和删除记录。 <br>
【例】向students数据表中加入一条记录,各字段值分别为:“100020”、“王霞”、 False、1980-10-20、“计算机”、102。程序代码如下:<br>
<%@ Import Namespace="System.Data" %><br>
<%@ Import Namespace="System.Data.OleDb" %><br>
<SCRIPT Language="VB" Runat="Server"><br>
Sub Page_Load(Sender As Object, e As EventArgs)<br>
Dim conn As New OleDbConnection()<br>
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="
& _ Server.MapPath("Student.mdb")<br>
conn.Open()<br>
Dim cmd As New OleDbCommand("Insert into students values('100020','王霞',_
False,'1980-10-20','计算机',102)",conn)<br>
cmd.ExecuteNonQuery()'执行SQL语句<br>
conn.Close()'关闭数据连接<br>
End Sub<br>
</SCRIPT><br>
<HTML><HEAD><TITLE>向数据表中加入记录</TITLE></HEAD><br>
<BODY></BODY></HTML><br>
例如若要将学号为“100020”的学生的总学分增加8,则将例中的Insert语句换为:<br>
Update students Set totalscore=totalscore+8 where studentid='100020' <br>
若要删除学号为“100020”的记录,则将例中的Insert语句换为:<br>
Delete from students where studentid='100020 <br>
7.2.2 DataAdapter对象 <br>
定义DataAdapter对象的语法格式有4种:<br>
① Dim 对象名 As New OleDbDataAdapter()<br>
② Dim 对象名 As New OleDbDataAdapter (OleDbCommand对象)<br>
③ Dim 对象名 As New OleDbDataAdapter (SQL命令串,OleDbConnection对象)<br>
④ Dim 对象名 As New OleDbDataAdapter (SQL命令串,连接字符串) 例如,以下代码使用格式①创建DataAdapter对象:<br>
Dim conn As New OleDbConnection()<br>
Dim cmd As New OleDbCommand()<br>
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="
&_ Server.MapPath("Student.mdb")<br>
conn.Open()<br>
cmd.Connection = conn<br>
cmd.CommandText = "Select * from students" <br>
Dim Adpt As New OleDbDataAdapter(cmd)<br>
再如,以下代码使用格式③创建DataAdapter对象:<br>
Dim conn As New OleDbConnection()<br>
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="
&_ Server.MapPath("Student.mdb")<br>
conn.Open() Dim Adpt As New OleDbDataAdapter("Select * from students",conn)<br>
格式①是在创建了DataAdapter对象后,再通过赋予其连接、SQL命令等对象属性值,格式 ④则不需先建立OleDbConnection和OleDbCommand对象即直接创建,例如:<br>
Dim Adpt As New OleDbDataAdapter("Select * from students",_"Provider=Microsoft.Jet.OLEDB.4.0;DataSource="
& Server.MapPath("Student.mdb")) <br>
DataAdapter对象的常用属性、方法和事件分别列于表中。</p>
<p align="center"><img src="image/slide7image005.PNG" width="582" height="127"><br>
<img src="image/slide7image006.PNG" width="583" height="142"></p>
<p> 由表可知,DataAdapter对象有两个常用方法:Fill()用于新增或更新DataSet中的记录;当新增、修改或删除DataSet中的记录时,并需要更改数据源时,使用Update()方法。</p>
<p align="center"> <img src="image/slide7image007.PNG" width="583" height="126"></p>
<p> FillError事件的参数为FillErrorEventArgs,该参数的值有以下几种:<br>
Continue:获取或设置发生错误时是否继续将数据置入DataSet对象。<br>
DataTable:获取发生错误时正在置入数据的数据表名。<br>
Errors:获取正在处理的错误。<br>
Values:获取发生错误时,正在更新的数据行。<br>
RowUpdated事件参数,对OLE DB数据库为OleDbRowUpdatedEventArgs,对SQL
Server数据库为 SqlRowUpdatedEventArgs;RowUpdating事件参数,对OLE DB数据库为OleDbRowUpdatingEventArgs,对SQL
S
没有合适的资源?快使用搜索试试~ 我知道了~
vb.net网络编程指南
共107个文件
png:93个
htm:10个
gif:3个
需积分: 12 17 下载量 55 浏览量
2010-05-09
08:25:45
上传
评论 1
收藏 1.22MB RAR 举报
温馨提示
第1章 Web基础知识 第2章 ASP.NET简介 第3章 VB.NET基本语法 第4章 服务器控件 第5章 基本对象编程 第6章 数据库基础 第7章 数据库编程 第8章 高级应用
资源推荐
资源详情
资源评论
收起资源包目录
vb.net网络编程指南 (107个子文件)
Thumbs.db 258KB
Vbnet.gif 23KB
Line.gif 3KB
Kypine.gif 2KB
asp07.htm 20KB
asp08.htm 19KB
asp05.htm 17KB
asp03.htm 14KB
asp06.htm 14KB
asp04.htm 13KB
asp01.htm 7KB
asp02.htm 2KB
VbNet.htm 2KB
index.htm 755B
slide4image006.PNG 38KB
slide8image004.PNG 34KB
slide5image010.PNG 31KB
slide4image002.PNG 30KB
slide5image003.PNG 28KB
slide5image005.PNG 26KB
slide4image001.PNG 25KB
slide5image013.PNG 21KB
slide7image025.PNG 20KB
slide7image001.PNG 19KB
slide7image009.PNG 19KB
slide5image009.PNG 18KB
slide5image016.PNG 18KB
slide8image006.PNG 18KB
slide7image022.PNG 17KB
slide5image008.PNG 16KB
slide5image021.PNG 16KB
slide7image020.PNG 16KB
slide7image023.PNG 16KB
slide8image005.PNG 16KB
slide5image006.PNG 15KB
slide7image018.PNG 15KB
slide7image003.PNG 15KB
slide6image008.PNG 14KB
slide7image015.PNG 14KB
slide7image004.PNG 14KB
slide5image002.PNG 14KB
slide4image005.PNG 14KB
slide4image007.PNG 14KB
slide7image016.PNG 14KB
slide3image009.PNG 13KB
slide1image004.PNG 13KB
slide5image017.PNG 12KB
slide5image007.PNG 12KB
slide7image012.PNG 12KB
slide7image026.PNG 12KB
slide5image018.PNG 12KB
slide5image001.PNG 11KB
slide8image003.PNG 11KB
slide3image005.PNG 11KB
slide7image017.PNG 11KB
slide6image007.PNG 10KB
slide7image013.PNG 10KB
slide5image011.PNG 10KB
slide7image002.PNG 10KB
slide7image019.PNG 10KB
slide6image002.PNG 10KB
slide4image008.PNG 10KB
slide7image027.PNG 9KB
slide7image008.PNG 9KB
slide7image005.PNG 9KB
slide3image001.PNG 9KB
slide7image006.PNG 9KB
slide6image010.PNG 9KB
slide5image020.PNG 9KB
slide7image011.PNG 9KB
slide5image019.PNG 9KB
slide6image001.PNG 9KB
slide1image001.PNG 8KB
slide4image004.PNG 8KB
slide5image004.PNG 8KB
slide6image004.PNG 8KB
slide6image003.PNG 8KB
slide3image004.PNG 7KB
slide3image002.PNG 7KB
slide7image021.PNG 7KB
slide3image006.PNG 7KB
slide7image024.PNG 7KB
slide4image009.PNG 7KB
slide4image011.PNG 7KB
slide4image012.PNG 7KB
slide7image007.PNG 6KB
slide4image010.PNG 6KB
slide7image014.PNG 6KB
slide6image009.PNG 6KB
slide8image001.PNG 6KB
slide5image015.PNG 6KB
slide2image001.PNG 6KB
slide3image007.PNG 6KB
slide6image006.PNG 5KB
slide3image003.PNG 5KB
slide3image008.PNG 5KB
slide8image002.PNG 4KB
slide5image022.PNG 4KB
slide1image002.PNG 4KB
slide5image023.PNG 4KB
共 107 条
- 1
- 2
资源评论
世纪迪安
- 粉丝: 1
- 资源: 27
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功