📄 newadd.asp
字号:
<!--#include file="check_login.asp"-->
<!--#include file="conn.asp"-->
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="text.css" rel="stylesheet" type="text/css">
</head>
<body topmargin="0" leftmargin="0" rightmargin="0" <%=kkk%>>
<!--#include file="top/Ltop04.asp" -->
<table width="99%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="5"></td>
</tr>
</table>
<table width="99%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#EFEBEF">
<form name="LPform" method="post" action="News_save.asp">
<tr>
<td width="9%" height="20" align="right" bgcolor="#DEDFDE">新闻标题：</td>
<td width="91%" height="20" bgcolor="#EBEBEB">
<input name="Lname" type="text" class="myput" id="Lname" size="35"> <span class="BLUE">*</span></td>
</tr>
<tr>
<td width="9%" height="20" align="right" bgcolor="#DEDFDE">新闻目录：</td>
<td height="20" bgcolor="#EBEBEB"><select name="Lsort" class="myput" id="Lsort">
<%
ModifyID=CInt(trim(Request.QueryString("ModifyID")))
set rs = server.createobject("adodb.recordset")
rs.source = "select id,content,Pid from newtree where Pid=0 order by id desc"
rs.open rs.source,conn,1,1
if rs.recordcount=0 then
response.write("没有栏目")
end if
while not rs.eof
Bid=CInt(rs("id"))
dim MYID3
MYID3=0
MYID3=ModifyID
%>
<option <% if MYID3=Bid then response.Write"selected" %> value="<%=Bid%>" style="background-color:#cccccc;" >╋<%=rs("content")%></option>
<%
set rss = server.createobject("adodb.recordset")
rss.source = "select id,content,Pid from newtree where Pid="&Bid
rss.open rss.source,conn,1,1
while not rss.eof
Cid=CInt(rss("id"))
dim MYID2
MYID2=0
MYID2=ModifyID
%>
<option <% if MYID2=Cid then response.Write "selected" %> value="<%=Bid%>-<%=Cid%>" style="background-color:#dddddd;" > ＋<%=rss("content")%></option>
<%
rss.movenext
wend
rss.Close
set rss=nothing
rs.movenext
wend
rs.close
set rs=nothing
%>
</select> <span class="BLUE">*</span>（注意目录级别）</td>
</tr>
<tr>
<td height="20" align="right" bgcolor="#DEDFDE">浏览权限：</td>
<td height="20" bgcolor="#EBEBEB"><span style="BORDER-BOTTOM:#CCCCCC 1px solid;">
<select name="GroupID" class="myput" id="GroupID">
<%
set rsUG = server.createobject("adodb.recordset")
rsUG.source = "select * from Nweb_UGroup order by GroupLevel "
rsUG.open rsUG.source,conn,1,1
if rsUG.recordcount=0 then
response.write("没有栏目")
end if
while not rsUG.eof
%>
<option value="<%=rsUG("GroupID")%>" style="background-color:#cccccc;" <%if GroupID=rsUG("GroupID") then response.write " selected" %> >┠ <%=rsUG("GroupName")%></option>
<%
rsUG.movenext
wend
rsUG.close
set rsUG=nothing
%>
</select>
<input type="radio" checked name="Exclusive" value="<">
隶属
<input type="radio" name="Exclusive" value="=">
专属 （隶属：权限值≥可查看，专属：权限值＝可查看） </span></td>
</tr>
<tr>
<td width="9%" height="20" align="right" bgcolor="#DEDFDE">发 布 者：</td>
<td height="20" bgcolor="#EBEBEB"><input name="LPutman" type="text" class="myput" id="LPutman" value="<%=session("username")%>" size="20">
<span class="BLUE">*</span></td>
</tr>
<tr>
<td height="20" align="right" bgcolor="#DEDFDE">新闻内容：</td>
<td height="20" bgcolor="#EBEBEB"><span class="BLUE">*</span> 利用本编辑工具，可以编辑图文并茂的新闻内容图文，也可上传多幅图片和制作表格等。</td>
</tr>
<tr valign="top" bgcolor="#EBEBEB">
<td height="20" colspan="2">
<INPUT type="hidden" name="content1" value="">
<IFRAME ID="NwebEditor1" src="../WebEditor/eWebEditor.asp?id=content1" frameborder="0" scrolling="no" width="550" height="350"></IFRAME> </td>
</tr>
<tr>
<td width="9%" height="20" align="right" bgcolor="#DEDFDE">是否发布：</td>
<td height="20" bgcolor="#EBEBEB"><input name="LPutout" type="radio" value="1" checked>
是
<input type="radio" name="LPutout" value="0">
否 （选 <strong>是</strong> 时表立即发布，否则暂存于数据库中）</td>
</tr>
<tr>
<td width="9%" height="20" align="right" bgcolor="#DEDFDE">是否热点：</td>
<td height="20" bgcolor="#EBEBEB"><input type="radio" name="NewsHot" value="1">
是
<input name="NewsHot" type="radio" value="0" checked>
否 （选 <strong></strong><strong>是</strong> 时归类到 <strong>热点新闻</strong> 中）</td>
</tr>
<tr align="center" bgcolor="#DEDFDE">
<td height="50" align="center" style='BORDER-BOTTOM: #333333 1px solid'> </td>
<td height="50" align="left" style='BORDER-BOTTOM: #333333 1px solid'>
<input type="submit" name="Submit" value=" 添 加 ">
<input type="reset" name="Submit2" value=" 重 置 "> </td>
</tr>
</form>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -