home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga MA Magazine 1998 #3
/
amigamamagazinepolishissue1998.iso
/
bazy
/
fiasco_2.1
/
arexx
/
requestdt.frx
< prev
next >
Wrap
Text File
|
1997-09-22
|
442b
|
26 lines
/* RequestDT.frx
* Open a file requester for a datatypes field
* Usage: RequestDT.frx <FieldID>
* Copyright © 1996-1997 Nils Bandener
* $VER: RequestDT.frx 6.1 (22.9.97)
*/
Options Results
Parse Arg Field
GetField '"' || Field || '"'
File = Result
if rc = 0 then
do
RequestFile '"' || File || '"' ProjectRelative
if rc = 0 then
do
File = Result
SetField '"' || Field || '" "' || File || '"'
end
end