📄 khzl_zlsc_1.asp

📁 asp+Access开发的客户资源管理系统,用户名:admin,密码:

💻 ASP

字号:

%>
<%
const adopenkeyset=1
const adlockoptimistic=3
set conn=server.createobject("adodb.connection")
	conn.open "driver={Microsoft Access Driver (*.mdb)};pwd=webcool_2000;dbq=" & Server.MapPath("../database/customer.mdb")
set rs=server.createobject("adodb.recordset")
source="select * from guest where name='"&request("name")&"'"
rs.open source,conn, adopenkeyset,adlockoptimistic

rs.delete

if err.number>0 then
   response.write"数据删除时发生错误<br>"
   response.write"错误代码："&err.number
   response.write"<br>代码说明："&err.description
else
   response.redirect "khzl_zlsc.asp"
end if
set conn=nothing
%>

<html><script language="JavaScript">                                                                  </script></html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -