userdel.asp

来自「本学期要实讯」· ASP 代码 · 共 69 行

ASP
69
字号
<!--#include file="odbc_connection.asp"-->

<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
.style3 {font-size: 12px; color: #666666; }
.style4 {font-size: 12px; color: #666666; font-weight: bold; }
-->
</style>
<link href="css/css2.css" rel="stylesheet" type="text/css">
<% dim make
make=request("make")
user=session("user")
if make="del" then                 
Response.Buffer=True
Sql="Delete From userinfo where user='"&user&"'" 
db.Execute(Sql)  
sqla="delete from message where userid='"&user&"'"
db.execute(sqla)
Sqlb="insert into userinfo(user) values('"&user&"')"
db.Execute(Sqlb)%>
<table width="422" height="118" border="0" cellpadding="4" cellspacing="0">
  <tr>
    <td height="35">&nbsp;</td>
  </tr>
  <tr>
    <td height="83" class="a1"><span class="style3">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 你的信息已经删除成功!<br>
          <br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 可以重新进行登记:<a href='user_info.asp' target='main'>返回重新登记</a></span></td>
  </tr>
</table>
<%else%>
<%dim rs,sqlstr
 user=session("user")
 sqlstr="select * from userinfo where user='"&user&"'"
 set rs=db.execute(sqlstr)%>
<%if rs("age")<>0 then%>
<table width="422" height="118" border="0" cellpadding="4" cellspacing="0">
  <tr>
    <td height="35">&nbsp;</td>
  </tr>
  <tr>
    <td height="83" class="a1"><span class="style3">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 你的个人求职信息删除后将不能恢复!
        <br>
      <br>
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 如果真的要删除:<a href="userdel.asp?make=del">确定</a></span></td>
  </tr>
</table>
<%else%>
<table width="422" height="98" border="0" cellpadding="4" cellspacing="0">
  <tr>
    <td height="35">&nbsp;</td>
  </tr>
  <tr>
    <td height="63"><span class="style3">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 对不起,没有你要删除的内容!你还没有进行个人登记! </span></td>
  </tr>
</table>

<%end if%>
<%end if%>

</body>
</html>

⌨️ 快捷键说明

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