#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_UseX64=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include
$path = FileSelectFolder("공유할 폴더를 선택하세요.", "")
$aaa = StringSplit($path, "\")
$name=$aaa[$aaa[0]]
if StringInStr($path,":")=0 or $path="" or $name=""then
msgbox(1,"Error",$path &@CRLF&" 는 잘못된 지정입니다.")
Exit
EndIf
if msgbox(1,$name,$path &@CRLF&" 를 공유하시겠습니까.")=1 then
run('c:\windows\system32\net share "'& $name & '"="' & $path &'" /grant:everyone,full /grant:guest,full /grant:administrator,Full /grant:"authenticated users",full /users:20')
run('c:\windows\system32\icacls "' & $path & '" /grant guest:(OI)(CI)(F,AD) /grant everyone:(OI)(CI)(F,AD) /T ')
endif
|
|
