📄 admin_newstojs.asp
字号:
<!--#include file = include.asp-->
<!--#include file = admin_CheckMana.asp-->
<%
'=========================================================
'产品目录：风讯产品N系列
'软件名称：风讯站点管理系统
'当前版本：2004.I.0225
'最新更新：2004.2.10
'=========================================================
'Copyright (C) 2002-2004 cooin.com. All rights reserved.
'网站: http://www.cooin.com Foosun.net
'程序制作：轻风云(QQ:655071)
'Email:skeen@cooin.com,skeen@Foosun.net
'论坛支持：风讯在线论坛(http://bbs.cooin.com http://bbs.foosun.net)
'=========================================================
if request.querystring("FileName")="" then response.redirect"admin_NewsModify_f.asp"
set rs=Server.CreateObject("adodb.recordset")
sql="select * from News Where FileName='"&request.querystring("FileName")&"'"
rs.open sql,conn,1,1
set rs1=Server.CreateObject("Adodb.recordset")
sql1="select * from JS Where type='文字新闻' order by Date Desc"
rs1.open sql1,conn,1,1
set rs2=Server.CreateObject("Adodb.recordset")
sql2="select * from JS Where type='图片新闻' order by Date Desc"
rs2.open sql2,conn,1,1
%>
<body>
<table width="600" height="45" border="0" align="center" cellpadding="3" cellspacing="0">
<tr>
<td width="40%" valign="top"><form name="form" method="POST" action="admin_NewstoJSSave.asp">
<table width="98%" border="0" cellpadding="0" align="center" cellspacing="1" bgcolor="#339900">
<tr bgcolor="7897E0">
<td height="25" align="center" valign="middle" bgcolor="#97C893"><table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/bg1.gif">
<tr>
<td height="26"> <div align="left"><b><font color="#000000"> 文字新闻JS列表</font></b></div></td>
</tr>
</table>
</td>
</tr>
<tr bgcolor="#FFFFFF" valign="middle">
<td height="31" bgcolor="#F7FFF4">
<select Name="WordNewsName">
<%while not rs1.eof%>
<option><%=rs1("JSNameCN")%></option>
<%rs1.movenext:wend%>
</select> <input type=hidden name=WordNews value="Add"> <input type=hidden name=FileName1 value=<%=request.querystring("FileName")%>>
<input type="submit" name="Submit" value="确定"> </td>
</tr>
<tr bgcolor="#FFFFFF" align="center" valign="middle">
<td height="38" bgcolor="#F7FFF4"> </td>
</tr>
</table>
</form></td>
</tr>
<tr>
<td valign="top"><form name="form" method="POST" action="admin_NewstoJSSave.asp">
<table width="98%" border="0" cellpadding="0" align="center" cellspacing="1" bgcolor="#339900">
<tr align="center" valign="middle" bgcolor="#97C893">
<td height="25" colspan="2"><table width="100%" border="0" cellpadding="0" cellspacing="0" background="images/bg1.gif">
<tr>
<td height="26"> <div align="left"><b><font color="0"> 图片新闻JS列表</font></b></div></td>
</tr>
</table></td>
</tr>
<tr valign="middle" bgcolor="#F7FFF4">
<td height="31" colspan="2">
<select Name="PhotoNewsName">
<%while not rs2.eof%>
<option><%=rs2("JSNameCN")%></option>
<%rs2.movenext:wend%>
</select> <input type=hidden name=PhotoNews value="Add"> <input type=hidden name=FileName2 value=<%=request.querystring("FileName")%>>
<input name="Submit2" type="submit" id="Submit" value="确定"> </td>
</tr>
<tr valign="middle" bgcolor="#F7FFF4">
<td width="147" height="25"> 图片路径： </td>
<td width="422" height="25"> <input type="text" size=30 name="PhotoPath">
</td>
</tr>
<tr valign="middle" bgcolor="#F7FFF4">
<td height="25" colspan=2> <iframe name="ad" frameborder=0 width=450 height=43 align=center scrolling=no src=admin_upload.asp></iframe>
</td>
</tr>
<tr valign="middle" bgcolor="#F7FFF4">
<td height="25" colspan=2>
<!--#include file = name.asp-->
</td>
</tr>
</table>
</form></td>
</tr>
</table>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -