merhaba arkadaslar free bi tane script buldum fso ile klasor listeleme scripti. bunu wml ye cevirdim ama 10 lu sayfalama yapmak istiyorum aramizda yardimci olabilecek var mi acaba ? sadece sonraki ve onceki seklinde sayfalama yapmasi lazim simdiden herkese tskler

Kod:
= 1 then filesize = round(item.size / 1024 / 1024 / 1024,1) & " Gb)" elseif round(item.size / 1024 / 1024,2) >= 1 then filesize = round(item.size / 1024 / 1024,1) & " Mb)" elseif round(item.size / 1024,2) >= 1 then filesize = Round(item.Size / 1024,1) & " Kb)" elseif item.size < 1024 then filesize = round(item.size) & " Bytes)" end if GetVirDirPath = split(request.ServerVariables("URL"),"/") GetVirDirPath2 = request.querystring("folder") for a = 1 to ubound(GetVirDirPath)-1 ff = GetVirDirPath(a) next if GetVirDirPath2 "" then filepath = GetVirDirPath2 & "/" & item.name else filepath = item.name filepath = replace(filepath,"%","%25") filepath = replace(filepath," ","%20") response.write "" & item.name & " (" & filesize & "
" & vbcrlf end if next ' Cleanup set fs = nothing set folder = nothing end sub %>