New-Object | Scripting and security

# specify the path to your PowerShell script
$ScriptPath = "C:\test\test.ps1"

# create a lnk file
$shortcutPath = [System.IO.Path]::ChangeExtension($ScriptPath, "lnk")
$filename = [System.IO.Path]::GetFileName($ScriptPath)

# create a new shortcut
$shell = New-Object -ComObject WScript.Shell
$scut = $shell.CreateShortcut($shortcutPath)
# launch the script with powershell.exe:
$scut.TargetPath = "powershell.exe"
# skip profile scripts and enable execution policy for this one call
# IMPORTANT: specify only the script file name, not the complete path
$scut.Arguments = "-noprofile -executionpolicy bypass -file ""$filename"""
# IMPORTANT: leave the working directory empty. This way, the 
# shortcut uses relative paths 
$scut.WorkingDirectory = ""
# optinally specify a nice icon
$scut.IconLocation = "$env:windir\system32\shell32.dll,162"
# save shortcut file
$scut.Save()

# open shortcut file in File Explorer
explorer.exe "/select,$shortcutPath"

# specify the path to your PowerShell script

$ScriptPath = "C:\test\test.ps1"

# create a lnk file

$shortcutPath = [System.IO.Path]::ChangeExtension($ScriptPath, "lnk")

$filename = [System.IO.Path]::GetFileName($ScriptPath)

# create a new shortcut

$shell = New-Object -ComObject WScript.Shell

$scut = $shell.CreateShortcut($shortcutPath)

# launch the script with powershell.exe:

$scut.TargetPath = "powershell.exe"

# skip profile scripts and enable execution policy for this one call

# IMPORTANT: specify only the script file name, not the complete path

$scut.Arguments = "-noprofile -executionpolicy bypass -file ""$filename"""

# IMPORTANT: leave the working directory empty. This way, the

# shortcut uses relative paths

$scut.WorkingDirectory = ""

# optinally specify a nice icon

$scut.IconLocation = "$env:windir\system32\shell32.dll,162"

# save shortcut file

$scut.Save()

# open shortcut file in File Explorer

explorer.exe "/select,$shortcutPath"

FUENTE: https://community.idera.com/database-tools/powershell/powertips/b/tips/posts/launching-powershell-scripts-for-dummies

PowerShell

Abrir las categorías de una página web en WordPress que se listan mediante botones en un formulario de PowerShell

19/06/201907/06/2019

$buttons_functionslist=@(
    $json=(Invoke-WebRequest -Uri 'https://www.jesusninoc.com/wp-json/wp/v2/categories').content | ConvertFrom-JSON
    $json.name
)

$buttons_functionbuttoncount = $buttons_functionslist.count

$loop = 0

#Formulario
$Form = New-Object System.Windows.Forms.Form
$Form.Text="Formulario"
$Form.Size=New-Object System.Drawing.Size(500,500)
$Form.StartPosition="CenterScreen"

while($loop -lt $buttons_functionbuttoncount)
	{
	$thisbutton = New-Object System.Windows.Forms.Button
	[string]$thisbuttonname = $buttons_functionslist[$loop]
	$thisbutton.Text = $thisbuttonname
	$thisbutton.size = New-Object System.Drawing.Size(100,20)
	$thisbutton.Location = New-Object System.Drawing.Size(200,(20*$loop+1))
	$thisbutton.Add_Click({
            if($json.name.indexof($this.Text))
            {
                start chrome $json.link[$json.name.indexof($this.Text)]
            }
		})
	$Form.Controls.Add($thisbutton)
	$loop += 1
	}

$Form.ShowDialog()

$buttons_functionslist=@(

$json=(Invoke-WebRequest -Uri 'https://www.jesusninoc.com/wp-json/wp/v2/categories').content | ConvertFrom-JSON

$json.name

)

$buttons_functionbuttoncount = $buttons_functionslist.count

$loop = 0

#Formulario

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

$Form.Text="Formulario"

$Form.Size=New-Object System.Drawing.Size(500,500)

$Form.StartPosition="CenterScreen"

while($loop -lt $buttons_functionbuttoncount)

{

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

[string]$thisbuttonname = $buttons_functionslist[$loop]

$thisbutton.Text = $thisbuttonname

$thisbutton.size = New-Object System.Drawing.Size(100,20)

$thisbutton.Location = New-Object System.Drawing.Size(200,(20*$loop+1))

$thisbutton.Add_Click({

if($json.name.indexof($this.Text))

{

start chrome $json.link[$json.name.indexof($this.Text)]

}

})

$Form.Controls.Add($thisbutton)

$loop += 1

}

$Form.ShowDialog()

Ver mediante una lista de botones en un formulario de PowerShell las categorías de una página en WordPress

17/06/201907/06/2019

$buttons_functionslist=@(
    $json=(Invoke-WebRequest -Uri 'https://www.jesusninoc.com/wp-json/wp/v2/categories').content | ConvertFrom-JSON
    $json.name
)

$buttons_functionbuttoncount = $buttons_functionslist.count

$loop = 0

#Formulario
$Form = New-Object System.Windows.Forms.Form
$Form.Text="Formulario"
$Form.Size=New-Object System.Drawing.Size(500,500)
$Form.StartPosition="CenterScreen"

while($loop -lt $buttons_functionbuttoncount)
	{
	$thisbutton = New-Object System.Windows.Forms.Button
	[string]$thisbuttonname = $buttons_functionslist[$loop]
	$thisbutton.Text = $thisbuttonname
	$thisbutton.size = New-Object System.Drawing.Size(100,20)
	$thisbutton.Location = New-Object System.Drawing.Size(200,(20*$loop+1))
	$thisbutton.Add_Click({
	        Write-Host $this.Text
		})
	$Form.Controls.Add($thisbutton)
	$loop += 1
	}

$Form.ShowDialog()

$buttons_functionslist=@(

$json=(Invoke-WebRequest -Uri 'https://www.jesusninoc.com/wp-json/wp/v2/categories').content | ConvertFrom-JSON

$json.name

)

$buttons_functionbuttoncount = $buttons_functionslist.count

$loop = 0

#Formulario

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

$Form.Text="Formulario"

$Form.Size=New-Object System.Drawing.Size(500,500)

$Form.StartPosition="CenterScreen"

while($loop -lt $buttons_functionbuttoncount)

{

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

[string]$thisbuttonname = $buttons_functionslist[$loop]

$thisbutton.Text = $thisbuttonname

$thisbutton.size = New-Object System.Drawing.Size(100,20)

$thisbutton.Location = New-Object System.Drawing.Size(200,(20*$loop+1))

$thisbutton.Add_Click({

Write-Host $this.Text

})

$Form.Controls.Add($thisbutton)

$loop += 1

}

$Form.ShowDialog()

Database PowerShell

Insertar en una base de datos las noticias de una página web (crear la base de datos y la tabla)

15/06/201915/06/2019

Crear la base de datos

[void][System.Reflection.Assembly]::LoadWithPartialName("MySql.Data")
$Connection = New-Object MySql.Data.MySqlClient.MySqlConnection
$ConnectionString = "server=" + "localhost" + ";port=3306;uid=" + "root" + ";pwd=" + "root"
$Connection.ConnectionString = $ConnectionString
$Connection.Open()

$Query = 'create database bbc'
$Command = New-Object MySql.Data.MySqlClient.MySqlCommand($Query, $Connection)
$DataAdapter = New-Object MySql.Data.MySqlClient.MySqlDataAdapter($Command)
$DataSet = New-Object System.Data.DataSet
$RecordCount = $dataAdapter.Fill($dataSet, "data")
$DataSet.Tables[0]

$Connection.Close()

[void][System.Reflection.Assembly]::LoadWithPartialName("MySql.Data")

$Connection = New-Object MySql.Data.MySqlClient.MySqlConnection

$ConnectionString = "server=" + "localhost" + ";port=3306;uid=" + "root" + ";pwd=" + "root"

$Connection.ConnectionString = $ConnectionString

$Connection.Open()

$Query = 'create database bbc'

$Command = New-Object MySql.Data.MySqlClient.MySqlCommand($Query, $Connection)

$DataAdapter = New-Object MySql.Data.MySqlClient.MySqlDataAdapter($Command)

$DataSet = New-Object System.Data.DataSet

$RecordCount = $dataAdapter.Fill($dataSet, "data")

$DataSet.Tables[0]

$Connection.Close()

Crear e insertar cada noticia en una tabla de la base de datos

[void][System.Reflection.Assembly]::LoadWithPartialName("MySql.Data")
$Connection = New-Object MySql.Data.MySqlClient.MySqlConnection
$ConnectionString = "server=" + "localhost" + ";port=3306;uid=" + "root" + ";pwd=" + "root" +  ";database="+"bbc"
$Connection.ConnectionString = $ConnectionString
$Connection.Open()

$Query = 'create table titulo(titulo varchar(500) primary key)'
$Command = New-Object MySql.Data.MySqlClient.MySqlCommand($Query, $Connection)
$DataAdapter = New-Object MySql.Data.MySqlClient.MySqlDataAdapter($Command)
$DataSet = New-Object System.Data.DataSet
$RecordCount = $dataAdapter.Fill($dataSet, "data")
$DataSet.Tables[0]

$url='https://www.bbc.com/news/'
$result = Invoke-WebRequest $url
$result.AllElements | Where Class -eq 'gs-c-promo-heading__title gel-pica-bold nw-o-link-split__text' | %{$_.innerText} | %{
$Query = "INSERT INTO titulo (titulo) values (""$_"")"
$Query
$Command = New-Object MySql.Data.MySqlClient.MySqlCommand($Query, $Connection)
$DataAdapter = New-Object MySql.Data.MySqlClient.MySqlDataAdapter($Command)
$DataSet = New-Object System.Data.DataSet
$RecordCount = $dataAdapter.Fill($dataSet, "data")
$DataSet.Tables[0]
}

$Connection.Close()

[void][System.Reflection.Assembly]::LoadWithPartialName("MySql.Data")

$Connection = New-Object MySql.Data.MySqlClient.MySqlConnection

$ConnectionString = "server=" + "localhost" + ";port=3306;uid=" + "root" + ";pwd=" + "root" + ";database="+"bbc"

$Connection.ConnectionString = $ConnectionString

$Connection.Open()

$Query = 'create table titulo(titulo varchar(500) primary key)'

$Command = New-Object MySql.Data.MySqlClient.MySqlCommand($Query, $Connection)

$DataAdapter = New-Object MySql.Data.MySqlClient.MySqlDataAdapter($Command)

$DataSet = New-Object System.Data.DataSet

$RecordCount = $dataAdapter.Fill($dataSet, "data")

$DataSet.Tables[0]

$url='https://www.bbc.com/news/'

$result = Invoke-WebRequest $url

$result.AllElements | Where Class -eq 'gs-c-promo-heading__title gel-pica-bold nw-o-link-split__text' | %{$_.innerText} | %{

$Query = "INSERT INTO titulo (titulo) values (""$_"")"

$Query

$Command = New-Object MySql.Data.MySqlClient.MySqlCommand($Query, $Connection)

$DataAdapter = New-Object MySql.Data.MySqlClient.MySqlDataAdapter($Command)

$DataSet = New-Object System.Data.DataSet

$RecordCount = $dataAdapter.Fill($dataSet, "data")

$DataSet.Tables[0]

}

$Connection.Close()

Realizado por Ignacio Barranquero

PowerShell

Añadir botones a un formulario en PowerShell de forma automática

07/06/201907/06/2019

$buttons_functionslist=@(
	"Botón1",
	"Botón2",
	"Botón3"
	"Botón4"
	"Botón5"
)

$buttons_functionbuttoncount = $buttons_functionslist.count

$loop = 0

#Formulario
$Form = New-Object System.Windows.Forms.Form
$Form.Text="Formulario"
$Form.Size=New-Object System.Drawing.Size(500,500)
$Form.StartPosition="CenterScreen"

while($loop -lt $buttons_functionbuttoncount)
	{
	$thisbutton = New-Object System.Windows.Forms.Button
	[string]$thisbuttonname = $buttons_functionslist[$loop]
	$thisbutton.Text = $thisbuttonname
	$thisbutton.size = New-Object System.Drawing.Size(100,20)
	$thisbutton.Location = New-Object System.Drawing.Size(200,(20*$loop+1))
	$thisbutton.Add_Click({
	        Write-Host $this.Text
		})
	$Form.Controls.Add($thisbutton)
	$loop += 1
	}

$Form.ShowDialog()

$buttons_functionslist=@(

"Botón1",

"Botón2",

"Botón3"

"Botón4"

"Botón5"

)

$buttons_functionbuttoncount = $buttons_functionslist.count

$loop = 0

#Formulario

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

$Form.Text="Formulario"

$Form.Size=New-Object System.Drawing.Size(500,500)

$Form.StartPosition="CenterScreen"

while($loop -lt $buttons_functionbuttoncount)

{

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

[string]$thisbuttonname = $buttons_functionslist[$loop]

$thisbutton.Text = $thisbuttonname

$thisbutton.size = New-Object System.Drawing.Size(100,20)

$thisbutton.Location = New-Object System.Drawing.Size(200,(20*$loop+1))

$thisbutton.Add_Click({

Write-Host $this.Text

})

$Form.Controls.Add($thisbutton)

$loop += 1

}

$Form.ShowDialog()

Network PowerShell Servers

Comprobar que se ha realizado una petición entre un cliente y un servidor de forma local

01/06/201930/05/2019

Servidor

##Server
$port=2050
$IPEndPoint=New-Object System.Net.IPEndPoint([IPAddress]::Any,$port)
$TcpListener=New-Object System.Net.Sockets.TcpListener $IPEndPoint
$TcpListener.Start()

$AcceptTcpClient=$TcpListener.AcceptTcpClient()
$GetStream=$AcceptTcpClient.GetStream()
$StreamReader=New-Object System.IO.StreamReader $GetStream
$peticionrecibida=$StreamReader.ReadLine()
if($peticionrecibida -match "peticion")
{
    "Ha llegado la petición"
}

$StreamReader.Dispose()
$GetStream.Dispose()
$AcceptTcpClient.Dispose()
$TcpListener.Stop()

##Server

$port=2050

$IPEndPoint=New-Object System.Net.IPEndPoint([IPAddress]::Any,$port)

$TcpListener=New-Object System.Net.Sockets.TcpListener $IPEndPoint

$TcpListener.Start()

$AcceptTcpClient=$TcpListener.AcceptTcpClient()

$GetStream=$AcceptTcpClient.GetStream()

$StreamReader=New-Object System.IO.StreamReader $GetStream

$peticionrecibida=$StreamReader.ReadLine()

if($peticionrecibida -match "peticion")

{

"Ha llegado la petición"

}

$StreamReader.Dispose()

$GetStream.Dispose()

$AcceptTcpClient.Dispose()

$TcpListener.Stop()

Cliente

##Client
$port=2050
$TcpClient=New-Object System.Net.Sockets.TcpClient([IPAddress]::Loopback, $port)

$GetStream = $TcpClient.GetStream()
$StreamWriter = New-Object System.IO.StreamWriter $GetStream

$positions='peticion'

$StreamWriter.Write($positions)

$StreamWriter.Dispose()
$GetStream.Dispose()
$TcpClient.Dispose()

##Client

$port=2050

$TcpClient=New-Object System.Net.Sockets.TcpClient([IPAddress]::Loopback, $port)

$GetStream = $TcpClient.GetStream()

$StreamWriter = New-Object System.IO.StreamWriter $GetStream

$positions='peticion'

$StreamWriter.Write($positions)

$StreamWriter.Dispose()

$GetStream.Dispose()

$TcpClient.Dispose()

Network PowerShell Servers

Realizar una petición entre un cliente y un servidor en red

31/05/201930/05/2019

Servidor

##Server
$port=2050
$IPEndPoint=New-Object System.Net.IPEndPoint([IPAddress]::Any,$port)
$TcpListener=New-Object System.Net.Sockets.TcpListener $IPEndPoint
$TcpListener.Start()

$AcceptTcpClient=$TcpListener.AcceptTcpClient()
$GetStream=$AcceptTcpClient.GetStream()
$StreamReader=New-Object System.IO.StreamReader $GetStream
$StreamReader.ReadLine()

$StreamReader.Dispose()
$GetStream.Dispose()
$AcceptTcpClient.Dispose()
$TcpListener.Stop()

##Server

$port=2050

$IPEndPoint=New-Object System.Net.IPEndPoint([IPAddress]::Any,$port)

$TcpListener=New-Object System.Net.Sockets.TcpListener $IPEndPoint

$TcpListener.Start()

$AcceptTcpClient=$TcpListener.AcceptTcpClient()

$GetStream=$AcceptTcpClient.GetStream()

$StreamReader=New-Object System.IO.StreamReader $GetStream

$StreamReader.ReadLine()

$StreamReader.Dispose()

$GetStream.Dispose()

$AcceptTcpClient.Dispose()

$TcpListener.Stop()

Cliente

##Client
$port=2050
$TcpClient=New-Object System.Net.Sockets.TcpClient "192.168.1.56", $port

$GetStream = $TcpClient.GetStream()
$StreamWriter = New-Object System.IO.StreamWriter $GetStream

$positions='Petición'

$StreamWriter.Write($positions)

$StreamWriter.Dispose()
$GetStream.Dispose()
$TcpClient.Dispose()

##Client

$port=2050

$TcpClient=New-Object System.Net.Sockets.TcpClient "192.168.1.56", $port

$GetStream = $TcpClient.GetStream()

$StreamWriter = New-Object System.IO.StreamWriter $GetStream

$positions='Petición'

$StreamWriter.Write($positions)

$StreamWriter.Dispose()

$GetStream.Dispose()

$TcpClient.Dispose()

Network PowerShell Servers

Realizar una petición entre un cliente y un servidor de forma local

30/05/201930/05/2019

Servidor

##Server
$port=2050
$IPEndPoint=New-Object System.Net.IPEndPoint([IPAddress]::Any,$port)
$TcpListener=New-Object System.Net.Sockets.TcpListener $IPEndPoint
$TcpListener.Start()

$AcceptTcpClient=$TcpListener.AcceptTcpClient()
$GetStream=$AcceptTcpClient.GetStream()
$StreamReader=New-Object System.IO.StreamReader $GetStream
$StreamReader.ReadLine()

$StreamReader.Dispose()
$GetStream.Dispose()
$AcceptTcpClient.Dispose()
$TcpListener.Stop()

##Server

$port=2050

$IPEndPoint=New-Object System.Net.IPEndPoint([IPAddress]::Any,$port)

$TcpListener=New-Object System.Net.Sockets.TcpListener $IPEndPoint

$TcpListener.Start()

$AcceptTcpClient=$TcpListener.AcceptTcpClient()

$GetStream=$AcceptTcpClient.GetStream()

$StreamReader=New-Object System.IO.StreamReader $GetStream

$StreamReader.ReadLine()

$StreamReader.Dispose()

$GetStream.Dispose()

$AcceptTcpClient.Dispose()

$TcpListener.Stop()

Cliente

##Client
$port=2050
$TcpClient=New-Object System.Net.Sockets.TcpClient([IPAddress]::Loopback, $port)

$GetStream = $TcpClient.GetStream()
$StreamWriter = New-Object System.IO.StreamWriter $GetStream

$positions='Petición'

$StreamWriter.Write($positions)

$StreamWriter.Dispose()
$GetStream.Dispose()
$TcpClient.Dispose()

##Client

$port=2050

$TcpClient=New-Object System.Net.Sockets.TcpClient([IPAddress]::Loopback, $port)

$GetStream = $TcpClient.GetStream()

$StreamWriter = New-Object System.IO.StreamWriter $GetStream

$positions='Petición'

$StreamWriter.Write($positions)

$StreamWriter.Dispose()

$GetStream.Dispose()

$TcpClient.Dispose()

Network PowerShell

Enviar cmdlets entre un cliente y un servidor leyendo de un fichero

29/05/201929/05/2019

Servidor

## Ejecutar los comandos que se mandan por la red

##Server
$port=2020
$endpoint = new-object System.Net.IPEndPoint ([IPAddress]::Any,$port)
$udpclient=new-Object System.Net.Sockets.UdpClient $port
$content=$udpclient.Receive([ref]$endpoint)
[Text.Encoding]::ASCII.GetString($content) |iex
$udpclient.Dispose()

## Ejecutar los comandos que se mandan por la red

##Server

$port=2020

$endpoint = new-object System.Net.IPEndPoint ([IPAddress]::Any,$port)

$udpclient=new-Object System.Net.Sockets.UdpClient $port

$content=$udpclient.Receive([ref]$endpoint)

[Text.Encoding]::ASCII.GetString($content) |iex

$udpclient.Dispose()

Cliente

## Fichero con cmdlets
"gps;date" | Out-File enviar.txt

##Client
$port=2020
$endpoint = new-object System.Net.IPEndPoint ([IPAddress]::Loopback,$port)
$udpclient=new-Object System.Net.Sockets.UdpClient
$b=[Text.Encoding]::ASCII.GetBytes((gc enviar.txt))
$bytesSent=$udpclient.Send($b,$b.length,$endpoint)
$udpclient.Close()

## Fichero con cmdlets

"gps;date" | Out-File enviar.txt

##Client

$port=2020

$endpoint = new-object System.Net.IPEndPoint ([IPAddress]::Loopback,$port)

$udpclient=new-Object System.Net.Sockets.UdpClient

$b=[Text.Encoding]::ASCII.GetBytes((gc enviar.txt))

$bytesSent=$udpclient.Send($b,$b.length,$endpoint)

$udpclient.Close()

PowerShell

Crear un array con información y convertirlo en un fichero JSON

02/04/201902/04/2019

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

# Almacenar en un array información sobre libros
$null = $arraylist.Add(
    [pscustomobject] @{
    titulo = "Redes Locales"
    isbn = "9788415426479"
    imagen = "https://images-na.ssl-images-amazon.com/images/I/51ggAPSyROL._SX383_BO1,204,203,200_.jpg"
    curso = "gi1"
    obligatorio = 1
    })

$null = $arraylist.Add(
    [pscustomobject] @{
    titulo = "Sistemas Operativos Monopuesto"
    isbn = "978-84-9771-9711"
    imagen = "https://images-na.ssl-images-amazon.com/images/I/51xaG8rZaSL._SX411_BO1,204,203,200_.jpg"
    curso = "gi1"
    obligatorio = 1
    })

$json = $arraylist | ConvertTo-Json

($json | ConvertFrom-Json).titulo

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

# Almacenar en un array información sobre libros

$null = $arraylist.Add(

[pscustomobject] @{

titulo = "Redes Locales"

isbn = "9788415426479"

imagen = "https://images-na.ssl-images-amazon.com/images/I/51ggAPSyROL._SX383_BO1,204,203,200_.jpg"

curso = "gi1"

obligatorio = 1

})

$null = $arraylist.Add(

[pscustomobject] @{

titulo = "Sistemas Operativos Monopuesto"

isbn = "978-84-9771-9711"

imagen = "https://images-na.ssl-images-amazon.com/images/I/51xaG8rZaSL._SX411_BO1,204,203,200_.jpg"

curso = "gi1"

obligatorio = 1

})

$json = $arraylist | ConvertTo-Json

($json | ConvertFrom-Json).titulo

Older Posts