高分急求助,ASP多条记录传递显示,超过200条无法传递

来源:百度知道 编辑:UC知道 时间:2024/05/30 22:32:27
我一个程序,2个页面,A页是输入号码段的,比如输入1-10000,B页面要接收1-10000,并显示出相关数据,可是我输入1-200没问题,但是假如输入1-1000的话根本没反应了,B页面接收不到。
急死了,谁帮我下,可以加我QQ757197,解决了再追加200分!

A页面负责传递的代码部分:

rs.Open sql_r,conn,1,3
if not rs.eof then
r_str=""
do while not rs.eof
r_ma = rs("id")
r_str= r_str&"$$"&r_ma
rs.movenext
loop
else
response.write "<script>alert('「"&ma1&"-"&ma0&"」本号段不存在,或者已经兑换');history.go(-1);</Script>"
Response.End
end if
r_str = right(r_str,len(r_str)-2)
'response.write r_str
r_num = UBound(split(r_str,"$$"))+1
response.Write"<script language=javascript>alert('该 「" &ma1& " - "&ma0&"」 共有"&r_num&"未兑换');this.location.href='manage_cashed_all_ok_ok.asp?r_str="&r_str&"&r_q="&request("productdateyear1")&","&request("productdatemonth1"

<%rs.Open sql_r,conn,1,3
if not rs.eof then
r_str=""
do while not rs.eof
r_ma = rs("id")
r_str= r_str&"$$"&r_ma
rs.movenext
loop
else
response.write "<script>alert('「"&ma1&"-"&ma0&"」本号段不存在,或者已经兑换');history.go(-1);</Script>"
Response.End
end if
r_str = right(r_str,len(r_str)-2)
'response.write r_str
r_num = UBound(split(r_str,"$$"))+1
response.Write"<FORM name=ssub METHOD=POST ACTION=manage_cashed_all_ok_ok.asp><INPUT TYPE=hidden NAME=r_str><INPUT TYPE=hidden NAME=r_q></FORM><script language=javascript>alert('该 「" &ma1& " - "&ma0&"」 共有"&r_num&"未兑换');ssub.r_str.value='"&r_str&"';ssub.r_q.value='"&request("productdateyear1")&","&request("productdatemonth1")&"';ssub.