asp 实现的冒泡排序程序

arr = array(12,52,14,43,24,58,15,64,24,57,17,56,45) 
arrLen = ubound(arr) 

for i=0 to arrLen-1 
for j = 0 to (arrlen -1)-i 
if arr(j)>arr(j+1) then 
temp = arr(j) 
arr(j)= arr(j+1) 
arr(j+1) = temp 
end if 
next 
next 

for each l in arr 
response.Write l&"<br>" 
next