JS分类调用说明:

1,一级分类调用:

<script language="javascript" src="owen.asp?owen1=国内新闻&n=6"></script>


表示调用一级分类中的 国内新闻 6条

2,二级分类调用:

<script language="javascript" src="owen.asp?owen1=国内新闻&owen2=本地新闻&n=8"></script>


表示调用 国内新闻 下的二级分类 本地新闻 8条

3,最新新闻调用:

<script language="javascript" src="owen.asp?n=10"></script>


表示调用10条最新新闻






代码部分:


javastr=""

javastr=javastr+"<table width=\"100%\" border=\"0\" cellpadding=\"0\" cellspacing=\"0\">"

<!--#include file="conn.asp"-->

<%

owen=request("owen")

owen1=request("owen1")

owen2=request("owen2")

n=request("n")

if n="" then

n=100

end if%>


<%

if owen1<>"" and owen2<>"" then

sql="select
* from NEWS where BigClassName='"& owen1 &"' and
SmallClassName='"& owen2 &"' order by id desc"

set rs=conn.execute(sql)

do while not rs.eof

%>

javastr=javastr+"<tr><td height=\"24\" style=\"BORDER-bottom: #999999 1px dotted\">"

javastr=javastr+"◎ <span style=\"font-size:9pt;line-height:15pt\"><% if rs("imagenum")<>"0" then response.write "<img src='images/news.gif' border=0 alt='图片新闻'>" end if %><a href=\"onews.asp?id=<%=rs("id")%>\" title=\"<%=rs("title")%>\" target=\"_blank\"><%=left(rs("title"),12)%></a></span> <font color=\"#999999\" >[<%=rs("infotime")%>]</font> <font color=\"#999999\" >(阅读<font color=\"#FF0000\" ><%=rs("hits")%></font>次)</font>"

javastr=javastr+"</td></tr>"

<%n=n-1

if n<1 then exit do

rs.movenext

loop

%>

javastr=javastr+"</table>"

<%

rs.close


set rs=nothing


%>

document.write (javastr)


<%

ElseIf owen2<> "" then

sql="select
* from NEWS where SmallClassName='"& owen2 &"' order by id desc"

set rs=conn.execute(sql)

do while not rs.eof

%>

javastr=javastr+"<tr><td height=\"24\" style=\"BORDER-bottom: #999999 1px dotted\">"

javastr=javastr+"◎ <span style=\"font-size:9pt;line-height:15pt\"><% if rs("imagenum")<>"0" then response.write "<img src='images/news.gif' border=0 alt='图片新闻'>" end if %><a href=\"onews.asp?id=<%=rs("id")%>\" title=\"<%=rs("title")%>\" target=\"_blank\"><%=left(rs("title"),12)%></a></span> <font color=\"#999999\" >[<%=rs("infotime")%>]</font> <font color=\"#999999\" >(阅读<font color=\"#FF0000\" ><%=rs("hits")%></font>次)</font>"

javastr=javastr+"</td></tr>"

<%n=n-1

if n<1 then exit do

rs.movenext

loop

%>

javastr=javastr+"</table>"

<%

rs.close


set rs=nothing


%>

document.write (javastr)

<%

ElseIf
owen1<>"" then

sql="select
* from NEWS where BigClassName='"& owen1 &"' order by id desc"

set rs=conn.execute(sql)

do while not rs.eof

%>

javastr=javastr+"<tr><td height=\"24\" style=\"BORDER-bottom: #999999 1px dotted\">"

javastr=javastr+"◎ <span style=\"font-size:9pt;line-height:15pt\"><% if rs("imagenum")<>"0" then response.write "<img src='images/news.gif' border=0 alt='图片新闻'>" end if %><a href=\"onews.asp?id=<%=rs("id")%>\" title=\"<%=rs("title")%>\" target=\"_blank\"><%=rs("title")%></a></span> <font color=\"#999999\" >[<%=rs("infotime")%>]</font> <font color=\"#999999\" >(阅读<font color=\"#FF0000\" ><%=rs("hits")%></font>次)</font>"

javastr=javastr+"</td></tr>"

<%n=n-1

if n<1 then exit do

rs.movenext

loop

%>

javastr=javastr+"</table>"

<%

rs.close


set rs=nothing


%>

document.write (javastr)

<% End If %>


<%

if owen1= "" and owen2= "" then

sql="select * from NEWS order by id desc"

set rs=conn.execute(sql)

do while not rs.eof

%>

javastr=javastr+"<tr><td height=\"24\" style=\"BORDER-bottom: #999999 1px dotted\">"

javastr=javastr+"◎ <span style=\"font-size:9pt;line-height:15pt\"><% if rs("imagenum")<>"0" then response.write "<img src='images/news.gif' border=0 alt='图片新闻'>" end if %><a href=\"onews.asp?id=<%=rs("id")%>\" title=\"<%=rs("title")%>\" target=\"_blank\"><%=left(rs("title"),12)%></a></span> <font color=\"#999999\" >[<%=rs("infotime")%>]</font> <font color=\"#999999\" >(阅读<font color=\"#FF0000\" ><%=rs("hits")%></font>次)</font>"

javastr=javastr+"</td></tr>"

<%n=n-1

if n<1 then exit do

rs.movenext

loop

%>

javastr=javastr+"</table>"

<%rs.close


set rs=nothing


conn.close


set conn=nothing%>

document.write (javastr)

<%end if%>