Ã» ÓÐ Õâ Ñù µÄ API£¬ µ« ¿É ÒÔ Ê¹ ÓÃ FileSystemObjectÀ´ Êµ ÏÖ £¬ Èç £º 
     Dim fso As FileSystemObject 
     Dim f As Folder 
     
     Set fso = CreateObject("Scripting.FileSystemObject") 
     Set f = fso.GetFolder("c:\winnt") 
     Print f.Size 
<END>
