home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Zodiac Super OZ
/
MEDIADEPOT.ISO
/
FILES
/
13
/
N_B_V203.ZIP
/
FILESTUF.DMO
< prev
next >
Wrap
Text File
|
1996-07-04
|
2KB
|
34 lines
$if 0
┌──────────────────────────╖ PowerBASIC v3.20
┌──┤ DASoft ╟──────────────────────┬──────────────────╖
│ ├──────────────────────────╢ Copyright 1995 │ DATE: 1995-10-01 ╟─╖
│ │ FILE NAME FILESTUF.DMO ║ by ╘════════════════─ ║ ║
│ │ ║ Don Schullian, Jr. ║ ║
│ ╘══════════════════════════╝ ║ ║
│ A license is hereby granted to the holder to use this source code in ║ ║
│ any program, commercial or otherwise, without receiving the express ║ ║
│ permission of the copyright holder and without paying any royalties, ║ ║
│ as long as this code is not distributed in any compilable format. ║ ║
│ IE: source code files, PowerBASIC Unit files, and printed listings ║ ║
╘═╤═════════════════════════════════════════════════════════════════════╝ ║
│ .................................... ║
╘═══════════════════════════════════════════════════════════════════════╝
$endif
$INCLUDE "DAS-NB02.INC"
COLOR 7,0
CLS
? "┌────────────────────────────────────────────────────────────────────────
? "│ fKillFile% ( FileSpec$ ) same as the KILL statement
? "│ fReNameFile% ( FromSpec$, ToSpec$ ) same as the NAME statement
? "│ fCopyFile% ( FromSpec$, ToSpec$ ) copies a file to another
? "│ fSetAttrib% ( FileSpec$, Attrib? ) sets a file's attribute(s)
? "├────────────────────────────────────────────────────────────────────────
? "│ Most of these are straight forward functions. Some replace PowerBASIC
? "│ statements to provide error trapping/reporting while others just do a
? "│ simple task. The files in question should NOT be open when the functions
? "│ are called or an error will be reported.
? "└────────────────────────────────────────────────────────────────────────