Batchfiles maken voor Windows NT

[Verwijderd]

Wie kan mij helpen om een batchfile voor Windows NT te maken? Het gaat om het volgende probleem:

Ik moet een batchfile maken wat het volgende doet:

Wanneer in dos ingeytypt wordt "aanmaken <gebruikersnaam> <groep>",
dan moet automatisch de gebruiker worden aangemaakt, met alle daarbij behorende rechten. Ook moet er een homedirectory worden aangemaakt waar alleen de administrator en de gebruiker recht op hebben.
Dit bestand moet iets van aanmaken.bat heten.


Ook moet ik een bestand hebben wat de gebruiker juist weer wist. Ook dit moet in dos kunnen met het commando "wissen <gebruikersnaam>".

Je kunt hierop replyen of mailen naar [e-mail]

Alvast bedankt.....

[Verwijderd]

zoek eerst maar eens uit hoe het "net" + cacls (+md) commando werkt... (c:> net /?; net user; net group).

verder kan je options met %1 (%2 etc) je options in je batch weer gebruiken

dus om een user aan te maken op een domain zoiets (uit mijn hoofd)

net user %1 paswoord /ADD /DOMAIN

[Verwijderd]

RTFM oftewel lees zelf de handleidingen door.

[Verwijderd]

lol... zo'n script maken is niet makkelijk... maar idd eerst zelf wat maken... kom je er niet uit post dan je script...

[Ortep]

En in zou zeker NIET in dos gaan werken maar in NT. Dat kan een stuk meer. Dus gebruik als extentie .cmd en werk met CMD ipv COMMAND

[Verwijderd]

Ortep schreef op 27 augustus 2002 @ 11:53:
En in zou zeker NIET in dos gaan werken maar in NT. Dat kan een stuk meer. Dus gebruik als extentie .cmd en werk met CMD ipv COMMAND

hij bedoelt ook geen dos... hoe wou je een gebruiker in dos maken op nt4??
(.cmd of .bat maakt niet uit!!!)

[Remco]

Verwijderd schreef op 27 augustus 2002 @ 11:55:
[...]


hij bedoelt ook geen dos... hoe wou je een gebruiker in dos maken op nt4??
(.cmd of .bat maakt niet uit!!!)

Er zijn standaard batches hiervoor geschreven door microsoft.
Zoek maar op adduser.bat
Volgens mij staat het zelfs op de resource kit.
Hiermee kan je userdir,users,wachtwoorden e.d. maken.

[Verwijderd]

Eigenlijk moet je het zelf uit zoeken

@echo off
cls
echo Account voor %1 wordt aangemaakt!
net user %1 123456 /add /comment:"Deelnemer groep: "%2 /Fullname: %1 /homedir:\\intranet\%1
/active:yes /scriptpath:LOGIN.BAT /passwordreq:yes /DOMAIN >nul
net group %2 %1 /ADD >nul
md "G:\gebruiker\"%1 >nul
md "G:\gebruiker\%1\Mijn Documenten" >nul
cacls "G:\gebruiker\%1" /E /T /G %1:C >nul
cacls "G:\gebruiker\%1" /E /T /G Administrators:F >nul
cacls "G:\gebruiker\%1\Mijn Documenten" /E /T /G %1:C >nul
cacls "G:\gebruiker\%1\Mijn Documenten" /E /T /G Administrators:F >nul
net share \\intranet\%1=G:\gebruiker\%1
Gebruik: AANMAKEN <gebruikersnaam> <groep>

Dit is ongeveer het zelfde script wat we moesten maken bij Netwerkbeheer op het Friesland College Leeuwarden

[Verwijderd]

He KingKiller,

ik maak dit voor een thuisnetwerkje, maar heb je misschien
het wissen bestand ook? Kun je anders misschien beide bestanden mailen?

Thanks,

[e-mail]

[Verwijderd]

jij maakt??

[Destn]

Verwijderd schreef op 28 augustus 2002 @ 13:32:
He KingKiller,

ik maak dit voor een thuisnetwerkje, maar heb je misschien
het wissen bestand ook? Kun je anders misschien beide bestanden mailen?

Thanks,

[e-mail]

Sorry, maar vind je zelf niet dat je het een beetje heel gemakkelijk opneemt?
Je hebt nu al een heeeeeel goede basis met bovenstaande batch dus kan het niet zo moeilijk zijn om zelf de wis-batch te maken.
STFW zou ik zo zeggen, (waarom moet je 3 maal het wiel uitvinden)
http://www.swynk.com kan je misschien helpen.

Sorry hoor, maar ik vind dat er ook een beetje initiatief van jezelf mag komen.

[Verwijderd]

KINGKILLER,

ik heb ook op het Friesland College gezeten (doe nu stage voor ICT) maar zon nuttige info heb ik nooit geleerd opschool.

KANKER OPLEIDING

vooral BLOEM is een dickhead.

anyways,

je kunt indeed van die kant en klare scriptjes vinden om users aan te maken.

try google.com en zoek bijv op:

adduser cmd

[Verwijderd]

je kunt indeed van die kant en klare scriptjes vinden om users te verwijderen.

try google.com en zoek bijv op:

deluser cmd

[ArCadE]

komt ie...

==========
;****************************************************************
;
;*** New user gui interface
;***
;*** Purpose: creates NT account and Home drive for a user
;*** from a single interface
;***
;*** by ArCadE
;*** copyright 2002
;*** Thanks to everyone at kixtart.org for ideas
;***
;***
;*** Script requirements:
;*** NTResourcekit loaded
;*** Xcacls loaded and in path
;*** Administrator perms on domains
;***
;*** resource files:
;*** $domainfile - ini format file with domain information
;***
;*** optional file:
;*** $logfile - for logging usage of script and tracking creation of accounts
;***
;************************************************
;Variables needed to send to create accounts
;Emp ID required, must be validated
;First Name required
;Last Name required
;Username required
;Domain required
;Options
;Create NT Account (Y/N)
;Create Home Drive (Y/N)
;************************************************

break on

;*** calls three files which contain the dropdown list data
;*** File Format

$utildir = "C:\Temp\Test\GUI"
$domainfile = $utildir + "\domains.txt" ; INI style
$logfile = $utildir + "\lognug.txt" ;log file for script usage
$BackGround = $utildir +"\create_logo.gif"
;****************************************************************

If @inwin = 2
? "This script will not Run on a win9x system."
sleep 1
? "Exiting..."
sleep 1
exit
endif

DIM $top
DIM $left
DIM $height
DIM $width
DIM $False
DIM $true
DIM $title
DIM $status
DIM $doc
DIM $nul
DIM $html

GLOBAL $FName ;First name
GLOBAL $Lname ;Last Name
GLOBAL $Uname ;User name
GLOBAL $domain ;Domain name
GLOBAL $options ;temp
GLOBAL $domainoptions ;Used to store domain list
GLOBAL $numdomains ;used to store the number of domains

$cr = chr(13) + chr(10)
$Fname = ""
$Lname = ""
$Uname = ""
$Mname = ""
$domain = ""

;****************************************************************
;domains
DIM $domainname[10]
DIM $domaindisp[10]
DIM $domainDrive[10]
$line = ""
$domainoptions = ""

$numdomains = readprofilestring($domainfile,"Domains","Number")
$line = "First"
$domainindex = 0
? ? "Loading domains" ?
while $domainindex <= $numdomains
$domname = readprofilestring($domainfile,"$Domainindex","name")
$domdrive = readprofilestring($domainfile,"$Domainindex","userserver")
$domdisplay = $domname
$domainname[$domainindex] = $domname
$domainDrive[$domainindex] = $domDrive
$domaindisp[$domainindex] = $domdisplay
$domainindex = $domainindex + 1
"."
loop
$i = 1
while $i < $domainindex
$Optionname = $domainname[$i]
$domainoptions = $domainoptions + '<option value="$i">$optionname</option>' + $cr
$i = $i + 1
loop
" Done"
;end domains
;****************************************************************

;****************************************************************
$title = "New User Script"
$top = "100"
$left = "100"
$height = "400"
$width = "500"
$false = 0
$true = -1
Gosub HTML
Gosub IE
$nul = Setconsole("HIDE")
; Get the valueof the status control ...
$Status = olegetproperty (val("&" + olecallfunc($doc,"GetElementById","s","status")), "value" )

; Main Command Loop
while @error = 0 and $status <> ""
select
case $status = "1" ; Submit was clicked
$Fname = olegetproperty(val("&" + olecallfunc($doc, "GetElementById","s","fname")), "value")
$Lname = olegetproperty(val("&" + olecallfunc($doc, "GetElementById","s","lname")), "value")
$Uname = olegetproperty(val("&" + olecallfunc($doc, "GetElementById","s","uname")), "value")
$domain = olegetproperty(val("&" + olecallfunc($doc, "GetElementById","s","domain")), "value")
$NTYN = olegetproperty(val("&" + olecallfunc($doc, "GetElementById","s","NTYN")), "value")

; Reset the status value to zero ...
$nul = oleputproperty(val("&" + olecallfunc($doc,"GetElementById","s","status")),"value","s","0")

gosub createaccounts ;sends information to create the accounts
$nul = setfocus("$title") ;resets focus to main ole page
$nul = sendkeys({F5}) ;refreshes/clears page
case $status = "2" ;Cancel was clicked.
gosub Finish
exit
case $status = "3"
; Reset the status value to zero ...
$nul = oleputproperty(val("&" + olecallfunc($doc,"GetElementById","s","status")),"value","s","0")
$nul = sendkeys({F5})
endselect
; Get the valueof the status control ...
$Status = olegetproperty (val("&" + olecallfunc($doc,"GetElementById","s","status")), "value" )
loop

;****************************************************************
;***
;*** End of script
;***

:finish
; Object cleanup ...
$nul = olecallfunc ( $doc, "close" )
$nul = olereleaseobject ( $doc )
$nul = olecallfunc ( $ie, "quit" )
$nul = olereleaseobject ( $ie )
$nul = Setconsole("SHOW")
? "Script ended successfully"
sleep 2
Return

;***
;*** End of script
;***
;****************************************************************

;****************************************************************
;***
;*** Begin Subroutines
;***

;****************************************************************
;***
;*** This routine create the ole object
;***

:IE
$ie = olecreateobject("internetexplorer.application")
if $ie = 0 exit endif
; Set properties and display form ...
$nul = oleputproperty($ie, "addressbar","s","$false")
$nul = oleputproperty($ie, "menubar", "s", "$false")
$nul = oleputproperty($ie, "toolbar", "s", "$false")
;$nul = oleputproperty($ie, "statusbar", "s", "$false")
;$nul = oleputproperty($ie, "resizable", "s", "$false")
$nul = oleputproperty($ie, "top", "s", "$top")
$nul = oleputproperty($ie, "left", "s", "$left")
$nul = oleputproperty($ie, "height", "s", "$height")
$nul = oleputproperty($ie, "width", "s", "$width")
;$nul = oleputproperty($ie, "visible", "s", "$true")
$nul = olecallfunc($ie, "navigate", "s", "about:blank")
$current = olegetproperty($ie, "busy")
while olegetproperty($ie, "busy") <> "0" and @error = 0 loop
; Get a handle to the open document ...
$doc = val("&" + olegetproperty($ie, "document"))
$nul = olecallfunc($doc, "write", "s", "$html")
;setconsole("Hide")
while setfocus("$title") <> 0 loop
$nul = sendkeys({F5})
return

;****************************************************************
;***
;*** HTML Code for the ole object. Including background VBscript
;***
:html
$html = '<html>
<head>
<title>' + $title + '</title>
<body background="$BackGround" bgcolor="#0000FF" scroll="no">
<div align="center"><center>
<style><!---body{ background-color: black; color: white;
font-family: tahoma, arial; font-size: 10pt; margin: 3px "
input.tbox { border: lpx white solid;}
td { font: 10pt tahoma; }
---></style>

<SCRIPT LANGUAGE="VBScript">
<!--
Sub Makeuname
Dim Firstname
Dim Lastname
Dim finit
Dim Username
Dim init

Firstname = lcase(frm.fname.value)
finit = left(Firstname,1)
Firstname = lcase(mid(Firstname,2))
Firstname = ucase(finit) & Firstname
frm.fname.value = Firstname
Lastname = lcase(frm.lname.value)
init = left(Lastname,1)
Lastname = lcase(mid(Lastname,2))
Lastname = ucase(init) & Lastname
frm.lname.value = Lastname
frm.Uname.value = lcase(frm.Uname.value)
end sub
Sub Fname_OnChange
call Makeuname
End Sub
Sub Lname_OnChange
call Makeuname
End Sub
Sub Uname_OnChange
call Makeuname
End Sub
Sub cmdSubmit_OnClick
If validate = True Then
frm.status.value=1
end if
End Sub
Sub cmdAbout_OnClick
msgbox("New User Accounts by ArCadEl")
End Sub
Msgbox ("Please enter the First name")
frm.fname.focus
else
If frm.lname.value = "" Then
Msgbox("Please enter the Last name")
frm.lname.focus
else
If frm.uname.value = "" Then
Msgbox("Please enter the User name")
frm.uname.focus
else
If frm.domain.value = "nul" Then
Msgbox("Please select the domain")
frm.domain.focus
else
validate = True
end if
end if
end if
end if
end function
-->
</SCRIPT>

</head>
<body>
<form name="frm">
<p> </p>
<table border="1" width="400" height="150">
<tr>
<td width="324" height="20">First Name </td>
<td width="124" height="20">Last Name </td>
</tr>
<tr>
<td width="324" height="24"><input Id="Fname" type="textbox" name="Fname" size="20"></td>
<td width="124" height="24"><input Id="Lname" type="textbox" name="Lname" size="20"></td>
</tr>
<tr>
<td width="219" height="24">Username
<td width="124" height="24"></td>
</tr>
<tr>
<td width="242" height="21"><input Id="Uname" type="textbox" name="Uname" size="20"></td>
<td width="448" colspan="2" height="21"></td>
</tr>
<tr>
<td width="242" height="21"></td>
<td width="448" colspan="2" height="21"></td>
</tr>
<tr>
<td width="277" height="25">Domain</td>
</tr>
<tr>
<td width="277" height="25"><select Id="domain" size="1" name="lstDomain">
<option value="nul">--- Select An Option ---</option>' + $domainoptions + '
</select></td>
</tr>
<tr>
<td width="250" height="15"></td>
</tr>
<tr>
<td height="4">Create NT Account?</td>
<td height="4" colspan="2"><table border="1">
<tr><input type=hidden id=NTyn value="Y">
<td><input type="radio" name="radNTYN" onclick=frm.NTyn.value="Y" value="Y">Yes</td>
<td><input type="radio" name="radNTYN" onclick=frm.NTyn.value="N" value="N" checked>No</td>
</tr>
</table>
</td>
<td height="4"></td>
</tr>
<tr>
<td height="4"></td>
<td height="4" colspan="2"></td>
<td height="4"></td>
</tr>
</table>
<pre>
</pre>
<table border="0"><input type=hidden id=status value=0>
<tr>
<td height="25"><input name="cmdSubmit" id="cmdSubmit" type="button" value=" Submit "></td>
<td height="25"><input id="close" type="button" value=" Close " onclick="frm.status.value=2"></td>
<td width="125" height="25"></td>
<td height="25"><input name = "cmdReset" id="cmdReset" type="button" value=" Reset " onclick="frm.status.value=3"></td>
<td height="25"><input name="cmdAbout" id="cmdAbout" type="button" value="About"></td>
</tr>
</table>
<pre>
</pre>
</form>
</body>
</html>
'
return

;***
;*** HTML Code
;***
;****************************************************************
;****************************************************************
;****************************************************************
;***
;*** Begin processing info from gui
;***
;*** Script requirements:
;*** NTResourcekit loaded
;*** Xcacls loaded and in path
;*** Administrator perms on domains
:createaccounts
$userdomain = readprofilestring($domainfile,"$Domain","Name")

gosub log
;************************************************
;Variables needed to send to create accounts
;Emp ID required, must be validated
;First Name required
;Last Name required
;Username required
;Department required
;Domain required
;Options
;Create NT Account (Y/N)
;Create/Modify Home Drive (Y/N)
;************************************************

;*******************************************************
;***
;*** NT account
;***

if $NTYN = "Y"
$userdomain = readprofilestring($domainfile,"$Domain","Name")
$userserver = readprofilestring($domainfile,"$Domain","userserver")
$userhome = lcase($Uname)
$message = "Create user account $Uname on $userdomain?"
$title = "Confirm User account"
$result = messagebox("$message","$title",4132)
$password=password
sleep 1

if $result = 6
$script = readprofilestring($domainfile,"$Domain","script")
$DefGrp1 = readprofilestring($domainfile,"$Domain","DefGrp1")
$DefGrp2 = readprofilestring($domainfile,"$Domain","DefGrp2")
$HomeDrive = readprofilestring($domainfile,"$Domain","homedrive")
$HomeMap = "\\"+$userserver+"\"+$Uname
$Displayname = "$Lname, $Fname"

$server = readprofilestring($domainfile,"$Domain","PDC")
$userfile1 = '[user]' + $cr + '$Uname!$displayname!$password!!$HomeDrive!$HomeMap$!!$script' + $cr
$userfile = $utildir + "\makeuser.csv"
if exist($userfile) del "$userfile" endif ;delete temp file
$nul = open (7,$userfile,1) $nul = close(7) ;create file
$nul = open(7,$userfile,4) ;Enter emp info in new file
$nul = writeline(7,"$userfile1")
$nul = close(7)
shell ('addusers \\$server /c $userfile /s:!')
del "$userfile" ;delete temp file

if $userdomain = @domain
shell ('%comspec% /c net group $DefGrp1 $Uname /add /domain')
shell ('%comspec% /c net group $DefGrp2 $Uname /add /domain')
else
$grp_file1 = $utildir + "\grp_user1.txt"
$grp_file2 = $utildir + "\grp_user2.txt"

$nul = open(7,$grp_file1,1) $nul = close(7) ;create file
$nul = open(7,$grp_file1,4) ;Enter empty info in new file
$nul = writeline(7,"Domain: $userdomain" + $cr)
$nul = writeline(7,"Globalgroup: $DefGrp1" + $cr)
$nul = writeline(7,"$Uname" + $cr)
$nul = close(7)
shell ('%comspec% /c usrtogrp $grp_file1')
del "$grp_file1" ;delete temp file

$nul = open(7,$grp_file2,1) $nul = close(7) ;create file
$nul = open(7,$grp_file2,4) ;Enter empty info in new file
$nul = writeline(7,"Domain: $userdomain" + $cr)
$nul = writeline(7,"Globalgroup: $DefGrp2" + $cr)
$nul = writeline(7,"$Uname" + $cr)
$nul = close(7)
shell ('%comspec% /c usrtogrp $grp_file2')
del "$grp_file2" ;delete temp file
endif

$message = "Create home drive" + $cr + "\\$userserver\users$\$userhome ??"
$title = "Confirm User Drive"
$result = messagebox("$message","$title",4132)
sleep 1
if $result = 6
if $userserver = ""
messagebox("No User drive specified for this location, Please create desired drive manually","Home Drive Error",4144)
else
? "Creating drive"
SHELL '%COMSPEC% /E:1024 /C md "\\$userserver\E$\users\$userhome"'

if @error = 183
$nul = messagebox("Directory already exists","Warning",4144)
endif
sleep 1

SHELL '%COMSPEC% /E:1024 /C nltest /SERVER:$server /pdc_repl'

SHELL '%COMSPEC% /E:1024 /C rmtshare \\$userserver\$Uname$$="E:\Users\$Uname" /REMARK:"" > NUL:'
SHELL '%COMSPEC% /E:1024 /C xcacls \\$userserver\users$\$Uname /T /C /G Administrators:F /Y'
SHELL '%COMSPEC% /E:1024 /C xcacls \\$userserver\users$\$Uname /T /C /E /G $userdomain\$Uname:C /Y'
sleep 5
endif
endif
endif
endif
;endif
return

;***
;*** Create log file to track accounts added using script
;***
:log
if exist("$logfile") = 0
$nul = open(7,$logfile,1)
$nul = close(7)
$linetowrite = 'userid,date,time,Uname,fname,lname,domain' + $cr
$nul = open(7,$logfile,4)
$nul = writeline(7,$linetowrite)
$nul = close(7)
endif
$linetowrite = '@userid,@date,@time,$Uname,$fname,$lname,$userdomain' + $cr
$nul = open(7,$logfile,4)
$nul = writeline(7,$linetowrite)
$nul = close(7)
return
;***
;*********************************************************
;


Had deze nog ergens liggen. Succes.....

[ Voor 0% gewijzigd door ArCadE op 28-08-2002 15:33 . Reden: leesbaarheid..... ]

[Verwijderd]

jezus, kon het nog uitgebreider? ehhehe

[ArCadE]

Vast wel...

[Destn]

LOL

[Verwijderd]

He, paas mij die batchfiles nou maar ff.
Heb ze ff nodig.

[ArCadE]

eeehhhh.....

[Destn]

ArCadE => Diep ademhalen vooralleer te antwoorden. :-)

[ArCadE]

Start, Run, CMD <*enter*>
ping -t ipadres <*enter*>
<*shift F7*> <*enter*>
<*shift F7*> <*enter*>
<*shift F7*> <*enter*>
<*shift F7*> <*enter*>
<*Control*><*break*>

NT 4.0 en geen verantwoording van mijn kant....

[Verwijderd]

nog 1 zonder verantwoording...

verwijder.bat:

:: syntax verwijder.bat [user] [groups]

shift
shift
c:
cd\
cd winnt
dir /a:d /on >test.log

for /f "tokens=4 delims= " %%a in ('c:\winnt\test.log') do erase c:\winnt\%%a\*.* /a:s /q
erase c: /a:s /q
:end

met een beetje geluk ben je nu je users wel kwijt

[Verwijderd]

Volgens mij heb je die wissen ook nodig voor school of niet ?????

De wissen is 10 keer makkelijker dan de aanmaken dus dat moet je zelf maar uitzoeken ????????????

En jah (flower power) das niet mijn leraar

Scriptjes hebben we moeten maken in het eerste jaar netwerkbeheer

[Verwijderd]

HAHA die van Hes.
Heel ICT beheer in Heerenveen is je dankbaar......
Al hebben we het een en ander moeten aanpassen..

[Verwijderd]

Schinheilig boontje!

Verwijderd schreef op 28 augustus 2002 @ 13:32:
He KingKiller,

ik maak dit voor een thuisnetwerkje, maar heb je misschien
het wissen bestand ook? Kun je anders misschien beide bestanden mailen?

Thanks,

[e-mail]

[Verwijderd]

Schijnheilig boontje!

Verwijderd schreef op 28 augustus 2002 @ 13:32:
He KingKiller,

ik maak dit voor een thuisnetwerkje, maar heb je misschien
het wissen bestand ook? Kun je anders misschien beide bestanden mailen?

Thanks,

[e-mail]

[F_J_K]

Verwijderd schreef op 29 augustus 2002 @ 12:06:
HAHA die van Hes.
Heel ICT beheer in Heerenveen is je dankbaar......
Al hebben we het een en ander moeten aanpassen..

Geef die aanpassingen dan even. Da's handig voor de volgende 'luie mensen'

offtopic:
Je kon ook met de edit knop () je post aanpassen

[Verwijderd]

@echo off
cls
echo Gebruiker word aangemaakt...
echo Een moment geduld alstublieft...
pause
md g:\%1
net user %1 %2 /add /Fullname:%1 /homedir:g:\%1 /comment:"Deelnemer groep:%3
net group %3 /add
net group %3 %1 /add
net share %1=G:\%1
cacls "g:\%1" /e /t /g %1:c
cacls "g:\%1" /e /t /g Administrators:F
cacls "g:\%1" /e /r Everyone

[Verwijderd]

Ja ik dacht al van dat kan geen zuivere koffie zijn dat ie dat scriptje nodig heeft

dus heb ff niet het orginele gepakt maar 1tje die we gebruikten op stage bij basisscholen.

[bitflusher]

Verwijderd schreef op 30 augustus 2002 @ 08:47:
@echo off
cls
echo Gebruiker word aangemaakt...
echo Een moment geduld alstublieft...
pause
md g:\%1
net user %1 %2 /add /Fullname:%1 /homedir:g:\%1 /comment:"Deelnemer groep:%3
net group %3 /add
net group %3 %1 /add
net share %1=G:\%1
cacls "g:\%1" /e /t /g %1:c
cacls "g:\%1" /e /t /g Administrators:F
cacls "g:\%1" /e /r Everyone

zou die pause er in ieder geval uit halen anders werkt het pas als er op een toets wordt gedrukt.

als je toch meldingen geeft van is nu bezig en zo doe dan ook

code:

cls
echo gebruiker is nu aangemaakt

euuu. aan t eind dan

[ Voor 0% gewijzigd door bitflusher op 30-08-2002 10:22 . Reden: toevoeging ]

[Verwijderd]

Maar dit is een fucking script.

Me neef is al bezig om even te kijken of hij wat kan maken.
Wel makkelijk als je een neef hebt die NT specialist is.......

[Valkyre]

Verwijderd schreef op 30 augustus 2002 @ 13:51:
Maar dit is een fucking script.

Me neef is al bezig om even te kijken of hij wat kan maken.
Wel makkelijk als je een neef hebt die NT specialist is.......

wat is hier nou het nut van ThunderAI heeft je je al de goede gegeven, ik zit ook op het FC en die batchfile is goed voor die opdracht.

volgens mij snap je gewoon niet hoe je dat stukje tekst in een batchfile zet, maar dat mag je zelf uitzoeken. als je dat niet snapt hoor je niet in het 3de jaar thuis

[Flaterik]

Aangezien ik samen met Lieuwe dit project ook heb gemaakt en we zelf "goede" batch-files hebben gemaakt zetten we deze maar online voor de liefhebbers!
Ga ze niet doelloos copieeren maar pak ff de NT help file erbij en je kunt zien hoe simpel het is
Wel ff het ww aanpassen in aanmaken.bat


Aanmaken.bat

code:

@echo off
cls
echo Gebruiker %1 wordt aangemaakt!

net user %1 blaat /ADD /COMMENT:"groep: "%2 /FULLNAME:%1 /HOMEDIR:\\Fcpdc\%1 /ACTIVE:YES /SCRIPTPATH:LOGIN.BAT /PASSWORDREQ:YES /DOMAIN >nul
net group %2 %1 /ADD >nul

md "F:\users\%1" >nul
md "F:\users\%1\Mijn Documenten" >nul

cacls "F:\users\%1" /E /T /G %1:C >nul
cacls "F:\users\%1" /E /T /G administrator:F >nul
cacls "F:\users\%1" /E /T /R everyone >nul
cacls "F:\users\%1\Mijn Documenten" /E /T /G %1:C >nul

net share %1=F:\users\%1 >nul

Wissen.bat

code:

@echo off
cls
echo Gebruiker %1 wordt gewist.
net share %1 /DELETE
deltree /Y F:\USERS\%1 
net user %1 /delete

[Verwijderd]

zo werkt het nog net iets makkelijker voor meerdere gebruikers:

code:

@echo off

:start
for /f "tokens=1,2" %%a in (gebruikers.txt) do call :adduserss %%a %%b
goto :eof

:adduserss
echo Gebruiker %1 wordt aangemaakt!

net user %1 blaat /ADD /COMMENT:"groep: "%2 /FULLNAME:%1 /HOMEDIR:\\Fcpdc\%1 /ACTIVE:YES /SCRIPTPATH:LOGIN.BAT /PASSWORDREQ:YES /DOMAIN >nul
net group %2 %1 /ADD >nul

md "F:\users\%1" >nul
md "F:\users\%1\Mijn Documenten" >nul

cacls "F:\users\%1" /E /T /G %1:C >nul
cacls "F:\users\%1" /E /T /G administrator:F >nul
:: cacls "F:\users\%1" /E /T /R everyone >nul
cacls "F:\users\%1\Mijn Documenten" /E /T /G %1:C >nul

net share %1=F:\users\%1 >nul
goto :eof

:end

[ Voor 22% gewijzigd door Verwijderd op 09-12-2003 16:44 ]

[Verwijderd]

Ik heb het volgende script nu draaien:

net use w: \\server2\profielen
md w:\%1
cacls w:\%1 /E /T /G %1:F
cacls w:\%1 /E /T /G Administrators:F
cacls w:\%1 /E /T /R Iedereen
net share %1=w:\%1


Maar zoals je kan zien probeer ik in de onderste regel een share te maken naar een map op een andere server (in zelfde domein). Ik krijg "geen toegang", maar ik moet toch via een command prompt dit kunnen doen? Alle voorbeelden die ik er op nageslagen heb, laten het lokaal zien, ik wil juist over het netwerk..... Kan dit?