ron onu denedim fakat veri tabanında çektiğim verileri misal veriler bunlar

12,22,11,23,1,43,11,444

array nesnesine aktardığımda çalışmıyor.

veritabanı bağlantısı yaptım

dim veri = sql sorgusu yaptım .

Dim Deger
Deger = Array(veri)


Function BubbleSort(arrInt)
for i = UBound(arrInt) - 1 To 0 Step -1
for j= 0 to i
if arrInt(j)>arrInt(j+1) then
temp = arrInt(j+1)
arrInt(j+1) = arrInt(j)
arrInt(j) = temp
end if
next
next
BubbleSort = arrInt
end function

response.write Join(BubbleSort(Deger ),",")

çalışmıyor sıralama yapmıyor. string mi dönüyor anlamış değilim