📄 add.asp

📁 视频源代码视频源代码
💻 ASP
字号:
<%response.expires=0%>
<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/code.asp"-->
<!--#include file="../inc/vip.asp"-->
<!--#include file="../inc/category.asp"-->
<!--#include file="category.asp"-->
<!--#include file="path.asp"-->
<%
if Session("filenum")	="" then
  Session("filenum")	=DateDiff("s","2002-1-1 00:00:00",now())
end if
Session("editfilenum")	=""
Session("photoup")	=0

if Session("content")><"" then
  content=replace(replace(UBBCode(replace(replace(Session("content"),"src=""|","src=""../pic.asp?id=|"),"\","\\")),"'","\'"),"script","scr' + 'ipt")
end if

if Session("otime")="" then Session("otime")=now()

SourceSelect = SourceDate()

Set rs=nothing
Set conn=nothing
%>
<!--#include file="../inc/head.asp"-->


<script src="../js/edit.js"></script>
<body onload="EditLoad('<%=content%>')">
<table border="0" align="center" width="620" cellpadding="1" cellspacing="1">
  <tr><td colspan="8"><font style="color:FFFFFF"><a href="../category/class.asp" style="color:FFFFFF">分类列表</a>　>>　<%=tophtml%>新闻管理</font>　　　<a href="../news/add.asp?categoryid=<%=categoryid%>" style="color:FFFFFF">新闻添加</a></td></tr>
</table>
<table border=0 cellPadding=0 cellSpacing=0 width=620 align=center style="border:1 ridge #eaeaea;"><tbody>
<form method="POST" action="../news/save.asp?categoryid=<%=categoryid%>" name="form" autocomplete="off" onsubmit="return(come());">
  <tr bgcolor="EFEFEF"><td width="170" rowspan="2" nowrap>
主题：<input class=text type=text name=title size="20" maxlength="100" value="<%=Session("title")%>"><br>
关键：<input class=text type=text name=skey size="20" maxlength="20" onkeypress="return Text();" value="<%=Session("skey")%>"><br>
作者：<input class=text type=text name=author size="20" maxlength="20" onkeypress="return Text();" value="<%=Session("auther")%>"><br>
来源：<input class=text type=text name=source size="20" maxlength="20" onkeypress="return Text();" value="<%=Session("source")%>" ondblclick="if(document.all.sourceselect.style.visibility=='hidden')document.all.sourceselect.style.visibility='visible';else document.all.sourceselect.style.visibility='hidden';" title="双击显示下拉菜单选项"><%=SourceSelect%><br>
时间：<input class=text type=text name=otime size="20" maxlength="20" onkeypress="return Text();" value="<%=Session("otime")%>"><br><br>
<%if isarray(cindex) then
  if ubound(cindex)<2 then%>
附属专题：<br><select name=subject style="position:absolute;"><option value="">请选择......(空)<option value="<%=Session("subjectid")%>" selected><%=Session("subjectname")&categoryselect%></select><br><br>
<%else%>
所属专题：<a href="../news/default.asp?categoryid=<%=categoryid%>" style="color:orange"><%=cname%></a><br>
<%end if
end if%>
文件路径：<br>
<%=filepath%><br>
文件名：<%=Session("filenum")%>.htm<br><br>
<input id=mW onclick=setMode(true) type=checkbox CHECKED name=bW><label for=mw>编辑状态</label>　
<input id=mH onclick=setMode(false) type=checkbox name=bH><label for=mH>源代码</label><br>
<input id=mE onclick=setSave(true) type=checkbox name=bE value="1"><label for=mE>使用UBB标签保存</label><br>
<input id=mF onclick=setSave(false) type=checkbox name=bF value="1"><label for=mF>使用普通文本保存</label><br>
<div align=right><input class=button type=submit value="　保　存　"></div><br>
<iframe name=Photo frameborder=0 src="../photo.asp" style="width:100%;height:70"></iframe>
<script src="../js/html.js"></script>
  <tr><td height=300 width=450 style="border:2 double #e0e0e0;" valign=middle><iframe name=EditContent frameborder=0 style="width:450;height:330;"></iframe><textarea name=SaveContent style="border:0;width:450;height:328;overflow:auto;display:none"></textarea></td></tr>
</form>
</table>

<script>
function come(){
  var content="";
  if (document.all.title.value.length<2) content+="主题必须在2～50个字符内！\n"
  if (document.all.bE.checked==false && document.all.bF.checked==false) content+="请选择保存方式！\n\nUBB标签 或 普通文本\n"
  if (content!=""){
    alert(content+'\n　　　　　　Copyright by 2001-2002 ZWCITY.COM');
    return false;
  }
}
</script>
<!--#include file="../inc/foot.asp"-->
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -