數組中的元素可能不屬于同一數據類型,在ASP編程中通常都是使用統一的數組名稱和來確定數組中的元素,那么在ASP編程中使用數組的方法大家都知道嗎?錯新技術頻道今天就為你詳細講解。
數組的定義
Dim?MyArray
MyArray?=?Array(1,5,123,12,98)
可擴展數組
Dim?MyArray()
for?i?=?0?to?10
ReDim?Preserve?MyArray(i)
MyArray(i)=i
next
將一個字符串分割并返回分割結果的數組
Dim?MyArray
MyArray?=?Split(tempcnt,chr(13)&chr(10))
For?I?=?Lbound(MyArray)?to?Ubound(MyArray)?
Response.Write?MyArray(I)?&?"<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,5,123,12,98)
MyArray?=?Sort(MyArray)?
For?I?=?Lbound(MyArray)?to?Ubound(MyArray)?
Response.Write?MyArray(I)?&?"<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,?2)
For?col?=?0?To?UBound(MyArray,?1)
Response.Write?(col,?row)?&?"<br>"
Next
Next
在ASP編程中使用數組的方法,錯新技術頻道小編就為大家介紹到這里了,更多的知識盡在錯新技術頻道,小編希望大家能在本文中學習到有用的知識。
新聞熱點
疑難解答