Определение массива
Dimmyarray
Myarray = массив (1,5,123,12,98)
Расширенные массивы
Dimmyarray ()
fori = 0to10
RedimPreservemyArray (i)
Myarray (i) = i
следующий
Разделите строку и верните массив сплит -результатов
Dimmyarray
Myarray = split (tempcnt, chr (13) и chr (10))
Fori = lbound (myarray) toubound (myarray)
Response.writemyarray (i) & "<br>"
Следующий
Функция сортировки массива
функция .. Сорт (ary)
KeepCeecking = True
DountilPeeChecking = false
KeepCeecking = 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
KeepCeecking = True
Эндиф
Следующий
Петля
Sort = ary
Конечная функция ..
Пример приложения функции сортировки массива
Dimmyarray
Myarray = массив (1,5,123,12,98)
Myarray = sort (myarray)
Fori = lbound (myarray) toubound (myarray)
Response.writemyarray (i) & "<br>"
Следующий
Использование массивов в приложении и сеансе
Application.lock
Application ("storedarray") = myarray
Application.unlock
LocalArray = Application ("storedArray")
Перезаписать массивы в заявлении
Application.lock
Application ("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>"
Следующий
Следующий