asp中REDIM的功能是动态定义数组长度
动态数组里面的一个语句,只能出现在过程里面,可以多次使用。可以改变数组大小,和维数。
格式:
REDIM [Preserve] 数组名(下标1[下标2....])
Preserve 保留动态数组的内容(不用的话,每次执行REDIM语句,当前存储的语句会全部丢失)
例如:
复制代码 代码如下:
Dim DynArray() '定义数组DynArray()为动态数组
REDIM Preserve DynArray(20)'为该数组分配元数个数
这样对编程中一些动态的改变数组是非常重要的,而且经常能用到,处理到,这REDIM深入了解第二电脑认为对自己的编程的提高很有帮助。
下面举一些ASP数组的例子,当然不全是动态数组
在ASP编程中使用数组:
数组的定义:
复制代码 代码如下:
Dim MyArray
MyArray = Array(1"codetitle">复制代码 代码如下:
Dim MyArray()
for i = 0 to 10
ReDim Preserve MyArray(i)
MyArray(i)=i
next
将一个字符串分割并返回分割结果的数组:
复制代码 代码如下:
Dim MyArray
MyArray = Split(tempcnt"<br>"
Next
数组排序函数:
复制代码 代码如下:
function..Sort(ary)
KeepChecking = TRUE
Do Until KeepChecking = FALSE
KeepChecking = FALSE
For I = 0 to UBound(ary)
If I = UBound(ary) Then Exit For
If ary(I) > ary(I+1) Then
FirstValue = ary(I)
SecondValue = ary(I+1)
ary(I) = SecondValue
ary(I+1) = FirstValue
KeepChecking = TRUE
End If
Next
Loop
Sort = ary
End function
数组排序函数应用例子:
复制代码 代码如下:
Dim MyArray
MyArray = Array(1"<br>"
Next
在Application和Session中使用数组:
复制代码 代码如下:
Application.Lock
Application("StoredArray") = MyArray
Application.Unlock
LocalArray = Application("StoredArray")
覆盖Application中的数组:
复制代码 代码如下:
Application.Lock
Application("StoredArray") = LocalArray
Application.Unlock
Session使用方法与Application相同,从数据库中把数据导入数组中:
复制代码 代码如下:
Dim MyArray
'取出全部记录
MyArray = RS.GetRows
'取出前10项记录
MyArray = RS.GetRows(10)
For row = 0 To UBound(MyArray"<br>"
Next
Next
通过以上的例子可以加深我们对数组的理解,在实际运用中加以灵活运用。
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
更新日志
- 林忆莲.2019-0(2023精装版)【环球】【WAV+CUE】
- Supper.Moment.2016-The.Moment【寰亚】【FLAC分轨】
- 范莉丝.1979-送郎一朵牵牛花(LP版)【大联机构】【WAV+CUE】
- 刘宇.2024-宇宙诗人【哔哟哔哟文化】【FLAC分轨】
- 《全景声白噪音》沉浸式大自然助眠 带你听自然的声音[mp3]
- 纯音入心系列纯音乐《古筝精选 十指弹一赏心曲一心奏出世人心》1CD[MP3][582MB]
- 纯音入心系列纯音乐《古筝与现代音乐的交织》1CD[MP3][96MB]
- 王俪婷.2011-ROMANCE【华研国际】【WAV+CUE】
- 狮子合唱团.2016-LION(引进版)【华纳】【WAV+CUE】
- 范文芳.1996-FNNTASY【HYPE】【WAV+CUE】
- 纯音入心系列纯音乐《韵味古筝曲》1CD[MP3][146.2MB]
- 纯音入心系列纯音乐《古筝系列-传统乐曲》1CD[MP3][974.7MB]
- 纯音入心系列纯音乐《古筝系列-弦凝指咽声停处》1CD[MP3][656.5MB]
- 群星.1994-大烂片2辑【派森】【WAV+CUE】
- 吴倩莲.1997-望爱【EMI百代】【WAV+CUE】