1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 | ################################################################################# #Función login de user y pass #El user y pass (hash en MD5) correcto se escriben en el bloque BEGIN #Ejecutar la función #PS C:\Users\usuario> loginH user pass function loginH { param ( [Parameter(Mandatory=$true, ValueFromPipeline=$true)] [String[]] [AllowEmptyString()] $User,$Pass ) begin { Write-Host "Principio de login" $usercorrecto="user" #El pass en MD5 #$passcorrecto="pass" $passcorrecto="1A1DC91C907325C69271DDF0C944BC72" } process { #Realizar el MD5 del pass introducido por el usuariO [Reflection.Assembly]::LoadWithPartialName("System.Web") $Pass if($User -eq $usercorrecto -and [System.Web.Security.FormsAuthentication]::HashPasswordForStoringInConfigFile($Pass, "MD5") -eq $passcorrecto) { $ok=1 } else { $ok=0 } } end { if($ok) { Write-Host "User correcto" } else { Write-Host "User no correcto" } Write-Host "Fin de login" } } ################################################################################# |