标题: 如何将数据重新存入数组： [打印本页] 作者: 航母风云 时间: 2010-1-14 00:54 标题: 如何将数据重新存入数组： <%
content=""
dim x
x=0
const pageline=10 '每页显示10行
linenum=split(content,"<br>") '本例为计算字符串<br>标记的个数
allline=ubound(linenum)+1 '全文<br>(换行标记)总数
pagecount=int(allline\pageline)+1 '计算总页数
for i=0 to allline
for i=0 to Ubound(linenum)+1
Content[x]=Content&"linenum("&i&")" '这里我想实现的功能是把每10行做为一项,重新写入数组,应要怎么写
if i>(x+1)*line then '这里想实现到10行的时候,进入下一次10行的循环,不知道怎么写!!
x++
next
Next
%>