home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 11 Util
/
11-Util.zip
/
PWFOLDER.ZIP
/
PWFMAKE.CMD
< prev
next >
Wrap
OS/2 REXX Batch file
|
1993-04-26
|
545b
|
23 lines
/* */
Call RxFuncadd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
Call SysLoadFuncs
'@echo off'
SAY "Enter password for folder: "
PULL FOLDERPW .
RetCode = SysCreateObject( "PWFolder", "Password Folder", "<WP_DESKTOP>", "PASSWORD="FOLDERPW";OBJECTID=<MyFolder>")
if RetCode then
say 'PWFolder Object created'
else do
say 'Error creating object'
exit(1)
end
say 'A Folder has been created with the password: 'FOLDERPW
say 'select the context menu option LOCK to lock it'
say 'Switch to PM to test object.'