#Version du 21 fevrier 2013

Clear-Host
function create-account () {
	$hostname = hostname
	$MyLocalComputer = [adsi] "WinNT://$hostname"
	$localaccountlogin= "alocalaccount"
	$localaccountfullname= "Local account fullname"
	$objlocalaccount = $MyLocalComputer.Create("User", $localaccountlogin)
	$objlocalaccount.put("FullName", $localaccountfullname)
	$objlocalaccount.put("Description","")
	$objlocalaccount.SetPassword("Password1")
	$objlocalaccount.SetInfo()
}
create-account