Generar contraseñas aleatorias con PowerShell

Add-Type -AssemblyName System.Web
$Longitud = 12
$Caracteres = 3
[System.Web.Security.Membership]::GeneratePassword($Longitud, $Caracteres)

Add-Type -AssemblyName System.Web

$Longitud = 12

$Caracteres = 3

[System.Web.Security.Membership]::GeneratePassword($Longitud, $Caracteres)

Convertir un texto en código HTML

Add-Type -AssemblyName System.Web
[System.Web.HttpUtility]::HtmlEncode('Informationen über die Grafikkarte')
[System.Web.HttpUtility]::HtmlEncode('Información sobre la tarjeta gráfica')

Add-Type -AssemblyName System.Web

[System.Web.HttpUtility]::HtmlEncode('Informationen über die Grafikkarte')

[System.Web.HttpUtility]::HtmlEncode('Información sobre la tarjeta gráfica')

Leer artículos de la Wikipedia mediante la voz del Sistema Operativo con PowerShell

Add-Type -AssemblyName System.Speech
$synthesizer = New-Object -TypeName System.Speech.Synthesis.SpeechSynthesizer
$synthesizer.SelectVoice("Microsoft Zira Desktop")
$synthesizer.Rate=0

$json=Invoke-WebRequest -Uri 'https://en.wikipedia.org/w/api.php?action=parse&format=json&prop=text&page=PowerShell' | ConvertFrom-JSON
 
$json.parse.text.'*' -replace "<.*?>" | %{
$synthesizer.Speak($_)
}

Add-Type -AssemblyName System.Speech

$synthesizer = New-Object -TypeName System.Speech.Synthesis.SpeechSynthesizer

$synthesizer.SelectVoice("Microsoft Zira Desktop")

$synthesizer.Rate=0

$json=Invoke-WebRequest -Uri 'https://en.wikipedia.org/w/api.php?action=parse&format=json&prop=text&page=PowerShell' | ConvertFrom-JSON

$json.parse.text.'*' -replace "<.*?>" | %{

$synthesizer.Speak($_)

}

Ver las voces disponibles en el sistema operativo

Add-Type -AssemblyName System.Speech
$voz = New-Object System.Speech.Synthesis.SpeechSynthesizer
$voz.GetInstalledVoices() | Select-Object -ExpandProperty VoiceInfo | Select-Object -Property Culture, Name

Add-Type -AssemblyName System.Speech

$voz = New-Object System.Speech.Synthesis.SpeechSynthesizer

$voz.GetInstalledVoices() | Select-Object -ExpandProperty VoiceInfo | Select-Object -Property Culture, Name

Leer el texto contenido dentro de un fichero mediante la voz del Sistema Operativo

Add-Type -AssemblyName System.Speech
 
gc E:\aleer\fichero.txt | %{
$synthesizer = New-Object -TypeName System.Speech.Synthesis.SpeechSynthesizer
$_
#Establece la velocidad de habla de la SpeechSynthesizer
$synthesizer.Rate=0
$synthesizer.Speak($_)
}

Add-Type -AssemblyName System.Speech

gc E:\aleer\fichero.txt | %{

$synthesizer = New-Object -TypeName System.Speech.Synthesis.SpeechSynthesizer

#Establece la velocidad de habla de la SpeechSynthesizer

$synthesizer.Rate=0

$synthesizer.Speak($_)

}

Leer palabras de un fichero y almacenar cada palabra en un fichero de audio mediante la voz del Sistema Operativo

Add-Type -AssemblyName System.Speech

gc .\palabras.txt | %{
$synthesizer = New-Object -TypeName System.Speech.Synthesis.SpeechSynthesizer
$path = "E:\"+$_+".mp3"
$synthesizer.SetOutputToWaveFile($path)
$synthesizer.Speak($_)
$synthesizer.SetOutputToDefaultAudioDevice()
}

Add-Type -AssemblyName System.Speech

gc .\palabras.txt | %{

$synthesizer = New-Object -TypeName System.Speech.Synthesis.SpeechSynthesizer

$path = "E:\"+$_+".mp3"

$synthesizer.SetOutputToWaveFile($path)

$synthesizer.Speak($_)

$synthesizer.SetOutputToDefaultAudioDevice()

}

Leer palabras mediante la voz del Sistema Operativo

Add-Type -AssemblyName System.Speech
 
"hola","casa" | %{
$synthesizer = New-Object -TypeName System.Speech.Synthesis.SpeechSynthesizer
$_
#Establece la velocidad de habla de la SpeechSynthesizer
$synthesizer.Rate=0
$synthesizer.Speak($_)
}

Add-Type -AssemblyName System.Speech

"hola","casa" | %{

$synthesizer = New-Object -TypeName System.Speech.Synthesis.SpeechSynthesizer

#Establece la velocidad de habla de la SpeechSynthesizer

$synthesizer.Rate=0

$synthesizer.Speak($_)

}

Realizar una captura de pantalla mediante una interfaz gráfica creada con PowerShell

#Realizado por Jesús Moreno

[Reflection.Assembly]::LoadWithPartialName("System.Drawing")
Add-Type -AssemblyName System.Windows.Forms
Add-Type -AssemblyName System.Drawing

function screenshot($path)
{
	$b=New-Object System.Drawing.Bitmap([System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Width, [System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Height)
	$g=[System.Drawing.Graphics]::FromImage($b)
	$g.CopyFromScreen((New-Object System.Drawing.Point(0,0)), (New-Object System.Drawing.Point(0,0)), $b.Size)
	$g.Dispose()
	$b.Save($path,'Bmp')
}

$form = New-Object System.Windows.Forms.Form 
$form.Text = "Guardar fondo"
$form.Size = New-Object System.Drawing.Size(300,200) 
$form.StartPosition = "CenterScreen"

$OKButton = New-Object System.Windows.Forms.Button
$OKButton.Location = New-Object System.Drawing.Point(75,120)
$OKButton.Size = New-Object System.Drawing.Size(75,23)
$OKButton.Text = "Guardar"
$OKButton.DialogResult = [System.Windows.Forms.DialogResult]::OK
$form.AcceptButton = $OKButton
$form.Controls.Add($OKButton)

$CancelButton = New-Object System.Windows.Forms.Button
$CancelButton.Location = New-Object System.Drawing.Point(150,120)
$CancelButton.Size = New-Object System.Drawing.Size(75,23)
$CancelButton.Text = "Cancelar"
$CancelButton.DialogResult = [System.Windows.Forms.DialogResult]::Cancel
$form.CancelButton = $CancelButton
$form.Controls.Add($CancelButton)

$label = New-Object System.Windows.Forms.Label
$label.Location = New-Object System.Drawing.Point(10,20) 
$label.Size = New-Object System.Drawing.Size(280,20) 
$label.Text = "Nombre para guardar la foto:"
$form.Controls.Add($label) 

$textBox = New-Object System.Windows.Forms.TextBox 
$textBox.Location = New-Object System.Drawing.Point(10,40) 
$textBox.Size = New-Object System.Drawing.Size(260,20) 
$form.Controls.Add($textBox) 

$form.Topmost = $True

$form.Add_Shown({$textBox.Select()})
$result = $form.ShowDialog()

if ($result -eq [System.Windows.Forms.DialogResult]::OK)
{
Start-Sleep -Seconds 1
$x = $textBox.Text
$path= "$HOME\Desktop\$x.bmp"
screenshot($path)
}

#Realizado por Jesús Moreno

[Reflection.Assembly]::LoadWithPartialName("System.Drawing")

Add-Type -AssemblyName System.Windows.Forms

Add-Type -AssemblyName System.Drawing

function screenshot($path)

{

$b=New-Object System.Drawing.Bitmap([System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Width, [System.Windows.Forms.Screen]::PrimaryScreen.Bounds.Height)

$g=[System.Drawing.Graphics]::FromImage($b)

$g.CopyFromScreen((New-Object System.Drawing.Point(0,0)), (New-Object System.Drawing.Point(0,0)), $b.Size)

$g.Dispose()

$b.Save($path,'Bmp')

}

$form = New-Object System.Windows.Forms.Form

$form.Text = "Guardar fondo"

$form.Size = New-Object System.Drawing.Size(300,200)

$form.StartPosition = "CenterScreen"

$OKButton = New-Object System.Windows.Forms.Button

$OKButton.Location = New-Object System.Drawing.Point(75,120)

$OKButton.Size = New-Object System.Drawing.Size(75,23)

$OKButton.Text = "Guardar"

$OKButton.DialogResult = [System.Windows.Forms.DialogResult]::OK

$form.AcceptButton = $OKButton

$form.Controls.Add($OKButton)

$CancelButton = New-Object System.Windows.Forms.Button

$CancelButton.Location = New-Object System.Drawing.Point(150,120)

$CancelButton.Size = New-Object System.Drawing.Size(75,23)

$CancelButton.Text = "Cancelar"

$CancelButton.DialogResult = [System.Windows.Forms.DialogResult]::Cancel

$form.CancelButton = $CancelButton

$form.Controls.Add($CancelButton)

$label = New-Object System.Windows.Forms.Label

$label.Location = New-Object System.Drawing.Point(10,20)

$label.Size = New-Object System.Drawing.Size(280,20)

$label.Text = "Nombre para guardar la foto:"

$form.Controls.Add($label)

$textBox = New-Object System.Windows.Forms.TextBox

$textBox.Location = New-Object System.Drawing.Point(10,40)

$textBox.Size = New-Object System.Drawing.Size(260,20)

$form.Controls.Add($textBox)

$form.Topmost = $True

$form.Add_Shown({$textBox.Select()})

$result = $form.ShowDialog()

if ($result -eq [System.Windows.Forms.DialogResult]::OK)

{

Start-Sleep -Seconds 1

$x = $textBox.Text

$path= "$HOME\Desktop\$x.bmp"

screenshot($path)

}