Code: Select all
"Share Hard Drive"
msg "Share entire hard drive ?<br>test=read & %username%=full" , 1;
$d=get("drives");
$d=replace("$d", "\", "");
// returns Drive strings (C:, D:, E:):
foreach($token, "$d", "|") {
$n=replace("$token", ":", ""); //drive valid name
runret ("net share ""$n""=""$token"" /GRANT:%username%,FULL /GRANT:test,Read /remark:""%username%,test""")
}
Code: Select all
"Delete Hard Drive Share"
msg "Delete Share Hard drive?" , 1;
$d=get("drives");
$d=replace("$d", "\", "");
// returns Drive strings (C:, D:, E:):
foreach($token, "$d", "|") {
$n=replace("$token", ":", "");
runret ("net share ""$n"" /delete")
}