📄 indictinfo.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="Cookies.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>投诉信息</title>
<style type="text/css">
<!--
.style1 {color: #0000FF}
-->
</style>
</head>
<%
if request("xingxing")="yes" then
call indictback()
response.end
end if
%>
<body>
<%
dim rs,us
indict_id=request.QueryString("indict_id")
set rs=server.CreateObject("adodb.recordset")
set user=server.CreateObject("adodb.recordset")
us="select * From indict where indict_id="&indict_id
rs.Open us,conn,1
us="select email From user where user_id=" & rs("pub_id")
user.open us,conn,1
%>
<form name="indict_Form" action="indictinfo.asp?xingxing=yes&indict_id=<%=rs("indict_id")%>" method="post">
<div align="center">
<p>
<h1 class="style1">投诉信息</h1>
</p>
<table width="436" height="449" border="1" bordercolor="#FF0000" bgcolor="#CCCC99">
<tr>
<th width="126" height="34" scope="row"><p class="style4">投诉ID号</p> </th>
<td width="294"><input type="text" name="id" height="20" value="<%=rs("indict_id")%>" disabled></td>
</tr>
<tr>
<th height="24" scope="row"><span class="style4"> 投诉人姓名</span></th>
<td><input type="text" name="textfield9"height="20" value="<%=rs("pub_name")%>" disabled></td>
</tr>
<tr>
<th height="29" scope="row">投诉人ID号</th>
<td scope="row"><input type="text" name="textfield8"height="20" value="<%=rs("pub_id")%>" disabled></td>
</tr>
<tr>
<th height="29" scope="row">是否被受理</th>
<td><input type="text" name="textfield3"height="20" value="<%=rs("isaccept")%>" disabled></td>
</tr>
<tr>
<th height="30" scope="row">投诉日期</th>
<td><input type="text" name="textfield4"height="20" value="<%=rs("pub_date")%>" disabled></td>
</tr>
<tr>
<th height="129" scope="row"><div align="center">投诉内容</div></th>
<td><textarea name="textfield7" cols="40" rows="8" height="20" disabled><%=rs("indict")%> </textarea></td>
</tr>
<tr>
<th height="124" scope="row">回复内容</th>
<td><textarea name="backbody" cols="40" rows="8"></textarea></td>
</tr>
<tr>
<th height="27" scope="row">用户Email</th>
<td><input type="text" name="email" height="20" value="<%=user(0)%>" disabled></td>
</tr>
</table>
</div>
<table width="757" height="43" border="0">
<tr>
<th width="369" scope="col"> </th>
<th width="98" scope="col"><input type="submit" name="Submit" value="回复" ></th>
<th width="69" scope="col"><input type="submit" name="Submit2" value="删除"></th>
<th width="203" scope="col"> </th>
</tr>
</table>
</form>
<%
rs.close
user.close
set rs=nothing
set user=nothing
closedb
%>
</body>
</html>
<%
sub indictback()
id=request("indict_id")
'dim Jmail
'Set Jmail=Server.CreateObject("Jmail.Message")
'Jmail.AddRecipient Request("email")
'Jmail.From ="chenyaoshun@163.com"
'Jmail.Subject ="你好，我们是星星二手市场管理员"
'Jmail.Body = Request("backbody")
'Jmail.send("smtp.163.com") '执行发送
'Jmail.Close
sql="update indict set isaccept=true where indict_id="& id
conn.execute(sql)
response.write "<li>回复信息成功。"
response.write "<meta http-equiv=refresh content=""1;URL=indict_manage.asp"">"
end sub
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -