&lt;'--2. Yöntem &gt; &lt;% '-- Değişkenler tanımlandı. Dim cnnDB, Rs, kayitsayisi, MySQL '-- cnnDB isimli veritabanı bağlantı nesnesi oluşturuldu. Set cnnDB=Server. CreateObject '-- ODBC'den MyDatabase isimli veritabanı açıldı. cnnDB. Open &quot;MyDatabase&quot; '-- SQL oluşturuldu. mySQL=&quot;Select COUNT FROM TblOrnek;&quot; '-- SQL bağlantı nesnesi üzerinde çalıştırılarak Rs isimli recordSet nesnesine aktarıldı. Set Rs =cnnDB. Execute '-- Rs'in 0. Alanı kayıt sayısını bize verdi. kayitsayisi=Rs(0) '-- Kayıt sayısı ekrana yazdırıldı. Response. Write kayitsayisi '-- RecordSet kapatıldı. Rs. Close '-- Bağlantı kapatıldı. cnnDB. Close '-- Bağlantı bellekten silindi. Set cnnDB=Nothing %&gt;

ancak yazdığın kayıt sayısını almak benım ıstedığım, mesela serverda klasorde 100 dosya var, bu 100 dosyanın toplam kaç mb olduğu ve bunu dırekt serverdan alması lazım çunku verıtabanında kaç kb oldukalrı yazmıyor

mithrandil' Alıntı:

&lt;% Set FSO = CreateObject Set Klasor = FSO. GetFolder(Server. Mappath Response. Write Klasor. Size %&gt; Çıkan sonucu 1024'e bölersek sonucu KB cinsinden alırız. &lt;% Set Klasor = FSO. GetFolder(Server. Mappath Response. Write Klasor. Size/1024 %&gt; Burasıda KB oldu

Teşekkru edermı sayende halletmışem buyulsun sağolun

pekı, 426 mb ı dırek gosterme ne oluyor yanı çok kusuratlı oluyr boyle

Virgülden sonraki rakam farkı 0,5 den küçükse bir üst sayıya yuvarlama fonksiyonu yazdım. En azından 6,51 ya da 6,99 u 7 ye yuvarlayacak Kod:

Bu şekilde yapıp tam sayıya çevirebilirsin. Virgülden sonrasını atar. Ama mesela 6,99 nerdeyse 7 sayılır. Bunuda 6 şeklinde gösterir. Haberin olsun. &lt;% Set FSO = CreateObject Set Klasor = FSO. GetFolder(Server. Mappath Response. Write int(Klasor. Size/1024/1024) %&gt;

server a kullanıcılar dosya yukluyo çeşitli boyutlarda, yuklemış oldukları boyutları ben toplam olarak nasıl gosterebılırım sıtede, toplam xx mb dosya vardır, eğer kullanıcıalr dosyaların boyutunu yazsaydı labılrıdı ama hepsı boş bırakıyor dırekt serverda yuklenen klasorun toplam boyutunu alma gıbı bır işlem yapmam lazım uzun sure araştırdım ancak bir sonc elde edeemdım bılen varsa yardım ederse sevınırım

&lt;% ' Veritabanına bağlanalım set kon=server. createobject conn. open= &quot;DRIVER= ; DBQ= &quot; &amp; server. mappath set rs=server. createobject sql = &quot;select from tablo&quot; conn. open sq, kon,3,3 %&gt; 'Sonra Recordcount yöntemi ile kayıt sayısını kolayca alıyoruz. Veritabanındaki tabloda toplam &lt;% rs. recordcount%&gt;kayıt var metodu ile alabilirsin.

dediğin şekılde yaptım, byte oalrak verıyı aldım dha sorna bu verıyı, 1 mb a karşılık gelen byte e cevırdım yanı 1024000 a ancak sonuc sanırım doğru değil, ve bundan zıyade neden bu kadar kusurlu vardu yuvarlama ımkanım yokmu bunu Sitemizde 440228796 Byte a Karşılık 429.910933 MB Ödev Bulunmaktadır...

1024 ün katları şeklinde gider ölçüler. 1024x1024=1048576 ya böl. Bilgisayarındaki bir klasöre sağ tıkladığında da buna benzer bir sonuç alırsın. Ya da harddiskler. 2500 mb lık harddiski 2,5 gb diye satıyolar ama aslında 2,3 gb tır

round(Klasor. Size/1024,2)