📄 hfmsg.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../inc/adconn.asp"-->
<!--#include file="../css.asp"-->
<% set rs=server.CreateObject("adodb.recordset") %>
<%
if session("admin_name")="" then
response.end
end if%>
<body>
<%rs.open "select * from guestbook where id="& request.QueryString("id"),conn,1,1
jto=trim(rs("g_email"))
jcontent="您好:"& trim(rs("g_name")) & vbcrlf &vbcrlf&vbcrlf&vbcrlf
jcontent2="----------------您的留言如下----------------------"&vbcrlf& rs("g_msg")
rs.close
rs.open "select top 1 * from server ",conn,1,1
jfrom=trim(rs("jfrom"))
jpass=trim(rs("jpass"))
jserver=trim(rs("jserver"))
rs.close%>
<table width=100% border=0 cellpadding=4 cellspacing=0 class="tableBorder">
<form method="post" action="sendmail.asp">
<tr bgcolor="#ddfcdc">
<td colspan="4" align="center" class="tdtitle" style="color: #FF0000">请确保您的服务器支持Jmail组件,否则不能正常回复!</td>
</tr>
<tr>
<td width="13%"> </td>
<td width="34%"><input name="id" type="hidden" id="id" value="<%=request.QueryString("id")%>"></td>
<td width="15%">发件人邮件:</td>
<td width="38%"><input name="jfrom" type="text" id="jfrom" value="<%=jfrom%>"></td>
</tr>
<tr>
<td>收件人邮件:</td>
<td><input name="jto" type="text" id="jto" value="<%=jto%>"></td>
<td>发件人邮件密码:</td>
<td><input name="jpass" type="password" id="jpass" value="<%=jpass%>"></td>
</tr>
<tr>
<td>标题:</td>
<td><input name="jtitle" type="text" id="jtitle"></td>
<td>发件服务器:</td>
<td><input name="jserver" type="text" id="jserver" value="<%=jserver%>"></td>
</tr>
<tr>
<td> </td>
<td> </td>
<td>你的姓名:</td>
<td><input name="jname" type="text" id="jname" value="<%=Session("admin_name")%>"></td>
</tr>
<tr>
<td>回复内容:</td>
<td colspan="3"><textarea name="jcontent" cols="50" rows="10" id="textarea"><%=jcontent%></textarea></td>
</tr>
<tr>
<td>回复附加内容:</td>
<td colspan="3"><textarea name="jcontent2" cols="50" rows="10" id="jcontent2"><%=jcontent2%></textarea></td>
</tr>
<tr align="center">
<td colspan="4"><input type="submit" name="Submit" value=" 寄 出 "></td>
</tr>
<tr bgcolor="#ddfcdc">
<td colspan="4" class="tdtitle"> </td>
</tr></form>
</table>
</body>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -