deluser.asp

来自「我的课程设计」· ASP 代码 · 共 23 行

ASP
23
字号
<html>
<!--#include file="ADOFunctions.asp"-->
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>
<link rel="stylesheet" href="css/admin.css" type="text/css">
</head>
<%
     Dim rs1,strsql,bookno
	 cardno1=request.QueryString("id")
	 strsql="Select * From borrowers Where cardno='" & cardno1 & "'"
	 set rs=GetSQLRecordset(strsql,"book.mdb","borrowers")
     rs.Delete
     rs.update
	 rs.update
	 rs.close
	 set rs=nothing
	 
	 response.Write("此用户删除成功!")
	 %>
	 
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?