• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Çözüldü Dosya boyutu (Bayt) olarak almak

  • Konbuyu başlatan Konbuyu başlatan k0081
  • Başlangıç tarihi Başlangıç tarihi
Katılım
17 Haziran 2008
Mesajlar
1,874
Excel Vers. ve Dili
Microsoft Ofis Profesyonel 2019 x64 TR
Merhaba arkadaşlar;

Filelen ile dosya boyutunu bir txtboxa alıyorum

txtboyut = FileLen(txtdosya)

Fakat, büyük dosyalarda eksi(-) işareti ile başalayan alakasız bir sayı veriyor...

Bu nereden kaynaklanıyor

Yardımcı arkadaşa şimdiden teşekkür ederim.

******************************** BU KONU ÇÖZÜLMÜŞTÜR ********************************

Bu kod ile değiştirdiğimde doğru sonucu aldım.


Kod:
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFile(txtdosya)
MsgBox f.Size
 
Son düzenleme:
Geri
Üst