Learn how to a build a cloud-first strategyRegister Now


zip file size

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

Accepted Solution

bman9111 earned 200 total points
ID: 13967986
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

Featured Post

Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This tutorial demonstrates one way to create an application that runs without any Forms but still has a GUI presence via an Icon in the System Tray. The magic lies in Inheriting from the ApplicationContext Class and passing that to Application.Ru…
Article by: jpaulino
XML Literals are a great way to handle XML files and the community doesn’t use it as much as it should.  An XML Literal is like a String (http://msdn.microsoft.com/en-us/library/system.string.aspx) Literal, only instead of starting and ending with w…
This Micro Tutorial will teach you how to add a cinematic look to any film or video out there. There are very few simple steps that you will follow to do so. This will be demonstrated using Adobe Premiere Pro CS6.
Despite its rising prevalence in the business world, "the cloud" is still misunderstood. Some companies still believe common misconceptions about lack of security in cloud solutions and many misuses of cloud storage options still occur every day. …
Suggested Courses
Course of the Month20 days, 19 hours left to enroll

810 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