ASP+ACCESS 删除数据库记录问题! - ASP技术论坛

问题点数：0 回复次数：6

ASP+ACCESS 删除数据库记录问题!

del.asp 代码如下:
---------------------------------------------------------------
<%

Dim connstr

connstr="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("data.mdb")
Set conn=Server.CreateObject("Adodb.Connection")
conn.Open connstr

Set rs=server.Createobject("Adodb.recordset")

SQL="Select * From infor"
rs.open sql,conn,1,3

rs.delete
rs.update

rs.Close
Set rs=Nothing
conn.Close
Set conn=Nothing

%>

<html>
    <center>
        <body>
            <a href="list.asp">返回</a>
        </body>
    </center>
<html>
-------------------------------------------------------------
问题是这样可以删除 ACCESS 表 infor 中的记录, 但是它只能按照从上到下的顺序删除.
从上到下就是按照写入数据库的时间顺序删除.
我的想法是选择删除哪个就得删除哪个, 但不知道该怎么做.
哪位高手会的帮下忙了.

第 2 楼

得分:0

<%

Dim connstr
Dim userName

connstr="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("data.mdb")
Set conn=Server.CreateObject("Adodb.Connection")
conn.Open connstr

Set rs=Server.Createobject("Adodb.Recordset")

userName=Request.QueryString("txtUser")

SQL="Select * From infor where username='"& txtUser &"' "
rs.open sql,conn,1,3

rs.delete
rs.update

rs.Close
Set rs=Nothing
conn.Close
Set conn=Nothing

%>
是这样吗???
刚开始做ASP.. 还不太明白.
Dim userName
userName=request.QueryString("txtUser")
这段代码是不是返回值, 然后根据这个返回的值在数据库里进行选择删除啊???

[[it] 本帖最后由 riospark 于 2008-11-26 17:28 编辑 [/it]]

第 3 楼

得分:0

但是运行后是同样的效果.. 呵呵.. 真郁闷啊..

第 4 楼

得分:0

还是不行呀...

第 5 楼

得分:0

del.asp源码 .. 斑竹帮忙看看撒..
<%

Dim connstr
Dim id

connstr="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("data.mdb")
Set conn=Server.CreateObject("Adodb.Connection")
conn.Open connstr

Set rs=Server.Createobject("Adodb.Recordset")

id=Request.QueryString("txtID")

SQL="Delete From infor where id='"& id &"' "

conn.Execute(SQL)
rs.update

rs.Close
Set rs=Nothing
conn.Close
Set conn=Nothing

%>

<html>
    <center>
        <body>
            <a href="list.asp">返回</a>
        </body>
    </center>
</html>

错误类型：
Microsoft JET Database Engine (0x80040E10)
至少一个参数没有被指定值。
/del.asp, 第 22 行

第 22 行就是这个..conn.Execute(SQL)

第 6 楼

得分:0

没有id这个字段.. 自动编号的字段名为 txtID ..
-----------------------------------------------------
删除连接的那个页面里的代码是
<a href="del.asp?id=<%=rs("txtID")%>">删除</a>

把del.asp的代码要改成
txtID=Request.QueryString("txtID")
SQL="Delete From infor where txtID="&txtID
----------------------------------------------------
然后错误提示是
语法错误 (操作符丢失) 在查询表达式 'txtID=' 中。
/del.asp, 第 22 行

操作符丢失是说值没有传过来吗?

第 7 楼

得分:0

问题已解决: 关键的几个代码如下
----------list.asp 中的删除记录超连接------------
<a href="del.asp?txtID=<%=rs("txtID")%>">删除</a>
-------------------------------------------------

--------del.asp 中的传值代码和数据库语句---------
txtID=Request.QueryString("txtID")
SQL="Delete From infor where txtID="&txtID
-------------------------------------------------
数据表 infor 中的自动编号字段名为 txtID

这样就一切搞定了..

非常感谢楼上给予答复和意见的各位朋友..