คำจำกัดความของอาร์เรย์
dimmyarray
MyArray = Array (1,5,123,12,98)
Extended Arrays
Dimmyarray ()
fori = 0to10
redimpreservemyarray (i)
myArray (i) = ฉัน
ต่อไป
แยกสตริงและส่งคืนอาร์เรย์ของผลลัพธ์แยก
dimmyarray
myarray = split (tempcnt, chr (13) & chr (10))
fori = lbound (myarray) toubound (myarray)
Response.writemyArray (I) & "<br>"
ต่อไป
ฟังก์ชั่นการเรียงลำดับอาร์เรย์
ฟังก์ชั่น .. (ARY)
Keepchecking = true
dountilkeepchecking = false
Keepchecking = FALSE
fori = 0toubound (ary)
ifi = ubound (ary) thenexitfor
ifary (i)> ary (i+1) แล้ว
FirstValue = ary (i)
secondValue = ary (i+1)
ary (i) = secondValue
ary (i+1) = FirstValue
Keepchecking = true
endif
ต่อไป
วง
sort = ary
endfunction ..
ตัวอย่างแอปพลิเคชันฟังก์ชั่นการเรียงลำดับอาร์เรย์
dimmyarray
MyArray = Array (1,5,123,12,98)
myarray = sort (myarray)
fori = lbound (myarray) toubound (myarray)
Response.writemyArray (I) & "<br>"
ต่อไป
การใช้อาร์เรย์ในแอปพลิเคชันและเซสชัน
application.lock
แอปพลิเคชัน ("storedArray") = myArray
application.unlock
localArray = แอปพลิเคชัน ("storedArray")
เขียนทับอาร์เรย์ในแอปพลิเคชัน
application.lock
แอปพลิเคชัน ("storedarray") = localArray
application.unlock
เซสชันใช้เช่นเดียวกับแอปพลิเคชัน
นำเข้าข้อมูลจากฐานข้อมูลไปยังอาร์เรย์
dimmyarray
นำบันทึกทั้งหมดออก
myArray = rs.getrows
นำบันทึก 10 รายการแรกออก
myarray = rs.getrows (10)
forrow = 0toubound (myarray, 2)
forcol = 0toubound (myarray, 1)
Response.write (col, row) & "<br>"
ต่อไป
ต่อไป