home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 10 Tools
/
10-Tools.zip
/
cwmmc020.zip
/
CWMFldr-0_2_0-eng
/
bin
/
setFolder.CMD
< prev
next >
Wrap
OS/2 REXX Batch file
|
2002-01-27
|
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