📄 edit.asp
字号:
<!--#include file="Connections/connY.asp" -->
<!--#include file="Inc/Info.asp" -->
<!--#include file="Inc/Set.asp" -->
<!--#include file="Inc/TimeFormat.asp" -->
<!--#include file="Inc/UBBCode.asp" -->
<!--#include file="Inc/Level0.asp" -->
<%
State="在"&Forum_TypeName&"之"&Forum_Name&"版面编辑文章"
'取得文章参数
I=Request.QueryString("I")
Set rsArticle = Server.CreateObject("ADODB.Recordset")
Sql = "Select * From tArticleManage Where rID="&I
rsArticle.Open Sql,ConnY,3,3
If rsArticle.Eof And rsArticle.Bof Then Response.Redirect "Error.asp?Error=3"
'判断用户权限
If Session("SUserID")<>rsArticle("rPoster") Then
If Session("SLevel")=1 Then Response.Redirect "Error.asp?Error=5"
If Session("SLevel")=2 Then
Set rsHost = Server.CreateObject("ADODB.Recordset")
Sql = "Select * From tUserManage Where rUserID='"&Session("SUserID")&"'"
rsHost.Open Sql,ConnY,3,3
If rsHost("rHost")<>rsArticle("rSubject") Then Response.Redirect "Error.asp?Error=11"
rsHost.Close
Set rsHost=Nothing
End If
End If
%>
<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_BgColor%>" vlink="<%=Forum_Css_A_Link_Color%>" onLoad="MM_preloadImages('<%=Forum_Pic_Write2%>','<%=Forum_Pic_Vote2%>','MM_callJS','form1.Title.focus()')" onkeydown='if(event.keyCode==13 && event.ctrlKey){form1.submit();}'>
<!--#include file="Inc/Top.asp" -->
<table width="<%=Forum_Width%>" border="0" cellspacing="1" cellpadding="0" align="center" bgcolor="<%=Forum_BorderColor%>">
<tr>
<td height="20" bgcolor="<%=Forum_BgColor%>">
<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="List.asp?T=<%=Forum_TypeID%>" onFocus="this.blur()"><%=Forum_TypeName%></a>
>> <a href="Board.asp?S=<%=Forum_ID%>" onFocus="this.blur()"><%=Forum_Name%></a>
>> <font color="<%=Forum_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="1" align="center" id=info style="DISPLAY: none" bgcolor="<%=Forum_BorderColor%>">
<tr>
<td valign="top" bgcolor="<%=Forum_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="2" align="center" bgcolor="<%=Forum_BorderColor%>" class="font">
<form Action="EditAction.asp" Method="POST" Name="form1" onsubmit="return vdf('Title','标题','R','Content','内容','R','Assets','浏览支付','NinRange0:<%=Forum_Expensive%>');">
<tr bgcolor="<%=Forum_BroadColor%>">
<td colspan="2">
<table width="100%" border="0" cellspacing="0" cellpadding="1" class="font">
<tr>
<td width="30"><img src="<%=Forum_Pic_Announce%>" width="20" height="16"></td>
<td>
<!--#include file="Inc/Broadcast.asp" -->
</td>
<td width="170">
<div align="right"><a href="Write.asp?S=<%=Forum_ID%>" onFocus="this.blur()" onClick="MM_nbGroup('down','group1','WriteArticle','<%=Forum_Pic_Write2%>',1)" onMouseOut="MM_nbGroup('out')" onMouseOver="MM_nbGroup('over','WriteArticle','<%=Forum_Pic_Write2%>','<%=Forum_Pic_Write2%>',1)"><img src="<%=Forum_Pic_Write1%>" width="80" height="20" border="0" align="absmiddle" name="WriteArticle"></a>
<a href="Vote.asp?S=<%=Forum_ID%>" onFocus="this.blur()" onClick="MM_nbGroup('down','group1','Vote','<%=Forum_Pic_Vote2%>',1)" onMouseOut="MM_nbGroup('out')" onMouseOver="MM_nbGroup('over','Vote','<%=Forum_Pic_Vote2%>','<%=Forum_Pic_Vote2%>',1)"><img src="<%=Forum_Pic_Vote1%>" width="80" height="20" border="0" align="absmiddle" name="Vote"></a></div>
</td>
</tr>
</table>
</td>
</tr>
<tr bgcolor="<%=Forum_AlternateColor1%>">
<td height="20" colspan="2"><font color="<%=Forum_PFontColor%>">*</font>为必填,支持UBB代码,已屏蔽HTML,允许上传,上传文件类型限制请参考[<a href="Help.asp?T=1" onFocus="this.blur()">上传说明</a>],文件大小限<%=Forum_Limit%>kb,支持贴图标签.</td>
</tr>
<tr>
<td width="20%" height="20" bgcolor="<%=Forum_AlternateColor1%>" class="font">
<div align="center">标 题</div>
</td>
<td height="20" class="font" bgcolor="<%=Forum_AlternateColor2%>">
<table width="100%" border="0" cellspacing="4" cellpadding="0" class="font">
<tr>
<td>
<input type="text" name="Title" class="Textfiled" size="52" value="<%=rsArticle("rTitle")%>">
<select name=select onChange=DoTitle(this.options[this.selectedIndex].value) class="Textfiled" onFocus="this.blur()">
<option selected value="" onFocus="this.blur()">选择话题</option>
<option value=[原创] onFocus="this.blur()">[原创]</option>
<option value=[转帖] onFocus="this.blur()">[转帖]</option>
<option value=[灌水] onFocus="this.blur()">[灌水]</option>
<option value=[讨论] onFocus="this.blur()">[讨论]</option>
<option value=[求助] onFocus="this.blur()">[求助]</option>
<option value=[推荐] onFocus="this.blur()">[推荐]</option>
<option value=[公告] onFocus="this.blur()">[公告]</option>
<option value=[注意] onFocus="this.blur()">[注意]</option>
<option value=[贴图] onFocus="this.blur()">[贴图]</option>
<option value=[建议] onFocus="this.blur()">[建议]</option>
<option value=[下载] onFocus="this.blur()">[下载]</option>
<option value=[分享] onFocus="this.blur()">[分享]</option>
</select>
<font color="#<%=Forum_PFontColor%>">*</font>不得超过50个汉字
<input type="hidden" name="I" value="<%=rsArticle("rID")%>">
<input type="hidden" name="S" value="<%=Forum_ID%>">
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="20%" height="20" bgcolor="<%=Forum_AlternateColor1%>" class="tdfont">
<div align="center">心 情</div>
</td>
<td height="20" class="font" bgcolor="<%=Forum_AlternateColor2%>">
<table width="100%" border="0" cellspacing="4" cellpadding="0" class="font">
<tr>
<td>
<%
Dim J
J=1
While J<=16
Response.Write "<input type='radio' name='Mood' value='"&J&"' onFocus='this.blur()'"
If rsArticle("rEmotion")=J Then Response.Write "checked"
Response.Write ">"
Response.Write " <img src='Images/Mood/"&J&".Gif' width='15' height='15'> "
If J Mod 8 = 0 Then Response.Write "<br>"
J=J+1
Wend
%>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="20%" height="20" valign="middle" bgcolor="<%=Forum_AlternateColor1%>" class="font">
<div align="center">内 容</div>
</td>
<td height="20" class="font" bgcolor="<%=Forum_AlternateColor2%>">
<table width="100%" border="0" cellspacing="4" cellpadding="0" class="font">
<tr>
<td>
<!--#include file="Inc/ToolsBar.asp" -->
<br>
<textarea name="Content" cols="80" rows="12" style="BACKGROUND-COLOR:<%=Forum_Css_Textfiled1_BackGroundColor%>; BORDER-BOTTOM: 1px inset SOLID <%=Forum_Css_Textfiled1_BorderColor%>;BORDER-LEFT: 1px inset SOLID <%=Forum_Css_Textfiled1_BorderColor%>; BORDER-RIGHT: 1px inset SOLID #Forum_Css_Textfiled1_BorderColor; BORDER-TOP: 1px inset SOLID <%=Forum_Css_Textfiled1_BorderColor%>; COLOR: <%=Forum_Css_Textfiled1_FontColor%>; font-size:<%=Forum_Css_Textfiled1_FontSize%>"><%=rsArticle("rContent")%></textarea>
<font color="#<%=Forum_PFontColor%>">*</font>
<%
If rsArticle("rIsNeedPay") Then
Response.Write "<br>"
Response.Write "<img src='"&Forum_Pic_Pay&"' width='16' height='16' align='bottom' border='0'> 浏览支付价格:<input type='text' name='Assets' class='Textfiled_Bottom' size='2' value="&rsArticle("rPayHowMuch")&">吨"
Else
Response.Write "<input type='hidden' name='Assets' value='0'>"
End if
%>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="20%" height="20" bgcolor="<%=Forum_AlternateColor1%>" class="font">
<div align="center">表 情</div>
</td>
<td height="20" class="font" bgcolor="<%=Forum_AlternateColor2%>"> <img src="Images/Emot/em1.gif" width="30" height="15" onClick="inputs('[Emot]1[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em2.gif" width="19" height="19" onClick="inputs('[Emot]2[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em3.gif" width="16" height="15" onClick="inputs('[Emot]3[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em4.gif" width="15" height="15" onClick="inputs('[Emot]4[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em5.gif" width="15" height="15" onClick="inputs('[Emot]5[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em6.gif" width="50" height="15" onClick="inputs('[Emot]6[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em7.gif" width="22" height="23" onClick="inputs('[Emot]7[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em8.gif" width="15" height="15" onClick="inputs('[Emot]8[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em9.gif" width="16" height="16" onClick="inputs('[Emot]9[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em10.gif" width="15" height="15" onClick="inputs('[Emot]10[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em11.gif" width="21" height="15" onClick="inputs('[Emot]11[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em12.gif" width="15" height="15" onClick="inputs('[Emot]12[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em13.gif" width="15" height="15" onClick="inputs('[Emot]13[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em19.gif" width="42" height="23" onClick="inputs('[Emot]19[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em20.gif" width="16" height="16" onClick="inputs('[Emot]20[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em22.gif" width="15" height="15" onClick="inputs('[Emot]22[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em23.gif" width="15" height="15" onClick="inputs('[Emot]23[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em25.gif" width="16" height="16" onClick="inputs('[Emot]25[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em27.gif" width="31" height="31" onClick="inputs('[Emot]27[/Emot]')" style="Cursor:Hand" onFocus="this.blur()">
<img src="Images/Emot/em28.gif" width="15" height="15" onClick="inputs('[Emot]28[/Emot]')" style="Cursor:Hand" onFocus="this.blur()"></td>
</tr>
<tr>
<td height="24" width="20%" bgcolor="<%=Forum_AlternateColor1%>" class="font">
<div align="center">上传文件</div>
</td>
<td height="24" class="font" bgcolor="<%=Forum_AlternateColor2%>"><iframe name="Upload" frameborder=0 width=100% height=24 scrolling=no src=Inc/Upload.asp>
</iframe> </td>
</tr>
<tr>
<td bgcolor="<%=Forum_AlternateColor1%>" width="20%">
<div align="center">操 作</div>
</td>
<td bgcolor="<%=Forum_AlternateColor2%>">
<table width="100%" border="0" cellspacing="0" cellpadding="2">
<tr>
<td>
<input type="Image" src="<%=Forum_Pic_Modify%>" name="Submit" onFocus="this.blur()" align="middle" alt="使用CTRL+ENTER快捷提交">
</td>
</tr>
</table>
</td>
</tr>
</form>
</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" id=online bgcolor="<%=Forum_BorderColor%>">
<tr>
<td valign="top" bgcolor="<%=Forum_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 + -