Home Contact Site Map Privacy Policy Rev Search
System Info
 

News & Info
Products
Services
Developer's Corner
Sample Projects
Site Search
Sprezzatura Links
Support Section

Up
Choose Dir
Choose File
Choose Font
System Info


 

 

 System Info

GetDiskFree

GetDrives

GetFolders

GetDiskFree

METHODGETDISKFREE
DescriptionThis method returns a string containing the number of bytes free on a given disk.
  
PARAM1Drive letter to get the free space for. Pass null to use the current drive.
PARAM2String containing the number of bytes free on the specified disk.
PARAM3n/a
PARAM4n/a
PARAM5n/a
  
Code Sampledrive = "D"
bytesFree = ""
if zz_Utility_Dll("GETDISKFREE", drive, bytesFree, "", "", "", "", errorText ) then

* bytesFree contains what was chosen
end else

* Handle error - see errorText var
end

[top]

GetDrives

METHODGETDRIVES
DescriptionReturns a field mark delimited list of drive information
  
OBJECTReturn a field mark delimited dynamic array representing the drives on the system. Each field is value mark delimited as follows
 
<0,ZZ16GDR_POS_DRIVETYPE$>Drive Type - a digit representing the type of drive found with the integers as follows :-
 
ZZ16GDR_DRIVETYPE_UNKNOWN$Unknown
ZZ16GDR_DRIVETYPE_NONE$No drive
ZZ16GDR_DRIVETYPE_FLOPPY$Floppy disk (includes all removable disks such as Zip drives)
ZZ16GDR_DRIVETYPE_FIXED$Fixed disk (hard drive)
ZZ16GDR_DRIVETYPE_NETWORK$Network drive
ZZ16GDR_DRIVETYPE_CDROM$CD Rom drive
ZZ16GDR_DRIVETYPE_RAM$RAM drive
<0,ZZ16GDR_POS_DRIVELETTER$>Drive Letter
<0,ZZ16GDR_POS_DRIVELABEL$>Drive Label
PARAM1n/a
PARAM2n/a
PARAM3n/a
PARAM4n/a
PARAM5n/a
ERRORTEXTAny error message
  
Code SampleRetVal = zz_Utility_Dll("gETDRIVEs", Drives)
DriveCount = Count(Drives, @Fm) + 1
Msg = 'Your drives are as follows :-'
DriveString = "Unknown,None,Floppy,Fixed,Network,CD Rom,RAM"
For X = 1 To DriveCount

Msg := \0D0A\ : Drives<X,2> : ": - " : Field(DriveString, ",", Drives<X, 1> + 1) : " - " : Drives<X,3>

Next
Call Msg(@Window, Msg)
Screen dump

[top]

GetFolders

METHODGETFOLDERS
DescriptionReturn a field mark delimited dynamic array of the folders below the folder specified. Note that only the folders directly below the current folder will be returned. To drill down a directory recursive calls must be made.
OBJECTDirectory to start at
PARAM1If this parameter is set the directory listing is sorted in ascending left justified order before being returned.
PARAM2n/a
PARAM3n/a
PARAM4n/a
PARAM5n/a
ERRORTEXTAny error message
  
 Code sampleRetVal = zz_Utility_Dll("getfolders", "\program files",Folders,1)
FolderCount = Count(Folders, @Fm) + 1
Msg = 'Your folders are as follows :-'
For X = 1 To FolderCount

Msg := \0D0A\ : Folders<X>

Next
Call Msg(@Window, Msg)
Screen dump

[top]

 
Copyright © 2005 The Sprezzatura Group. All rights reserved.