📄 delete.asp

📁 JSP页面和oracle9i数据库的源代码

💻 ASP

字号:

<%Response.Buffer=True%>
<!--#Include file="odbc_connection.asp"-->
<html>
<head>
	<title>删除成员</title>
</head>
<body background="08_05.jpg">
	<h2 align="center"><font color=black face="隶书" size=30>删除成员</font></h2>
	<p align="center"><font color=black  size=5>(请输入要删除的员工的用户名和密码)</font>

	<center>
	<form method="post" action="">
	<table border="0" width="90%" bgcolor="#E6E6E6">
		<tr>
			<td>姓名：</td><td><input type="text" name="name" size="20" >**</td>
		</tr>
		<tr>
			<td>密码：</td><td><input type="password" name="password" size="20">**</td>
		</tr><tr>
			<td></td><td><input type="submit" value=" 确 定 "></td>
		</tr>
	<table>
	</form>
	</center>
	<%
	'如果没有输入姓名和密码，就不执行下列语句
	If Trim(Request("name"))<>"" And Trim(Request("password"))<>"" Then
		'执行删除操作，删除匹配的记录
		Dim strSql
	strSql ="Delete From users Where name='" & Request("name") & "' And password='" & Request("password") & "'"
		'这里利用Execute方法的一个参数，用number返回该操作影响的记录数。
		Dim number
		db.Execute strSql,number
		If number=0 Then
			Response.Write "姓名或密码输入错误，找不到记录"
		Else
			Response.Write "<p align='center'>共有" & number & "条数据被删除"
		End If 
	End If
	%>
</body>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -