'=========================================================================== ' Subject: GET AMOUNT OF FREE DISK SPACE Date: 02-09-99 (23:31) ' Author: Tony Jones Code: VBWIN ' Origin: members.xoom.com/hllprogram Packet: VBWIN.ABC '=========================================================================== ' Returns amount of free disk space, for VB4.0+ DEFINT A-Z:DIM SHARED K,S,B&,Z&:V1 'Created by PostIt! 7.2 SUB V1:OPEN "O",1,"DRVSPACE.ZIP",4^6:Z&=1740:?STRING$(50,177); U"%up()%9%'%R-%K[&nFPb;HQC%%%%D&%%%1%%%%iw&%xuf%hjSg.fxBQ7NNCq%OR U"nzg-BYp+pErz])zuk]FtNF[nZy[-^kTM?BEHxb?&MA9BqGQuZ^[^\AnrG%nQoz8 U"?PFpR+p3v5e13;G64:t&u+ck+5vCNXuN: U"l^Htq?L^tE$6H+7x+Xk&&XSW^Uf%G0H%/q3/YA+i^6w8,--Jp0mAmwG3cts$d\O U"jD/?b7MOB+xs_1hhSP07h98&whj8.x9?Yg?j6ONo&L3+3,r&$og9OjGNbJ U"L:bW+x?y2D9qJOn*$MCt\*:Ootk9pB\+P98_)6gyRM:kx+MEW,[)3/cPt21TmY[ U">kc=(gO7C\SS^vQf#.Js(\M.T=muA7?Uf::eGi2YrX%:#e3+0Ye9t(+1TFP$+Z[ U"$Uix:d#raV0&*mRf$NxodN'QodA)k/dLgVu/(M0JZuLqpOXboXvLk&sp.;&4>xk U"1<%&0Z472?svx<;*Fcc2t:eF=xFk%Df2YQJNe1zae8rYb\XSiT'NI-*gd7YKG:9 U"h'(tIh?6*sf9Q(#'JXG#9,EEmOfj%ng3/+1w5rH=;EmIofgyln2$8faOoHUDR-K U"[8OcXe.g0Q6HFYio6Sgmv5dQ'2l?CBq8-0;0$70M+0zgkjV=2]%9l.09VZ+O0nE U"JQYxP<([g.$FY^%:/cD6[S:]Fetns0fE^*pk/mpI^%=p2\-+c^V([[HXZL U">Y:u(#So1Gb$o^mBjkMEHlO>O45ZZVZmwI>,0(]Arh8oVlQQc-)8\xg$cV-8M U".C(SA.JUE$8'2qau?,1^$9O8SK/f3f#kPQ,tl9sYZ)Kcd1HRO[.(vaQJKQdhz\/ U"2lE-PJ#of>>l':rm;FT05p5ij4SgBNr;p;m8t?: U"b?[Rbm$mMJD]CUWt4?c(HhXT-]HCf$_tSDn]=]kVxTuogkFYR_:7ojkR1q;xMu> U"5tRL/uYHacn0^l:,v,z9BJ>%tI%0Og4kh-Um,45]tB6FPX.TkikN\j-3%($c_&; U"6Eqbqi1t8]7JhJ1(+Z2mqn#>%)F8xZ,%9?Rwer\)W8)JZ4XjPv'JMa3H$Kk_54Z U"BO0qQE\Y#De<-NeqziMZBXl-:N)&+*n1mgO>*aS9f3Q?LwWl=Qm>DmK._;TH][, U"U44:C.f:Y''huPNpkvpyWl;9DOprVZ]Co)*NB[_tG*e2J2/M\H7as9woupSQAmV U")Pr)YI5o