ADO如何新增修改删除数据库的记录呢
2014-04-20 10:14
309 查看
一、新增数据库的记录
首先使用ado连结到Access数据库ntopsamp.mdb,用SQL指令打开表「产品」的记录,将结果传回到rs1的
recordset当中,ASP程式码如下:
Set conn1 = Server.CreateObject("ADODB.Connection")
conn1.Open "DBQ="& Server.MapPath("ntopsamp.mdb") &";Driver={Microsoft Access Driver (*.mdb)};"
Set rs1 = Server.CreateObject("ADODB.Recordset")
rs1.Open "产品",conn1,1,3
使用Addnew方法以新增一条记录,ASP程式码如下:
rs1.Addnew
设定记录表各个字段的值,您可以使用以下三种语法:
rs1("字段名称").Value = 值
rs1("字段名称") = 值
rs1(字段顺序) = 值
譬如说,ASP程式码如下:
rs1("名称").Value = "笔记型电脑"
rs1("数量") = 100
rs1(0) = "12345"
最後下个Update方法,即将新增的记录储存到表当中。
rs1.Update
rs1.Close
Response.Write("增加记录: 名称 = 笔记型电脑
")
修改数据库的记录
若要修改数据库的记录,首先使用ado连结到Access数据库ntopsamp.mdb,下SQL指令寻找待修改的记录,将结
果传回到rs1的recordset当中,ASP程式码如下:
Set rs1 = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM 产品 WHERE 名称='笔记型电脑'"
rs1.Open sql,conn1,1,3
若找到待修改的记录,设定表各个字段的值,最後下个Update方法,即将新增的记录储存到表当中,ASP程式码
如下:
if not rs1.EOF then
randomize
no1 = round(rnd() * 10)
new1 = "笔记型电脑-" & no1
rs1("名称").Value = new1
rs1.Update
Response.Write("修改记录成: 名称= " & rs1("名称") & "")
end if
删除数据库的记录
若要删除数据库的记录,首先使用ado连结到Access数据库ntopsamp.mdb,下SQL指令寻找待删除的记录,将结果传回到rs1的recordset当中,ASP程式码如下:
Set rs1 = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM 产品 WHERE 名称='" & new1 & "'"
rs1.Open sql,conn1,1,3
若找到待删除的记录,下个Delete方法,即可删除表中的此记录,ASP程式码如下:
if not rs1.EOF then
rs1.Delete
Response.Write("删除记录: 名称 = " & new1)
end if
conn1.Close
首先使用ado连结到Access数据库ntopsamp.mdb,用SQL指令打开表「产品」的记录,将结果传回到rs1的
recordset当中,ASP程式码如下:
Set conn1 = Server.CreateObject("ADODB.Connection")
conn1.Open "DBQ="& Server.MapPath("ntopsamp.mdb") &";Driver={Microsoft Access Driver (*.mdb)};"
Set rs1 = Server.CreateObject("ADODB.Recordset")
rs1.Open "产品",conn1,1,3
使用Addnew方法以新增一条记录,ASP程式码如下:
rs1.Addnew
设定记录表各个字段的值,您可以使用以下三种语法:
rs1("字段名称").Value = 值
rs1("字段名称") = 值
rs1(字段顺序) = 值
譬如说,ASP程式码如下:
rs1("名称").Value = "笔记型电脑"
rs1("数量") = 100
rs1(0) = "12345"
最後下个Update方法,即将新增的记录储存到表当中。
rs1.Update
rs1.Close
Response.Write("增加记录: 名称 = 笔记型电脑
")
修改数据库的记录
若要修改数据库的记录,首先使用ado连结到Access数据库ntopsamp.mdb,下SQL指令寻找待修改的记录,将结
果传回到rs1的recordset当中,ASP程式码如下:
Set rs1 = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM 产品 WHERE 名称='笔记型电脑'"
rs1.Open sql,conn1,1,3
若找到待修改的记录,设定表各个字段的值,最後下个Update方法,即将新增的记录储存到表当中,ASP程式码
如下:
if not rs1.EOF then
randomize
no1 = round(rnd() * 10)
new1 = "笔记型电脑-" & no1
rs1("名称").Value = new1
rs1.Update
Response.Write("修改记录成: 名称= " & rs1("名称") & "")
end if
删除数据库的记录
若要删除数据库的记录,首先使用ado连结到Access数据库ntopsamp.mdb,下SQL指令寻找待删除的记录,将结果传回到rs1的recordset当中,ASP程式码如下:
Set rs1 = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM 产品 WHERE 名称='" & new1 & "'"
rs1.Open sql,conn1,1,3
若找到待删除的记录,下个Delete方法,即可删除表中的此记录,ASP程式码如下:
if not rs1.EOF then
rs1.Delete
Response.Write("删除记录: 名称 = " & new1)
end if
conn1.Close
相关文章推荐
- 如何修改表的ID主键 使的在删除了一些记录后把新增的记录插入到删除记录的位置
- 如何修改表的ID主键 使的在删除了一些记录后把新增的记录插入到删除记录的位置
- 如何在 Visual Basic .NET 中使用 ADO.NET 检索和修改 Excel 工作簿中的记录
- 关于如何删除数据库中重复记录
- 不显示删除回复显示所有回复显示星级回复显示得分回复 触发器问题:如何记录被修改的多行纪录的关键字的原值和新值?
- 如何删除数据库中的重复记录?
- 关于ADO连接access数据库修改数据库记录的问题
- jquery:将table表变为可编辑状态,记录修改,新增或者删除的行。传入后台controller中
- [VB.NET]如何在DataGridView控件中增加、删除和修改记录(用程序代码的方法)
- 用Visual C#来修改和删除数据库记录
- ADO如何建立修改删除表
- 如何用服务器文件管理系统记录共享文件的访问日志、记录共享文件复制、修改、删除和剪切等操作?
- [新手入门]快速学习 ADO.NET Entity Framework系列文章 #4 -- 数据新增、删除、修改(ObkectContext的 .SaveChange()方法)
- vb 利用ADO.Net实现数据库的连接,修改,删除,插入操作
- 如何解决使用addBatch()和executeBatch()无法批量增加删除修改数据库数据等问题
- 命令行修改数据库密码 和如何彻底删除数据库文件mysql
- C#如何[添加][删除][修改]XML中的记录
- 数据库记录的添加、修改、删除(DataAdapter、DataTable 、DataRow )
- sqlserver里新增修改删除记录insert,update,delete时加的行锁还是表锁的问题(转)
- SAP如何删除或合修改数据库表