当前位置: 首页 > 图文教程 > 网络编程 > ASP > 一个ASP中的数组

ASP
ASP进阶教程Ⅰ:循序渐进学留言薄
ASP进阶教程Ⅱ:一个简单的留言簿
ASP进阶教程Ⅲ:给留言簿润下色
ASP进阶教程Ⅵ:留言簿在线删除留言
ASP进阶教程Ⅴ:留言簿在线留言编辑(一)
ASP进阶教程Ⅴ:留言簿在线留言编辑(二)
ASP进阶教程Ⅳ:加入精彩留言
ASP进阶教程Ⅸ:留言查询功能(一)
ASP进阶教程Ⅸ:留言查询功能(二)
ASP进阶教程Ⅷ:数据库版本的留言簿
ASP基础讲座(上)
ASP系列讲座(一)关于 Active Server Pages
ASP系列讲座(二)ASP 的新功能
Asp用于分页的两个函数
ASP与Oracle连接时的TNS错误
小工具:统计有多少行JS代码和ASP代码,并有多少字节
一个xmlhttp读取xml的例子
ASP终极防范上传漏洞
防止网站内容被人小偷和采集的ASP代码
批量判断域名是否被注册程序代码

一个ASP中的数组


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 190 ::
收藏到网摘: n/a

当数据库中读取很多的数据。
将他连成了字符串,格式如下:str=1###0###1***2###1###1_1***3###1###1_2***4###2###1_1_1***5###2###1_1_2***6###4###1_1_1_1***7###6###1_1_1_1_1
然后用先用arrResult=split(str,"***")将str分到数组中,接着再对arrResult数组的每条数据用arrTmp=split(arrResult(i),"###")来把他分到数组。
代码如下:
dim myarry()
arrResult=split(str,"***")
for i=0 to UBound(arrResult)
arrTmp=split(arrResult(i),"###")
for j=0 to UBound(arrTmp)
redim myarry(UBound(arrResult),UBound(arrTmp))
myarry(i,j)=arrTmp(j)
response.Write myarry(i,j)&"<br>"
next
next
当我再
for k=0 to ubound(myarry,1)
response.Write myarry(k,1)&"<br>"
next
想来显视时,怎么数组中的数据就没有了呢?