📄 news_owne_js.asp

📁 功能最强大的ASP网站
💻 ASP
字号:
<!--#include file="conn.asp"-->

document.write("<head><meta http-equiv='Content-Language' content='zh-cn'><meta http-equiv='Content-Type' content='text/html; charset=gb2312'><meta name='robots' content='none'></head>");
document.write("<table border=0 cellpadding=<%=line%> cellspacing=0 width=100%>");

<%
bigclass=trim(request.QueryString("title"))
line=trim(request.QueryString("line"))
n=request("n")
timeshow=trim(request.QueryString("timeshow"))
classshow=trim(request.QueryString("classshow"))
newpicshow=trim(request.QueryString("newpicshow"))
 
if n="" then
n=10
end if
 
if bigclass<>"" then
sql="select * from NEWS where bigclassname='"&bigclass&"' order by time desc"
set rs=conn.execute(sql)
end if

if rs.eof and rs.bof then
%>
document.write("<font color=#666666 style='font-size:9pt'>&nbsp;&nbsp;shangdu team新增栏目:暂时还没有相关文章!</font>");
<%else%>
document.write("<table  cellspacing=0 width=100% valign=top>");
<% 
do while not rs.eof
if rs("url")<>"" then
url=rs("url")
else
url="admin/files/"&rs("bh")&".html"
end if
title=rs("title")
'path为设置标题前的图片,picpath为设置new图片,hotpicpath为设置点击多少次显示hot图片,font为设置文字大小
path="admin/image/topic_no_new.gif"
picpath="admin/image/gif-0299.gif"
hotpicpath="admin/image/gif-0309.gif"
font="9"
if day(rs("time"))<10 then
time1= month(rs("time")) & ".0" & day(rs("time"))
else
time1= month(rs("time")) & "." & day(rs("time"))
end if 

classname=rs("bigclassname")
hot=rs("hits")
a=""
if rs("color")<>"" then
color=rs("color")
else
color="#666666"
end if
%>
document.write("<tr><td width=1 align=left align=center ></td><td>");
<%if line="1" then%>
document.write("</td><td align=left valign=top style='border-bottom-style:dashed; border-bottom-width:thin;'><img src=<%=path%>>");
<%else%>
document.write("</td><td align=left valign=to><img src=<%=path%>>");
<%end if%>
<% if timeshow="1" then%>
document.write("<font color=<%=color%> style='font-size:<%=font%>pt'>[<%=time1%>]</font>&nbsp;");
<%end if%>
<% if classshow="1" then%>
document.write("<font color=<%=color%> style='font-size:<%=font%>pt'>[<%=classname%>]</font>&nbsp;");
<%end if
if len(title)>20 then title=left(title,20)+"..." end if
%>
document.write("<a href=<%=url%>  target=_blank title=<%response.Write("已被骚扰次数"& hot &",点击直接查看详细文章")%>><font color=<%=color%> style='font-size:<%=font%>pt'><%=title%><%=color%></font></a>&nbsp;");
<%if newpicshow="1" then%>
<%if year(rs("time"))=year(now) and month(rs("time"))=month(now) and day(rs("time"))=day(now) then%>
document.write("<img src=<%=picpath%>>");
<%end if%>
<%end if%>
<%if rs("hits")>5500 then%>
document.write("<img src=<%=hotpicpath%>>");
<%end if%>
document.write("</td>");
<%
  n=n-1
  if n<1 then exit do
  rs.movenext
  loop
%>
document.write("</table>");
<%end if%>
⌨️ 快捷键说明

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