home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
cwmmc020.zip
/
CWAudio-0_2_0-eng
/
setFolder.cmd
< prev
Wrap
OS/2 REXX Batch file
|
2002-01-26
|
504b
|
22 lines
/* rexx - Change the details and sort class
of a folder to use CWAudio instead of WPFileSystem */
call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
call SysLoadFuncs
theFolder=ARG(1)
theFolder=STRIP(TRANSLATE(theFolder,' ','"'))
SAY theFolder
rc=SysSetObjectData(theFolder,'DETAILSCLASS=CWAudio;SORTCLASS=CWAudio')
IF rc=0 THEN DO
SAY 'Cannot set the details and sort class.'
'@PAUSE'
EXIT
END
SAY 'Detailsclass and sort class for folder changed.'
'@PAUSE'
EXIT