asp中对access数据库进行批量删除实例教程 asp如何增加和删除Access数据库记录
\u5173\u4e8easp\u7f51\u9875\u6279\u91cf\u5220\u9664access\u6570\u636e\u5e93\u8bb0\u5f55\u7684\u95ee\u9898exec="delete * from info where code='" & id & "'"
\u6539\u6210
exec="delete * from info where code IN ('" & Replace(id, ",", "','") & "'"
\u8fd9\u6837\u53ef\u4ee5\u5b9e\u73b0\u6279\u91cf\u5220\u9664.
\u8fde\u63a5\u6570\u636e\u5e93\u7684\u8bed\u53e5\u5c31\u4e0d\u5199\u4e86.
<%
'\u6dfb\u52a0\u8bb0\u5f55
'\u5047\u8bbeconn\u662f\u4f60\u5b9a\u4e49\u7684\u6570\u636e\u5e93\u8fde\u63a5
conn.execute("insert into \u8868\u540d(\u5b57\u6bb51,\u5b57\u6bb52...) values(\u503cA,\u503cB,...)")
'\u5b57\u6bb51 \u548c \u5b57\u6bb52 \u5206\u522b\u5bf9\u5e94 \u503cA \u548c \u503cB,\u5b57\u6bb5\u4e0e\u503c\u7684\u4f4d\u7f6e\u4e00\u4e00\u5bf9\u5e94
conn.close
%>
<%
'\u5220\u9664\u8bb0\u5f55
'\u5047\u8bbeconn\u662f\u4f60\u5b9a\u4e49\u7684\u6570\u636e\u5e93\u8fde\u63a5
conn.execute("delete from \u8868\u540d where \u5b57\u6bb5=\u503c")
'\u8fd9\u4e2a\u503c,\u662f\u4f60\u8981\u5220\u9664\u7684\u8bb0\u5f55\u4e2d\u6240\u5305\u542b\u7684\u4e00\u4e2a\u503c.
conn.close
%>
\u8bed\u53e5\u4e0d\u5206\u5927\u5c0f\u5199,\u5982\u679c\u662f\u4e00\u4e2a\u503c,\u8981\u7528"\u503c"\u5f15\u7740(\u5c31\u662fshift\u952e+Enter\u5de6\u8fb9\u7684\u90a3\u4e2a).
\u5982\u679c\u662f\u4e00\u4e2a\u53d8\u91cf\u4e14\u8be5\u5b57\u6bb5\u4e3a\u6587\u672c,\u5219\u8981\u7528'"& \u53d8\u91cf\u540d &"'\u8fd9\u6837\u7684\u683c\u5f0f(\u56e0\u4e3a\u5b83\u5728\u5f15\u53f7\u91cc).\u5982\u679c\u8981\u5199\u5165\u8be5\u5b57\u6bb5\u7684\u53d8\u91cf\u662f\u6570\u503c,\u5219\u7528"& \u53d8\u91cf\u540d &"(\u628a\u5355\u5f15\u53f7\u5220\u6389)
1：首先建立一个access数据库保存为 xhnew.mdb 表名为aa
字段如下：
id 自动排序
name 文本
content 文本
xhtime 日期 默认值 now()
title 文本
2:打开DW 建立文件conn.asp文件
代码如下：
CODE:
<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("xhnew.mdb")
%>
这段语句是连接数据库的语句 set conn=server.createobject("adodb.connection")创建一个connection对象 用该对象的open方法打开数据库
driver={microsoft access driver (*.mdb)};这句语句是access的驱动
dbq="&server.mappath("xhnew.mdb")这句是数据库的路径
建立conn.asp是为了方便接下来的教学。。。
我们可以任何要用到打开数据库连接的文件里加
<!--#include file="conn.asp"-->就可以调用
是不是很方便。第一个小时就学这么多。。。当你弄明白上面的数据库还有代码后。。
就继续跟着我学吧！
（第2个小时）
现在来学把数据库的信息输出来
下面先建立一个主文件index.asp
代码如下
CODE:
<!--#include file="conn.asp"-->
<%
exec="select * from aa order by id desc "
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>
<table width="628" height="24" border="1" align="center" cellpadding="1" cellspacing="0">
<%
if rs.eof and rs.bof then
response.write("暂时没有文章")
else
do while not rs.eof
%>
<tr>
<td width="66" height="22" ><%=rs("id")%></td>
<td width="66" ><%=rs("name")%></td>
<td width="66" ><%=rs("content")%></td>
<td width="273" ><%=rs("xhtime")%></td>
<td width="53" ><%=rs("title")%></td>
<td><a href="modify.asp?id=<%=rs("id")%>" target="_self">编辑</a></td>
<td width="32" ><a href="del.asp?id=<%=rs("id")%>">删除</a></td>
</tr>
<%
rs.movenext
loop
end if
%>
</table>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<td><a href="add.asp">添加</a></td>
[Copy to clipboard]
代码解释：
(1)<%
exec="select * from aa order by id desc "
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>
上面的代码是创建一个recordset对象。。该对象是用来打开数据库中的表的。。也就是打开aa
exec="select * from aa order by id desc " 这句的意思是查找表aa中所有信息并倒序排列
信息. *号表示aa中所有的信息 order by id 就是aa中id字段 desc 是倒序的意思
rs.open exec,conn,1,1 这句话的意思是用recordset对象来打开conn中的表
(2)
<%
if rs.eof and rs.bof then
response.write("暂时没有文章")
else
do while not rs.eof
%>
上面是if语句。。if else语句是相当重要的。。
希望一些初学者要认真的研究一下if else语句。。不可心急。基础才是硬道理
rs.eof 的意思是aa表中的最后一条记录 那么rs.bof就是第一条记录
整个语句用中文翻译就是 当aa表中的最后和最前一条信息没有的时候。。就输出暂时没有文章
或则就循环到eof最后一条信息。。
(3)<tr>
<td width="66" height="22" ><%=rs("id")%></td>
<td width="66" ><%=rs("name")%></td>
<td width="66" ><%=rs("content")%></td>
<td width="273" ><%=rs("xhtime")%></td>
<td width="53" ><%=rs("title")%></td>
<td><a href="modify.asp?id=<%=rs("id")%>" target="_self">编辑</a></td>
<td width="32" ><a href="del.asp?id=<%=rs("id")%>">删除</a></td>
</tr>
上面的代码比较容易理解。。<%=rs("id")%>这个用法是输出数据库字段id..
<a href="modify.asp?id=<%=rs("id")%>" target="_self">编辑</a>这段很重要。。
我来解释一下。。在ie窗口点 编辑 的时候。。页面会跳转到modify.asp的文件里的id
并进行相应的处理。。这里很难解释清楚。。在接下来的例子中再慢慢解说
（4）
<%
rs.movenext
loop
end if
%>
这句是循环结束的语句
rs.movenext 这句是游标向下指的意思
（5）
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
这句是关闭数据库的语句
用完数据库后要记得关闭数据库。。以免占用资源
养成随手关门的好习惯
就学到这里。。好好消化上面的代码。。心急吃不了热豆腐。。
一步一个脚印最塌实
（第3个小时）
现在来学添加数据到数据库 需要两个文件来实现
（1）先建立一个提交表单add.asp
代码如下：
CODE:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<body>
<form name="form1" method="post" action="add_new.asp">
名字 <input type="text" name="name"><br>
备注 <input type="text" name="content"><br>
题目<input type="text" name="title" ><br>
<input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="重置">
</form>
</body>
</html>
[Copy to clipboard]
上面代码要注意的是action="add_new.asp"提交到add_new.asp文件
还有name="name" name="content" name="title" 名字要对应
（2）处理文件add_new.asp
代码如下：
CODE:
<!--#include file="conn.asp"-->
<%
name=request.form("name")
content=request.form("content")
title=request.form("title")
exec="insert into aa(name,content,title) values('"+name+"','"+content+"','"+title+"')"
conn.execute exec
conn.close
set conn=nothing
response.redirect "index.asp"
%>
代码解释：
（1）
name=request.form("name")
content=request.form("content")
title=request.form("title")
这三句语句是接收add.asp发来的信息。。request.form("name")就是对应add.asp中的name="name"
（2）
exec="insert into aa(name,content,title) values('"+name+"','"+content+"','"+title+"')"
conn.execute exec
上面的语句是数据库插如信息的语句
insert into aa(name,content,title) 中文意思是插入信息对应aa表中的三个字段
三个字段的数值是values('"+name+"','"+content+"','"+title+"') 这里面对应的值是
这三句语句
name=request.form("name")
content=request.form("content")
title=request.form("title")
传递的
（3）
conn.close
set conn=nothing
response.redirect "index.asp"
关闭数据库。。写如成功后自动转页面到index.asp
到这里相信你已经学会如何添加新记录到数据库了。。
那就跟着我接着学吧。。。
（第4个小时）
接下来我们来学删除数据库信息。。。
删除信息比较简单。。只需要一个文件del.asp
代码如下：
CODE:
<!--#include file="conn.asp"-->
<%
exec="delete * from aa where id="&request.querystring("id")
conn.execute exec
conn.close
set conn=nothing
response.redirect "index.asp"
%>
代码解释：
exec="delete * from aa where id="&request.querystring("id")
conn.execute exec
先翻译成中文意思
删除表aa中id字段的值。。这个值等于="&request.querystring("id")
还记得我们建立index.asp文件的时候吗？里面有段语句是这样的
<td width="32" ><a href="del.asp?id=<%=rs("id")%>">删除</a></td>
大家现在看明白了吧！你们这么聪明。。一定明白了。
我再补充说两句
当我们点击删除的时候。。。这个时候就会连接到del.asp做处理。。
而同时del.asp接收到我们的请求是通过"&request.querystring("id")这句语句
然后conn.execute exec 这条语句就执行删除。。
整个流程就是这样。。。
希望学习的人好好弄清楚。。那样我们才可以继续学习修改
（第5个小时）
现在学习数据的修改。 这是难点。。大家要认真的跟着我学。。
本人也是看了很久才学会的。。解释的不好多多包容。。
修改需要两个文件
（一）建立modify.asp 和del.asp很像似
代码如下：
CODE:
<!--#include file="conn.asp"-->
<%
exec="select * from aa where id="&request.querystring("id")
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>
<form name="form1" method="post" action="modifysave.asp">
<table width="748" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>name</td>
<td>content</td>
<td>title</td>
</tr>
<tr>
<td>
<input type="text" name="name" value="<%=rs("name")%>">
</td>
<td>
<input type="text" name="content" value="<%=rs("content")%>">
</td>
<td><input type="text" name="title" value="<%=rs("title")%>">
<input type="submit" name="Submit" value="提交">
<input type="hidden" name="id" value="<%=request.querystring("id")%>">
</td>
</tr>
</table>
</form>
<%
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
代码解释：
（1）
<%
exec="select * from aa where id="&request.querystring("id")
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
%>
这句exec="select * from aa where id="&request.querystring("id")我在del.asp里解释过了
在这里也是一样的道理
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1
上面是用recordset对象打开数据表。。。
（2）
<input type="text" name="name" value="<%=rs("name")%>">
这里要注意名字要对应。。否则或出错。。
<input type="hidden" name="id" value="<%=request.querystring("id")%>">
这里是隐藏表单。。。提交隐藏的表单元素会随着表单一起提交，用于传递变量
（二）建立modifysave.asp 文件
代码如下：
CODE:
<!--#include file="conn.asp"-->
<%
exec="select * from aa where id="&request.form("id")
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,3
%>
<%
rs("name")=request.form("name")
rs("content")=request.form("content")
rs("title")=request.form("title")
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
response.redirect"index.asp"
%>
代码解释：
（1）
rs("name")=request.form("name")
rs("content")=request.form("content")
rs("title")=request.form("title")
这三句话的意思是数据库中的rs("name")的值等于接收到request.form("name")的值
request.form("name")的值是从modify.asp传递来的。。
（2）
rs.update 这句语句是更新数据库里的信息的意思 就是把提交的信息上传到数据库
<!--#include file="conn.asp"-->
<%
'---------------删除-----------------------
if Request.Querystring("act")="del" then
sid=request.querystring("sid")
sql="delete from [books] where id="&sid
conn.execute sql
elseif Request.Querystring("act")="delall" then
sql="delete from [books]"
conn.execute sql
end if
'---------------显示-----------------------
set rs=server.CreateObject("adodb.recordset")
rs.open"select id,publish,name,price from [books] order by id desc",conn,3,1
if rs.eof then
Response.Write "配置出错"
Response.end
end if
Response.Write "<table border=""1""><tr><td>编号</td><td>书号</td><td>出版社</td><td>定价</td><td>操作<a href=""?act=delall"">删除所有(共有"&rs.RecordCount&"条)</a></td></tr>"
For i=1 to rs.RecordCount
StrID=rs("id")
StrPubLish=rs("publish")
StrName=rs("name")
StrPrice=rs("price")
Response.Write "<tr><td>"&StrID&"</td><td>"&StrPubLish&"</td><td>"&StrName&"</td><td>"&StrPrice&"</td><td><a href=""?act=del&sid="&StrID&""">删除</a></td></tr>"
rs.Movenext
if rs.EOF then Exit for
Next
Response.Write "</table>"
rs.close
set rs=nothing
%>
绛旓細1.strcon="provider=Microsoft.Jet.OLEDB.4.0;data source="strcon=strcon & Server.MapPath("messagebox.mdb")set myCon=Server.CreateObject("ADODB.Connection")myCon.Open strcon sql="insert into messagebox (imst,userid,touser,info)"sql=sql & "values('" & str_now & "','" & str...
绛旓細1銆ASP杩炴帴ACCESS鏁版嵁搴锛岃繛鎺ュ瓧绗︿覆鏄叧閿 2銆佽繛鎺ュ悗鎵цSQL璇彞 3銆佸叧闂暟鎹簱杩炴帴瀵硅薄 绀轰緥浠ｇ爜锛歞im Conn,strConn,strSQL strConn = Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("\db\myaccess.mdb")Set Conn = Server.CreateObject("ADODB.Connection")strSQL="insert ...
绛旓細Set conn = Server.CreateObject("ADODB.Connection")connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("newsdata.mdb")'杩欓噷娉ㄦ剰浣鐨璺緞锛屾澶勪负鍚岀洰褰曟椂鐨勬儏鍐 conn.Open connstr if error then '濡傛灉鏁版嵁搴杩炴帴鍑洪敊 error.clear '娓呴櫎鍑洪敊淇℃伅 response.write("鏁版嵁...
绛旓細conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("杩欓噷鍐欎笂鏁版嵁搴鐨勫湴鍧")set rs=server.CreateObject("adodb.recordset")sel="insert into 琛ㄥ悕(杩欓噷鍐欎笂瀛楁鍚嶏紝濡傛灉鏄涓敤鈥,鈥濆垎鍓) value(瀛楁瀵瑰簲鐨勫)"rs.open sel,conn ...
绛旓細鍦ˋSP.NET鏈変袱绉嶆柟娉曡繛鎺ACCESS鏁版嵁搴銆傚叿浣撴搷浣滃涓:绗竴绉嶆柟娉曟槸鐪熺殑鎷変竴涓帶浠讹紝姣斿GridView鍜孌ataList锛屽湪璁捐椤甸潰涓婏紝鐐瑰嚮鍙充笂瑙掔殑涓夎褰㈡柊寤轰竴涓暟鎹簮锛屽湪寮瑰嚭鐨勫璇濇涓夋嫨鏁版嵁搴擄紝鏂板缓涓涓繛鎺ワ紝鍦ㄦ坊鍔犺繛鎺ュ璇濇鐨勬洿鏀逛腑閫夋嫨Access鏁版嵁搴锛岀劧鍚庡湪娴忚涓夋嫨浣鐨鏁版嵁搴撱傚鏋滄祴璇曟垚鍔燂紝涓嬩竴姝...
绛旓細asp瀵筧ccess鏁版嵁搴撲腑鏁版嵁鐨勬坊鍔犮佷慨鏀广佸垹闄(宸叉祴璇 1:棣栧厛寤虹珛涓涓猘ccess鏁版嵁搴撲繚瀛樹负 xhnew.mdb 琛ㄥ悕涓篴a 瀛楁濡備笅: id 鑷姩鎺掑簭 name 鏂囨湰 content 鏂囨湰 xhtime 鏃ユ湡 榛樿鍊 now() title 鏂囨湰 2:鎵撳紑DW 寤虹珛鏂囦欢conn.asp鏂囦欢 浠ｇ爜濡備笅: 绋嬪簭浠ｇ爜 <% set conn=server.createobject("adodb.connection") con...
绛旓細asp杩炴帴access鏁版嵁搴鐨勬柟娉曪細1銆佽缃暟鎹簱杩炴帴鏂瑰紡锛歴et dbconnection=Server.CreateObject("ADODB.Connection")DBPath = Server.MapPath("customer.mdb")dbconnection.Open "provider=microsoft.jet.oledb.4.0;data source="&dbpath SQL="select * from auth where id='" & user_id &"'"SET uplist...
绛旓細conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("data.mdb")鏂规硶2锛歋et conn = Server.CreateObject("ADODB.Connection")conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("data.mdb")娉ㄦ剰锛氫竴涓〉闈腑锛屽彧瑕佽繛鎺ヤ竴娆″氨鍙互浜嗭紝鏁版嵁搴浣跨敤...
绛旓細SERVER鏁版嵁搴撹繘琛屽垹闄ゆ槸鐢細"delete user where id=10".4.鏃ユ湡鍑芥暟涓嶇浉鍚岋紝鍦瀵笰CCESS鏁版嵁搴澶勭悊涓紝鍙敤date()銆乼ime()绛夊嚱鏁帮紝浣嗗SQL SERVER鏁版嵁搴撳鐞嗕腑锛屽彧鑳界敤datediff,dateadd绛夊嚱鏁帮紝鑰屼笉鑳界敤date()銆乼ime()绛夊嚱鏁般5.鍦ㄥACCESS鏁版嵁搴撳鐞嗕腑,sql璇彞涓洿鎺ュ彲浠ョ敤涓浜沄B鐨鍑芥暟锛屽儚cstr()...
绛旓細Conn.Open "Provider=Microsoft.Jet.Oledb.4.0;DataSource="&Server.MapPath("璺緞/鏁版嵁搴.mdb")鐒跺悗灏卞彲浠ユ搷浣鏁版嵁搴撶殑鏌ヨ 淇敼 娣诲姞 鏇存柊绛 濡傦細sql="select * from 琛"set rs=server.creatObject("adodb.recordset")rs.open sql,conn,1,1 do while not rs.eof response.write rs(0)&"br...
