不改function Links是不可能实现的,只要把SQL查询改一下就可以了!然后在调用的时候传一个参数过去就可以了,代码如下:
<%
function Links(m_Count)
dim m_Top
if m_Count<>"0" and m_Count<>"" then
m_Top="top "&m_Count&" "
else
m_Top=""
end if
set rs0=server.createobject("ADODB.Recordset")
Sql0="select "&m_Top&" * from [Link] order by [In_Time] desc"
rs0.open Sql0,conn,1,1
if not rs0.eof then
i=1
do while not rs0.eof
Response.write ""&(Rs0("name")&"
"
i=i+1
rs0.movenext
loop
end if
rs0.close
set rs0=nothing
end function
%>
然后在调用的时候加参数<%call Links(条数)%>
希望对你有所帮助!
你的想法在哪里?没说解决方法啊?
可以使用Mid() 直接切割 但是字符数量上就不好确定了
<%=Mid(Links,1,3)%>
你这真幽默,你不改动函数,调用函数的时候你就是把这个调用语句写出花来,函数也不买账啊!