刚看了一下,这是源码,不知道这样能不能调用
以下是1.asp内容
<%
'==================================================
'过程名:showtopnews
'作 用:显示最新新闻
'参 数:n=新闻条数
' l=标题字数
'==================================================
sub showtopnews(n,l)
show_topnews="<table border='0' width='97%' cellspacing='0' cellpadding='0' align='center'>"
sql="select top "&n&" newsid,newstitle,newswrite,newstimes,addtime,newsclassid,color from news order by newsid desc"
set rs=conn.execute(sql)
if rs.eof then
show_topnews=show_topnews&"<tr><td width='203'>暂时没有新闻</td></tr>"
end if
do while not rs.eof
show_topnews=show_topnews&"<tr> <td height='20' >·<a href=shownews.asp?newsid="&rs("newsid")&"><font color='"&rs("color")&"'>"&left(rs("newstitle"),l)&"</font></a><font color='#FF0000'>[</font>"&rs("addtime")&"<font color='#FF0000'>]</font></td></tr>"
show_topnews=show_topnews&"<tr> <td height='2' background='images/white_line.gif'></td></tr>"
rs.movenext
loop
rs.close
show_topnews=show_topnews&"</table>"
end sub
%>
调用不知道这样可不可以
<!--#include file="1.asp"-->
<!--调用新闻-->
$show_topnews(10,40)$
这样调用可以吗???
[此贴子已经被作者于2006-11-22 15:14:14编辑过]