UC知道ASP function 问题
来源：百度知道 编辑：UC知道 时间：2024/06/28 09:13:18
<% function wzgggl(rx_wzgg_biaoti,rx_wzgg_neirong,rx_wzgg_faburen,j)
set rs=server.createobject("adodb.recordset")
sql="select * from rx_wzgg"
rs.open sql,conn,3,3
for i=1 to 10000
rx_wzgg_biaoti=trim(rs("wzgg_biaoti"))
rx_wzgg_neirong=trim(rs("wzgg_neirong"))
rx_wzgg_faburen=trim(rs("wzgg_faburen"))
rx_dtime=trim(rs("dtime"))
j=j+1
rs.movenext
if rs.eof then exit for
next
End function
%>
<%Response.Write wzgggl(rx_wzgg_biaoti,rx_wzgg_neirong,rx_wzgg_faburen,j)%>
上边是我写的一个函数, 这个表里有多条记录,
我调用的时候是这样<%= rx_wzgg_biaoti %>,这样调用出来只显示最后一条
请问我怎么想调用那条记录 就调用那条记录???
还有像那些CMS里的 标签 是怎么做的?
3楼的的确可以满足,但是却不能满足我想要那条要那条的问题,
我想要ID是5的那条呢? 怎么办???
还有像动易那类的CMS的标签是怎么做的?? 有人会吗? 我愿出我最后的25分 总共75分
set rs=server.createobject("adodb.recordset")
sql="select * from rx_wzgg"
rs.open sql,conn,3,3
for i=1 to 10000
rx_wzgg_biaoti=trim(rs("wzgg_biaoti"))
rx_wzgg_neirong=trim(rs("wzgg_neirong"))
rx_wzgg_faburen=trim(rs("wzgg_faburen"))
rx_dtime=trim(rs("dtime"))
j=j+1
rs.movenext
if rs.eof then exit for
next
End function
%>
<%Response.Write wzgggl(rx_wzgg_biaoti,rx_wzgg_neirong,rx_wzgg_faburen,j)%>
上边是我写的一个函数, 这个表里有多条记录,
我调用的时候是这样<%= rx_wzgg_biaoti %>,这样调用出来只显示最后一条
请问我怎么想调用那条记录 就调用那条记录???
还有像那些CMS里的 标签 是怎么做的?
3楼的的确可以满足,但是却不能满足我想要那条要那条的问题,
我想要ID是5的那条呢? 怎么办???
还有像动易那类的CMS的标签是怎么做的?? 有人会吗? 我愿出我最后的25分 总共75分
for循环写的有问题!
很明显,你的rx_wzgg_biaoti变量不是数组,
你在程序里给它赋值一万次,它还是只有一个值,
你应该用数组来接受赋值呀.
之所以出现错误，其实很好理解:
当i=1的时候，rx_wzgg_biaoti为第一条标题
当i=2的时候，rx_wzgg_biaoti为第二条标题
……
当i=10000的时候 rx_wzgg_biaoti为第10000条标题
rx_wzgg_biaoti始终只是一个值！
好比在这个程序里 a只会是10而不是所有的四个数：
<%
Dim a
a=1
a=2
a=3
a=10
Response.write a
%>
至于实现想调用哪条就调用哪条,提供以下思路供参考：
<%
Dim m,Rx_WZGG_Title,Rx_WZGG_Content,Rx_WZGG_Adder,Rx_WZGG_AddTime
m=1
Function ShowArticle(i)
Set Rs=Server.CreateObject("adodb.recordset")
Sql="Select * from [Table]"
Rs.open Sql,conn,1,1
if Rs.eof or Rs.bof then
Exit Function
else
if i=0 then
Do while Not(Rs.eof)
Rx_WZGG_Title=Rx_WZGG_Title&"/"&Rs("Title")
Rx_WZGG_Content=Rx_WZGG_Content&"/"&Rs("Content")
Rx_WZGG_Adder=Rx_WZGG_Adder&"/&qu