📄 usererror.asp
字号:
<!--#include file="inc/userconn.inc"-->
<script language="JavaScript">
function CheckForm()
{
if (document.usererror.username.value.length == 0) {
alert("请输入您的帐号.");
document.usererror.username.focus();
return false;
}
if (document.usererror.inBillNo.value.length == 0) {
alert("请输入您要申诉的订单号.");
document.usererror.inBillNo.focus();
return false;
}
return true;
}
</script>
<html>
<head>
<title>客户自助服务</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="inc/guhongying.css">
</head>
<body bgcolor="7C96B8" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" border="0" cellspacing="1" cellpadding="2" bgcolor="#000000" vspace="0" hspace="0">
<tr>
<td bgcolor="#316395" height="27"><font color="#FFFFFF">.:: 用户自助申诉</font></td>
</tr>
</table>
<table height="50" align="center">
<tr>
<td></td>
</tr>
</table>
<%if request("ok")="" then%>
<form name="usererror" action="usererror.asp" method="POST" onSubmit="return CheckForm();">
<table width="50%" border="0" cellspacing="1" cellpadding="6" bgcolor="#000000" align="center">
<tr align="center" bgcolor="316395">
<td colspan="2">
<div align="left"><font color="#FFFFFF"><b>如果您的订单没有被处理可以在这里申诉: </b></font></div>
</td>
</tr>
<tr bgcolor="eeeeee">
<td width="260" align="right">您的帐号:</td>
<td width="408">
<input type="text" name="username" >
</td>
</tr>
<tr bgcolor="#6699CC">
<td width="260" align="right"><font color="#FFFFFF">未被受理的订单号:</font></td>
<td width="408">
<input type="password" name="inBillNo">
</td>
</tr>
<tr align="center" bgcolor="eeeeee">
<td colspan="2">
<input type="hidden" name="usererror" value="True">
<input type="submit" name="Submit" value="确 定">
<input type="reset" name="Submit2" value="清 除">
</td>
</tr>
</table>
<%else%>
<table width="50%" border="0" cellspacing="1" cellpadding="6" bgcolor="#000000" align="center">
<tr align="center" bgcolor="316395">
<td colspan="2">
<div align="left"><font color="#FFFFFF"><b>您已经申诉完毕: </b></font></div>
</td>
</tr>
<tr align="center" bgcolor="eeeeee">
<td colspan="2"> 您已经对您的订单提起申诉，<br><br>我们将会在第一时间对您的申诉做出反应。<br><br>
再次感谢您选择我们的服务，如果还有任何疑问<br><br>请至信：<a href="mailto:user@transcendinfo.com">user@transcendinfo.com</a>
</td>
</tr>
</table>
<%end if%>
</form>
</body>
</html>
<%
if request("usererror")="" then response.end
inBillNo=request("inBillNo")
username=request("username")
inBillNo=replace(inBillNo,",","")
Username=replace(Username,"'","")
'交易日期，格式：YYYYMMDD
yy=year(date)
mm=right("00"&month(date),2)
dd=right("00"&day(date),2)
riqi=yy & "-" & mm & "-" & dd
'开始向数据库写入数据，并检测是否已有此订单号是否已被申诉
set rs1 = Server.CreateObject("ADODB.Recordset")
sql1 = "SELECT * from orders where username= '" & username & "' and inBillNo='"&inBillNo&"'"
rs1.open sql1,conn,1,1
if rs1.bof or rs1.eof then
response.redirect "error.asp?error=010"
end if
set rs = Server.CreateObject("ADODB.Recordset")
sql = "SELECT * FROM usererror where inBillNo= '" & inBillNo & "'"
rs.open sql,conn,1,1
if not (rs.Bof or rs.eof) then
rs.Close()
response.redirect "error.asp?error=009"
else
sql="insert into usererror(username,inBillNo,sdate) values ('"&username&"','"&inBillNo&"','"&riqi&"')"
conn.Execute(sql)
response.redirect "usererror.asp?ok=ok"
end if
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -