| Introduction | MTB Statements | File System | Compiler | Applications | Reference Guide | Index |
| Syntax: | DOSMS(AX-value, BX-value, Source file name, Target file name) EXCP=statement-label |
| Entry: |
All arguments are strings.
AX = "@FFF9@" BX = not used |
| Discussion: |
This pseudo function moves a file from one directory to another.
If the target directory is on the same logical drive as the source
directory, the file is renamed. Otherwise, the file is copied to
the target drive, after which the source file is erased.
It is essential to append Hex 00, "@00@" to the end of each file name. Here is a sample code fragment:
Length 2 & Local AX$ BX$
Length 3 & Local DosCode$
Length 128 & Local SourceFileName$ TargetFileName$
Print (0) (ET)
Print (0) "Enter From File"
Input (0) SourceFileName$
SourceFileName$ = SourceFileName$ + "@00@"
Print (0) "Enter To File"
Input (0) TargetFileName$
TargetFileName$ = TargetFileName$ + "@00@"
AX$ = "@FFF9@" & BX$ = "@0000@"
DOSMS(AX$,BX$,SourceFileName$,TargetFileName$) EXCP=OOPS
OOPS:
Close(49) & Open (49) "QERCOMET"
Doscode$ = "D" + HEXASC(SUB(AX$,2,1)
Read (49) Mess$
Print (0) @(0,23) Doscode$ + " " + Mess$
Input(0) ""
|