Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.
Keywords: change ownership on files
;Program to change ownership on files ;Command line parameters specify starting folder, new owner, include subdirectories, URL of network server ; AddExtender("WWWNT32I.DLL") AddExtender("wsrch32i.dll") xcount=0 flag=8 ;includes hidden files in the search ;make sure there are at least 2 command line parameters, and not more than 4 if param0<2 || param0>4 Message("USAGE","Owner.exe< S to include subdirectories> ") exit endif ;param1 contains starting folder, so make sure it exists If !DirExist(param1)then exit ;check if subdirectories are included if param0>2 if StrUpper(param3)=="S" then flag=24 endif ;check if network server specified if param0<4 then param4="" ;not specified ;start=Askline("PATH","Please enter the starting folder","") ;owner=Askline("OWNER","Please enter the required owner for these files","") handle=srchInit(param1,"*.*","","",flag) while 1 xfile=srchNext(handle) if xfile=="" then break xcount=xcount+1 ;ErrorMode(@OFF) ;owner = wntOwnerGet("", 0, xfile, 300, 0) ;ErrorMode(@ON) ;Message("%XFILE% Owner is", owner) wntOwnerSet(param4, 0, xfile, 300, param2) endwhile srchFree(handle) exit ;Display(2,"STATUS","FINISHED!")
Article ID: W14952
File Created: 2001:11:08:12:41:06
Last Updated: 2001:11:08:12:41:06