asp删除程序,表面看删除成功,但数据库中还有,怎么办?

来源:百度知道 编辑:UC知道 时间:2024/05/28 05:52:56
有段asp程序,是用来删除数据库的,运行时提示删除成功,但是数据库中还存在,该怎么改程序?
代码如下
<%
name1=request("text1")
sex=request("sell")
borndate=request("text2")
phone=request("text3")
policy=request("text4")
address=request("text5")
company=request("text6")
Email=request("text7")
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;"&"Data Source="&Server.MapPath("classmate.mdb")
Conn.Open
set rs=server.createobject("adodb.recordset")
set rs1=server.createobject("adodb.recordset")
sql="select*from classmate where 姓名='"&name1&"'"
del="delete * from classmate where 姓名='"&name1&"'"
%>
<script language="vbscript">
alert("信息删除成功!!!

你给的代码根本就没有执行删除这个命令嘛。
在这里加上一句:
del="delete * from classmate where 姓名='"&name1&"'"
rs.open del,conn,2,3
%>

嘎嘎 直接弹框了,没有判断
改好如下:
<%
name1=request("text1")
sex=request("sell")
borndate=request("text2")
phone=request("text3")
policy=request("text4")
address=request("text5")
company=request("text6")
Email=request("text7")
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;"&"Data Source="&Server.MapPath("classmate.mdb")
Conn.Open
set rs=server.createobject("adodb.recordset")
set rs1=server.createobject("adodb.recordset")
sql="select*from classmate where 姓名='"&name1&"'"
del="delete * from classmate where 姓名='"&name1