zip file size

Posted on 2005-05-10
Last Modified: 2010-04-23
how to find the size of  a zip file
Question by:rishaan
    1 Comment
    LVL 8

    Accepted Solution

    I found this here...

       Dim fileName As String = "c:\filename.txt"
            Dim fileInfo As New FileInfo(fileName)
            Dim lSize As Long = fileInfo.Length
            MsgBox(lSize) 'bytes
            Dim lSizeKB As Double = lSize / 1024
            Dim lSizeMB As Double = lSize / (1024 * 1024)
            MsgBox(lSizeKB) 'kilo
            MsgBox(lSizeMB) 'meg

    Write Comment

    Please enter a first name

    Please enter a last name

    We will never share this with anyone.

    Featured Post

    What Should I Do With This Threat Intelligence?

    Are you wondering if you actually need threat intelligence? The answer is yes. We explain the basics for creating useful threat intelligence.

    Well, all of us have seen the multiple EXCEL.EXE's in task manager that won't die even if you call the .close, .dispose methods. Try this method to kill any excels in memory. You can copy the kill function to create a check function and replace the …
    Article by: Kraeven
    Introduction Remote Share is a simple remote sharing tool, enabling you to see, add and remove remote or local shares. The application is written in VB.NET targeting the .NET framework 2.0. The source code and the compiled programs have been in…
    Hi everyone! This is Experts Exchange customer support.  This quick video will show you how to change your primary email address.  If you have any questions, then please Write a Comment below!
    This video gives you a great overview about bandwidth monitoring with SNMP and WMI with our network monitoring solution PRTG Network Monitor ( If you're looking for how to monitor bandwidth using netflow or packet s…

    761 members asked questions and received personalized solutions in the past 7 days.

    Join the community of 500,000 technology professionals and ask your questions.

    Join & Ask a Question

    Need Help in Real-Time?

    Connect with top rated Experts

    11 Experts available now in Live!

    Get 1:1 Help Now