📄 deldata.asp
字号:
<!--#include file="../config.ini" -->
<!--#include file="../commfunction.inc" -->
<%
if request.Form("password")<>"" then
set conn=server.CreateObject("adodb.connection")
conn.Open connstring
set rs=conn.execute("select loginid from usertable where loginid='"&session("loginid")&"' and password='"&request("password")&"'")
if not rs.eof then
conn.execute("delete from deal")
conn.execute("delete from delivery")
conn.execute("delete from event")
conn.execute("delete from expense")
conn.execute("delete from [order]")
conn.execute("delete from po")
conn.execute("delete from quote")
conn.execute("delete from collection")
conn.execute("delete from POreceive")
conn.execute("delete from invoice")
conn.execute("delete from orderpayment")
conn.execute("delete from POPayment")
conn.execute("delete from materialtransaction")
conn.execute("delete from Schedule")
conn.execute("delete from product_location")
str=("清除成功!")
else
str=("密码错误!")
end if
conn.Close
set conn=nothing
end if
%>
<html>
<head>
<LINK href="../global.css" rel=STYLESHEET type=text/css>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>清空数据</title>
</head>
<script language=javascript>
window.top.frames (1).document.location='../admin/left.asp?type=system';
</script>
<body vlink="#48576C" link="#48576C" alink="#000000" bgcolor="#FFFFFF" topmargin="3">
<table width="100%" height="30" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="25"><strong><font class=title>清空数据</font></strong></td>
</tr>
<tr >
<td height="16" colspan="2" background="../images/title.gif"> </td>
</tr>
<tr>
<td height=4></td>
</tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#DECFAD">
<tr bgcolor="#FFFFFF">
<td width="20%" height="20"> <div align="left"> <br>
将会删除日程，事件，销售机会，报价，合同，发货单，应收帐款，采购，收货单，应付帐款，库存。<br>
<form name="form1" method="post" action="">
密码:
<input name="password" type="password" size="12" >
<input type="submit" name="Submit" value="确定">
</form>
</div>
<%
if str<>"" then
response.Write("<font color=red> "&str&"</font>")
end if
%>
</td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -