📄 preview.asp
字号:
<!--#include file="Connections/connY.asp" -->
<!--#include file="Inc/Info.asp" -->
<!--#include file="Inc/TimeFormat.asp" -->
<!--#include file="Inc/UBBCode.asp" -->
<!--#include file="Inc/SetCss.asp" -->
<%
If Cint(Session("SLevel"))=0 Then Response.Redirect "Error.asp?Error=5"
I=LiannCheckBadWord(Request.Form("ToWho"))
Title=Request.Form("Title")
Content=Request.Form("Content")
PostTime=Request.Form("PostTime")
BW=Split(Forum_BadWords,"|")
For M = 0 To UBound(BW)
Content=Replace(Content,BW(M),String(Len(BW(M)),"*"), 1,-1,1)
Next
For M = 0 To UBound(BW)
Title=Replace(Title,BW(M),String(Len(BW(M)),"*"), 1,-1,1)
Next
Mood=Request.Form("Mood")
If Title="" Or Content="" Then Response.Redirect "Error.asp?Error=7"
Set rsUser = Server.CreateObject("ADODB.Recordset")
Sql = "Select * From tUserManage Where rNickName='"&I&"'"
rsUser.Open Sql,ConnY,3,3
If rsUser.Eof And rsUser.Bof Then Response.Redirect "Error.asp?Error=9"
State="在社区信箱预览信件"
%>
<html>
<head>
<title><%=Forum_Title%></title>
<meta http-equiv="Content-Type" content="text/html;">
<meta http-equiv="Expires" CONTENT="0">
<meta http-equiv="Cache-Control" CONTENT="no-cache">
<meta http-equiv="Pragma" CONTENT="no-cache">
<!--#include file="Inc/Css.asp" -->
<script language=Javascript src="Js/Menu.Js"></script>
<script language=Javascript src="Js/Button.Js"></script>
<script language=Javascript src="Js/Operate.Js"></script>
</head>
<body leftmargin="0" topmargin="0" bgcolor="<%=Forum_ColorList_BgColor%>" vlink="<%=Forum_Css_A_Link_Color%>" onkeydown='if(event.keyCode==13 && event.ctrlKey && !document.form1.Submit.disabled){form1.submit();document.form1.Submit.disabled=true;}'>
<!--#include file="Inc/Top.asp" -->
<table width="<%=Forum_Width%>" border="0" cellspacing="1" cellpadding="0" align="center" bgcolor="<%=Forum_ColorList_BorderColor%>">
<tr bgcolor="<%=Forum_ColorList_BgColor%>">
<td height="20">
<table width="100%" border="0" cellspacing="0" cellpadding="0" class="font">
<tr>
<td> 您所在的位置： <a href="../" onFocus="this.blur()">首页</a> >>
<a href="List.asp" onFocus="this.blur()">讨论组</a> >> <a href="Mail.asp" onFocus="this.blur()">社区信箱</a>
>> <font color="<%=Forum_ColorList_NavFontColor%>">预览信件</font></td>
<td width="150"></td>
<td width="18">
<div align="center"><img src="<%=Forum_Pic_Open%>" width="15" height="14" border="0" alt="显示个人工具箱" onClick="ShowInfo()" style="CURSOR: hand" id=infoimage align="texttop"></div>
</td>
</tr>
</table>
</td>
</tr>
</table>
<table width="<%=Forum_Width%>" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td height=1></td>
</tr>
</table>
<table width="<%=Forum_Width%>" border="0" cellspacing="1" cellpadding="0" align="center" id=info style="DISPLAY: none" bgcolor="<%=Forum_ColorList_BorderColor%>">
<tr>
<td valign="top" bgcolor="<%=Forum_ColorList_BgColor%>">
<!--#include file="Inc/Tools.asp" -->
</td>
</tr>
</table>
<table width="<%=Forum_Width%>" border="0" cellspacing="0" cellpadding="0" align="center" id=infoborder style="DISPLAY: none">
<tr>
<td height=1></td>
</tr>
</table>
<table width="<%=Forum_Width%>" border="0" cellspacing="1" cellpadding="0" align="center" bgcolor="<%=Forum_ColorList_BorderColor%>">
<tr>
<td bgcolor="<%=Forum_ColorList_TitleColor%>">
<table width="100%" border="0" cellspacing="0" cellpadding="0" class="font">
<tr>
<td height="22">
<div align="center"><%=CovHtml(Title)%></div>
</td>
<td height="17" width="20">
<div align="center"><img src="Images/Mood/<%=Request("Mood")%>.gif" width="15" height="15" align="absmiddle"></div>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td bgcolor="<%=Forum_ColorList_BgColor%>">
<table width="100%" border="0" cellspacing="4" cellpadding="0" class="font">
<tr>
<td valign="top">To:<%=I%><br>
<br>
</td>
</tr>
<tr>
<td valign="top"> <%=UBB(Content)%></td>
</tr>
<tr>
<td valign="bottom" height="40">
<div align="right">From:<%=Session("SNickName")%><br>
<%=PostTime%> </div>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<form name="form1" method="post" action="PostAction.asp">
<td bgcolor="<%=Forum_ColorList_BgColor%>" height="30">
<div align="center">
<input type="submit" name="SendMail" value="写好了,立即发送" class="button_none" onFocus="this.blur()">
<input type="button" name="ModifyMail" value="不行,我要再改改" class="button_none" onFocus="this.blur()" onClick=history.go(-1)>
<input type="hidden" name="ToWho" value="<%=Request.Form("ToWho")%>">
<input type="hidden" name="Poster" value="<%=Session("SNickName")%>">
<input type="hidden" name="Mood" value="<%=Mood%>">
<input type="hidden" name="Content" value="<%=Content%>">
<input type="hidden" name="Title" value="<%=Title%>">
<input type="hidden" name="SendTime" value="<%=PostTime%>">
</div>
</td>
</form>
</tr>
</table>
<table width="<%=Forum_Width%>" border="0" cellspacing="0" cellpadding="0" align="center" id=onlineborder>
<tr>
<td height=1></td>
</tr>
</table>
<table width="<%=Forum_Width%>" border="0" cellspacing="1" cellpadding="1" align="center" bgcolor="<%=Forum_ColorList_BorderColor%>" id=online>
<tr>
<td valign="top" bgcolor="<%=Forum_ColorList_OnlineColor%>">
<!--#include file="Inc/Online.asp" -->
</td>
</tr>
</table>
<!--#include file="Inc/Bottom.asp" -->
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -