将DataSet中的操作更新到Access数据库

代码如下:

ExpandedBlockStart.gifContractedBlock.gif<%@import Namespace =Namespace=system.data%>
ExpandedSubBlockStart.gifContractedSubBlock.gif
<%@import Namespace =Namespace=system.data.oledb%>
InBlock.gif
<script language=vb runat=server>
ExpandedSubBlockStart.gifContractedSubBlock.gif
Sub page_load()sub page_load()    
InBlock.gif    
dim strConnection as string
InBlock.gif    
dim strSQL as string
InBlock.gif    
dim objDataSet as new DataSet()
InBlock.gif    
dim objConnection as OledbConnection
InBlock.gif    
dim objAdapter as OledbDataAdapter
InBlock.gif    
InBlock.gif    strConnection 
= "Provider=Microsoft.Jet.OLEDB.4.0;" & _
InBlock.gif                    
"Data Source=h:BegASPNETNorthwind.mdb"    '使用的数据库是Access自带的示例文件:Northwind.mdb
InBlock.gif
    strSQL = "select 雇员ID,姓氏,名字 from 雇员"
InBlock.gif
    
InBlock.gif    objConnection 
= new OledbConnection(strConnection)
InBlock.gif    objAdapter 
= new OledbDataAdapter(strSQL , objConnection)
InBlock.gif    
InBlock.gif    objAdapter.fill(objDataSet , 
"Employees")
InBlock.gif    
InBlock.gif    dgNameList1.DataSource 
= objDataSet.Tables("Employees").DefaultView
InBlock.gif    dgNameList1.DataBind()
InBlock.gif    
InBlock.gif    
'-----------------------------------------------------------向表添加一个新行
InBlock.gif
    dim objTable as DataTable
InBlock.gif    
dim objNewRow as DataRow
InBlock.gif    
InBlock.gif    objTable 
= objDataSet.Tables("Employees")
InBlock.gif    objNewRow 
= objTable.NewRow()
InBlock.gif    objNewRow(
"姓氏"= "聂"
InBlock.gif
    objNewRow("名字"= "大鹏"
InBlock.gif
    objTable.Rows.Add(objNewRow)
InBlock.gif    
InBlock.gif    objNewRow 
= objTable.NewRow()
InBlock.gif    objNewRow(
"姓氏"= "王"
InBlock.gif
    objNewRow("名字"= "志东"
InBlock.gif
    objTable.Rows.Add(objNewRow)
InBlock.gif    
InBlock.gif    dgNameList2.DataSource 
= objTable.DefaultView
InBlock.gif    dgNameList2.DataBind()
InBlock.gif    
InBlock.gif    
InBlock.gif    
'-----------------------------------------------------------更新表中的行
InBlock.gif
    dim objRow as DataRow
InBlock.gif    
InBlock.gif    objRow 
= objTable.Rows(3)
InBlock.gif    objRow(
"姓氏"= "谷"
InBlock.gif
    objRow("名字"= "丰"
InBlock.gif
    
InBlock.gif    dgNameList3.DataSource 
= objTable.DefaultView
InBlock.gif    dgNameList3.DataBind()
InBlock.gif    
InBlock.gif    
InBlock.gif    
InBlock.gif    
'-----------------------------------------------------------删除表中的行
InBlock.gif
    objTable.Rows(objTable.Rows.Count - 2).Delete()
InBlock.gif    
InBlock.gif    dgNameList4.DataSource 
= objTable.DefaultView
InBlock.gif    dgNameList4.DataBind()
InBlock.gif    
InBlock.gif    
InBlock.gif    
InBlock.gif    
'===========================================================更新数据源
InBlock.gif
    dim objBuilder as OledbCommandBuilder
InBlock.gif    
InBlock.gif    objBuilder 
= new OledbCommandBuilder(objAdapter)
InBlock.gif    objAdapter.UpdateCommand 
= objBuilder.GetUpdateCommand()
InBlock.gif    objAdapter.InsertCommand 
= objBuilder.GetInsertCommand()
InBlock.gif    objAdapter.DeleteCommand 
= objBuilder.GetDeleteCommand()
InBlock.gif    
InBlock.gif    objAdapter.Update(objDataSet , 
"Employees")
ExpandedSubBlockEnd.gif
end sub

InBlock.gif
</script>
InBlock.gif
InBlock.gif
<html>
InBlock.gif
<body>
InBlock.gif
<table width=100%>
InBlock.gif 
<tr>
InBlock.gif   
<td>原始数据</td>
InBlock.gif   
<td>添加行</td>
InBlock.gif   
<td>编辑行</td>
InBlock.gif   
<td>删除行</td>
InBlock.gif     
</tr>
InBlock.gif 
<tr>
InBlock.gif   
<td valign=top><asp:datagrid id=dgNameList1 runat=server /></td>
InBlock.gif   
<td valign=top><asp:datagrid id=dgNameList2 runat=server /></td>
InBlock.gif   
<td valign=top><asp:datagrid id=dgNameList3 runat=server /></td>
InBlock.gif   
<td valign=top><asp:datagrid id=dgNameList4 runat=server /></td>
InBlock.gif     
</tr>     
InBlock.gif   
</table>
InBlock.gif   
InBlock.gif   
<hr>
InBlock.gif   
InBlock.gif   
<asp:datagrid id=dgUpd runat=server />
InBlock.gif
</body>
InBlock.gif
</html>

本文来自互联网用户投稿,该文观点仅代表作者本人,不代表本站立场。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如若转载,请注明出处:http://www.mzph.cn/news/408368.shtml

如若内容造成侵权/违法违规/事实不符,请联系多彩编程网进行投诉反馈email:809451989@qq.com,一经查实,立即删除!

相关文章

react学习(41)----react中的jsx简介

JSX 特定属性你可以通过使用引号&#xff0c;来将属性值指定为字符串字面量&#xff1a;const element <div tabIndex"0"></div>;也可以使用大括号&#xff0c;来在属性值中插入一个 JavaScript 表达式&#xff1a;const element <img src{user.ava…

@synthesize obj=_obj的意义详解 @property和@synthesize

本文转载至&#xff1a;http://blog.csdn.net/showhilllee/article/details/8971159我们在进行iOS开发时&#xff0c;经常会在类的声明部分看见类似于synthesize window_window; 的语句&#xff0c;那么&#xff0c;这个window是什么&#xff0c;_ window又是什么&#xff0c;两…

我喜欢的一首歌--《幸福的瞬间》

看了《薰衣草》就开始喜欢这首歌了&#xff0c;看的时候还会为了电视里男女主角痴情的爱情故事落泪&#xff0c;可见我还不成熟。今天正当我和下班人群一起在572上被挤得快变形的时候&#xff0c;车厢里放起了这首歌&#xff0c;我差点以为是我的手机响了。&#xff08;呵呵&am…

react学习(42)----react中的jsx表达对象

JSX 表示对象 Babel 会把 JSX 转译成一个名为 React.createElement() 函数调用。 以下两种示例代码完全等效&#xff1a; const element (<h1 className"greeting">Hello, world!</h1> ); const element React.createElement(h1,{className: greet…

react学习(43)----react中将一个元素渲染为 DOM

假设你的 HTML 文件某处有一个 <div>&#xff1a; <div id"root"></div> 我们将其称为“根” DOM 节点&#xff0c;因为该节点内的所有内容都将由 React DOM 管理。 仅使用 React 构建的应用通常只有单一的根 DOM 节点。如果你在将 React 集成进…

win7 IIS7.5配置伪静态

第一部: 从如下地址中下载URLRewriter组件组件&#xff1a;官方下载地址&#xff1a;http://download.microsoft.com/download/0/4/6/0463611e-a3f9-490d-a08c-877a83b797cf/MSDNURLRewriting.msi第二部&#xff1a;在网站项目中添加URLRewriter程序集的引用。第三部&#xff1…

Github项目推荐|可视化 GAN 的训练过程

点击上方“算法猿的成长“&#xff0c;关注公众号&#xff0c;选择加“星标“或“置顶”总第 137 篇文章&#xff0c;本文大约 1000 字&#xff0c;阅读大约需要 5 分钟今天介绍的一个开源的 github 项目&#xff0c;主要是实现了对 GAN 训练过程的可视化代码&#xff0c;项目链…

学习计划

自己也算是一个老程序员了&#xff0c;但是毕业后一直没有系统的学习编程&#xff0c;自己感觉现在的技术乱七八糟、支离破碎的&#xff0c;因此决定从现在开始有计划地学习一些实用的技术&#xff1a;1、客户端&#xff1a;javascript、html、css、dhtml等&#xff1b;2、服务…

Github|类别不平衡学习资源(上)

点击上方“算法猿的成长“&#xff0c;关注公众号&#xff0c;选择加“星标“或“置顶”总第 138 篇文章&#xff0c;本文大约 5400 字&#xff0c;阅读大约需要 15 分钟今天推荐的是一个 github 项目&#xff0c;项目地址如下&#xff0c;主要是类别不平衡学习的论文、代码、框…

XForum 里用 Filter 编程实现安全访问控制

J2EE/EJB 论坛 / XForum 里用 Filter 编程实现安全访问控制cinc 2003.03.11&#xff0c; 15个回复&#xff0c; 1745次浏览在 J2ee 里&#xff0c;实现安全有两种&#xff1a; 用声明实现安全&#xff0c;就是在 web.xml 里实现安全限制。 用编程实现安全&#xff0c;自己写代码…

进制转换,写出一个程序,接受一个十六进制的数,输出该数值的十进制表示。 数据范围:保证结果在 1≤n≤2的31次方-1

题目&#xff1a;进制转换 写出一个程序&#xff0c;接受一个十六进制的数&#xff0c;输出该数值的十进制表示。 数据范围&#xff1a;保证结果在 1≤n≤2的31次方-1 代码实现&#xff1a; import java.util.Scanner;// 注意类名必须为 Main, 不要有任何 package xxx 信息 p…

Github|类别不平衡学习资源(下)

点击上方“算法猿的成长“&#xff0c;关注公众号&#xff0c;选择加“星标“或“置顶”总第 139 篇文章&#xff0c;本文大约 3600 字&#xff0c;阅读大约需要 10 分钟继续介绍类别不平衡学习资源&#xff0c;github 地址&#xff1a;https://github.com/ZhiningLiu1998/awes…

react学习(45)----react组件

定义组件最简单的方式就是编写 JavaScript 函数&#xff1a; function Welcome(props) {return <h1>Hello, {props.name}</h1>; } 该函数是一个有效的 React 组件&#xff0c;因为它接收唯一带有数据的 “props”&#xff08;代表属性&#xff09;对象与并返回一…

Github | 线稿自动上色

点击上方“算法猿的成长“&#xff0c;关注公众号&#xff0c;选择加“星标“或“置顶”总第 140 篇文章&#xff0c;本文大约 1500 字&#xff0c;阅读大约需要 5 分钟今天要介绍的是一个 Github 项目&#xff0c;项目地址如下&#xff0c;它实现了对线稿的自动上色功能&#…

react学习(46)----react渲染组件

const element <div />; 不过&#xff0c;React 元素也可以是用户自定义的组件&#xff1a; const element <Welcome name"Sara" />; 当 React 元素为用户自定义组件时&#xff0c;它会将 JSX 所接收的属性&#xff08;attributes&#xff09;以及子…

Microsoft好员工的十个标准

1、对自己所在公司或部门的产品具有起码的好奇心是极为重要的一点。你必须亲自使用该产品。对于身处计算机行业的人来说,这一点怎么强调都不为过。当然&#xff0c;这一点同样适用于其他知识密集型领域&#xff0c;因为在这些领域内技术与应用发展更新极快&#xff0c;对其技术…

如何在图片上添加文本信息

点击上方“算法猿的成长“&#xff0c;关注公众号&#xff0c;选择加“星标“或“置顶”总第 141 篇文章&#xff0c;本文大约 1500 字&#xff0c;阅读大约需要 5 分钟前言给图片添加文本信息是非常常见的需求&#xff0c;通常需要添加的文本信息分为中文文字或者是非中文的文…

react学习(47)----react中initialValue和value不能一起定义

<Row gutter{12}><Col span{12}><Form.Item label"活动开始时间">{getFieldDecorator(startTimeLong, {initialValue: popupByIdDetail.startTimeLong,rules: [{ required: true, message: 活动开始时间不能为空 }],})(<DatePickervalue{popupB…