From: | Brian Scott |
Date: | 7 Jun 2001 at 11:02:05 |
Subject: | Re: How do I check files exist and are the same? |
Hello Andrew
Here's something to play with for checking sizes..
devinfo='T:devinfo'
dev='DF1:' /* device being checked */
ADDRESS command ('info >'devinfo dev) /* standard ADOS info command */
CALL open('r',devinfo,'r');dinfo=readch('r',300);CALL close('r')
parse var dinfo . (dev) size used free full errs status name .
say "size:"size "used:"used "free:"free "full:"full "errs:"errs
"status:"status "name:"name
Brian
ARexx mailing list - No flames, no overquoting, no crossposting.
Unsub: Blank mail to mailto:arexx-unsubscribe@yahoogroups.com
Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/