ASP For 循环 控制?

来源:百度知道 编辑:UC知道 时间:2024/05/18 05:05:51
下面是一段ASP生成html的代码,我想在for循环处加上控制代码!最好能控制生成个数,生成ID数(?到?),要是能控制按天数生成那就更好了!
------------------------------------------------------------------
<%
dim strUrl,Item_Classid,id,FileName,FilePath,Do_Url,Html_Temp
Html_Temp="<UL>"
For i=1 To 3
Html_Temp = Html_Temp&"<LI>"
Item_Classid = i
FileName = "html/"&Item_Classid&".htm"
FilePath = Server.MapPath("/")&"\"&FileName
Html_Temp = Html_Temp&FilePath&"</LI>"
Do_Url = "http://"
Do_Url = Do_Url&Request.ServerVariables("SERVER_NAME")&"/htmlsf.asp"
Do_Url = Do_Url&"?id="&Item_Classid
strUrl = Do_Url
dim objXmlHttp
set objXmlHttp = Server.createObject("Microsoft.XMLHTTP")
objXmlHttp.open "GET",strUrl,false
objXmlHttp.send()
Dim binFileData
binFileData = objXmlHttp.responseBody
Dim objAdoStream<

做一个表单,表单里有输入文本框(用来输入显示条数)一个提交按钮
然后
For i=1 To request.from("输入文本框的名称")
既然你是用数据库读出来的,那么你就可以做一个降序或升序,
那么这个文本框就可以控制你显示的条数了
如果是用天数的话你用
date()-request.from("输入文本框的名称")

request.from("输入文本框的名称")设置为必须输入年月日

这是一个小偷程序

生成ID数(?到?)
假如要生成id数 50 到 100 的

第四行里
For i=1 To 3
改成
For i=50 To 100