📄 js_news_index.asp

📁 网吧影印系统！很详细！可直接使用！请大家指点！
💻 ASP
字号:
<!--#include file=security.asp-->
<%
if session("flag")>1 then
response.write "<br><p align=center>您没有操作的权限</p>"
response.end
end if
%>
<%
filename="../js/index_news.js"
if request("body")<>"" then
Set fso = Server.CreateObject("Scripting.FileSystemObject")
Set fout = fso.CreateTextFile(server.mappath(""&filename&""))
fout.Write request("body")
fout.close
set fout=nothing
set fso=nothing
mskrindex="ok"
end if

%>
<html>

<head>
<meta name="GENERATOR" content="Microsoft FrontPage 6.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="images/forum_admin.css">
<title></title>
</head>

<body topmargin="1" leftmargin="1">

<%if mskrindex="ok" then%>
<table border="0" cellspacing="0" style="border-collapse: collapse" width="100%" cellpadding="0">
  <tr>
    <td width="100%"><font color="#FF0000">·</font>成功生成最新电影js(<b>News.Js</b>),时间<%=Now()%>
  </tr>
</table>
<%else%>
<div align="center">
  <table border="0" cellspacing="1" style="border-collapse: collapse" width="96%" bgcolor="#888888" height="100%">
    <form name="frmAnnounce" method="post" action="js_news_index.asp">
      <tr>
        <td width="100%" bgcolor="#FFFFFF" height="100%">
        <textarea style="width:100%; height:100%;" rows="19" name="body" cols="102"><!--#include file="articleconn.asp"-->
document.write("<tr>");
<%dim t  
t=0  
sql="select articleid,title,typeid,dateandtime,best from learning where canlook<>3 order by articleid desc"  
set rs=server.createobject("adodb.recordset")  
rs.open sql,conn,1,1
do while not rs.eof  
t=t+1  
%>document.write("<td width='135' height='16'>");
document.write("<table border='0' cellpadding='0' cellspacing='0' style='border-collapse: collapse' bordercolor='#111111' width='276' id='AutoNumber2'>");
document.write("<tr><td><li class=li>　</td>");
document.write("<td width=70%><a href=/vod/html/<%=rs("articleid")%>.html class=mName><%=left(rs("title"),14)%></td>");
document.write("<td width=30% Align=Center><%=rs("dateandtime")%></td></tr></table></td>");
<%if t mod 2 =0 then %>document.write("</tr><tr>");
<%end if
if t>=24 then exit do  
rs.movenext  
loop%>document.write("</tr>");
</textarea></td>
      </tr>
      <tr>
        <td width="100%" bgcolor="#F0F0F0">
        <p align="center">
        <input name="change" class="buttonface" value="生成(JS)" type="submit">
        </td>
      </tr>
    </form>
  </table>
  <%end if%>
</div>

</body>

</html>
⌨️ 快捷键说明

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