Ver la popularidad de Google según Alexa

((Invoke-WebRequest "http://www.alexa.com/siteinfo/google.com").AllElements | Where class -eq “metrics-data align-vmiddle”)[0].innerText

1	((Invoke-WebRequest "http://www.alexa.com/siteinfo/google.com").AllElements \| Where class -eq “metrics-data align-vmiddle”)[0].innerText

Mostrar los últimos tuis de una cuenta creando un servidor web al que se pueda acceder desde cualquier parte de la red privada con PowerShell

#PowerShell
#Ejecutar PowerShell como administrador

#JSON Twitter
$numero="490274947189993472"
while($numero)
{
$numero
$ur='https://twitter.com/i/profiles/show/Microsoft/timeline?include_available_features=1&include_entities=1&max_id='+$numero
$result=(Invoke-WebRequest -Uri $ur)
$conv=$result.Content
$convi = $conv | ConvertFrom-JSON
#Max id
$numero=$convi.max_id
#More items?
$convi.items_html
}

$routes = @{
    "/" = { return '<html><body>'+$convi.items_html+'</body></html>' }
}

#Importante poner la IP de la red privada
$url = 'http://192.168.1.157:8080/'
$listener = New-Object System.Net.HttpListener
$listener.Prefixes.Add($url)
$listener.Start()

Write-Host "Funcionando $url..."

Start-Process $url

while ($listener.IsListening)
{
    $context = $listener.GetContext()
    $requestUrl = $context.Request.Url
    $con
    $response = $context.Response

    Write-Host ''
    Write-Host "Petición: $requestUrl"

    $localPath = $requestUrl.LocalPath
    $route = $routes.Get_Item($requestUrl.LocalPath)

    if ($route -eq $null)
    {
        $response.StatusCode = 404
    }
    else
    {
        $content = & $route
        $buffer = [System.Text.Encoding]::UTF8.GetBytes($content)
        $response.ContentLength64 = $buffer.Length
        $response.OutputStream.Write($buffer, 0, $buffer.Length)
    }
    
    $response.Close()

    $responseStatus = $response.StatusCode
    Write-Host "Respuesta: $responseStatus"
}

#PowerShell

#Ejecutar PowerShell como administrador

#JSON Twitter

$numero="490274947189993472"

while($numero)

{

$numero

$ur='https://twitter.com/i/profiles/show/Microsoft/timeline?include_available_features=1&include_entities=1&max_id='+$numero

$result=(Invoke-WebRequest -Uri $ur)

$conv=$result.Content

$convi = $conv | ConvertFrom-JSON

#Max id

$numero=$convi.max_id

#More items?

$convi.items_html

}

$routes = @{

"/" = { return '<html><body>'+$convi.items_html+'</body></html>' }

}

#Importante poner la IP de la red privada

$url = 'http://192.168.1.157:8080/'

$listener = New-Object System.Net.HttpListener

$listener.Prefixes.Add($url)

$listener.Start()

Write-Host "Funcionando $url..."

Start-Process $url

while ($listener.IsListening)

{

$context = $listener.GetContext()

$requestUrl = $context.Request.Url

$con

$response = $context.Response

Write-Host ''

Write-Host "Petición: $requestUrl"

$localPath = $requestUrl.LocalPath

$route = $routes.Get_Item($requestUrl.LocalPath)

if ($route -eq $null)

{

$response.StatusCode = 404

}

else

{

$content = & $route

$buffer = [System.Text.Encoding]::UTF8.GetBytes($content)

$response.ContentLength64 = $buffer.Length

$response.OutputStream.Write($buffer, 0, $buffer.Length)

}

$response.Close()

$responseStatus = $response.StatusCode

Write-Host "Respuesta: $responseStatus"

}

Servidor en funcionamiento Petición al servidor web

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')

URLs have been captured for this domain (The Wayback Machine)

$url="https://web.archive.org/web/*/https://jesusninoc.com/*"
$result = Invoke-WebRequest $url
$result.AllElements | Where class -eq "odd" | %{$_.innerText}

$url="https://web.archive.org/web/*/https://jesusninoc.com/*"

$result = Invoke-WebRequest $url

$result.AllElements | Where class -eq "odd" | %{$_.innerText}

Mostrar los precios de la sesión del IBEX 35 creando un servidor web al que se pueda acceder desde cualquier parte de la red privada con PowerShell

#PowerShell
#Ejecutar PowerShell como administrador

$web=Invoke-WebRequest 'http://www.bolsamadrid.es/esp/aspx/Mercados/Precios.aspx?indice=ESI100000000'

$routes = @{
    "/" = { return '<html><body>'+($web.AllElements | Where Class -eq “TblPort” | %{$_.outerHTML})+'</body></html>' }
}

#Importante poner la IP de la red privada
$url = 'http://192.168.1.157:8080/'
$listener = New-Object System.Net.HttpListener
$listener.Prefixes.Add($url)
$listener.Start()

Write-Host "Funcionando $url..."

Start-Process chrome $url

while ($listener.IsListening)
{
    $context = $listener.GetContext()
    $requestUrl = $context.Request.Url
    $con
    $response = $context.Response

    Write-Host ''
    Write-Host "Petición: $requestUrl"

    $localPath = $requestUrl.LocalPath
    $route = $routes.Get_Item($requestUrl.LocalPath)

    if ($route -eq $null)
    {
        $response.StatusCode = 404
    }
    else
    {
        $content = & $route
        $buffer = [System.Text.Encoding]::UTF8.GetBytes($content)
        $response.ContentLength64 = $buffer.Length
        $response.OutputStream.Write($buffer, 0, $buffer.Length)
    }
    
    $response.Close()

    $responseStatus = $response.StatusCode
    Write-Host "Respuesta: $responseStatus"
}

#PowerShell

#Ejecutar PowerShell como administrador

$web=Invoke-WebRequest 'http://www.bolsamadrid.es/esp/aspx/Mercados/Precios.aspx?indice=ESI100000000'

$routes = @{

"/" = { return '<html><body>'+($web.AllElements | Where Class -eq “TblPort” | %{$_.outerHTML})+'</body></html>' }

}

#Importante poner la IP de la red privada

$url = 'http://192.168.1.157:8080/'

$listener = New-Object System.Net.HttpListener

$listener.Prefixes.Add($url)

$listener.Start()

Write-Host "Funcionando $url..."

Start-Process chrome $url

while ($listener.IsListening)

{

$context = $listener.GetContext()

$requestUrl = $context.Request.Url

$con

$response = $context.Response

Write-Host ''

Write-Host "Petición: $requestUrl"

$localPath = $requestUrl.LocalPath

$route = $routes.Get_Item($requestUrl.LocalPath)

if ($route -eq $null)

{

$response.StatusCode = 404

}

else

{

$content = & $route

$buffer = [System.Text.Encoding]::UTF8.GetBytes($content)

$response.ContentLength64 = $buffer.Length

$response.OutputStream.Write($buffer, 0, $buffer.Length)

}

$response.Close()

$responseStatus = $response.StatusCode

Write-Host "Respuesta: $responseStatus"

}

Servidor en funcionamiento Petición al servidor web

Conocer la relevancia de una búsqueda en Bing

$urls='http://www.bing.com/search?q=powershell'
$result=Invoke-WebRequest $urls
$valor=($result.AllElements | ? {$_.class -eq “sb_count”}).innerText
$valor
$valor=$valor.replace(".","").replace("resultados","")
switch([Int]$valor)
{
{$_ -ge 0 -and $_ -le 1000}{"Poco importante"}
{$_ -ge 1001 -and $_ -le 10000}{"Algo importante"}
{$_ -ge 10000 -and $_ -le 100000000}{"Muy importante"}
}

$urls='http://www.bing.com/search?q=powershell'

$result=Invoke-WebRequest $urls

$valor=($result.AllElements | ? {$_.class -eq “sb_count”}).innerText

$valor

$valor=$valor.replace(".","").replace("resultados","")

switch([Int]$valor)

{

{$_ -ge 0 -and $_ -le 1000}{"Poco importante"}

{$_ -ge 1001 -and $_ -le 10000}{"Algo importante"}

{$_ -ge 10000 -and $_ -le 100000000}{"Muy importante"}

}

jesusninoc.com Traffic Statistics (Alexa)

Start-Process "http://www.alexa.com/siteinfo/jesusninoc.com"

1	Start-Process "http://www.alexa.com/siteinfo/jesusninoc.com"

Site report for www.jesusninoc.com (Netcraft)

Start-Process "http://toolbar.netcraft.com/site_report?url=http://www.jesusninoc.com"

1	Start-Process "http://toolbar.netcraft.com/site_report?url=http://www.jesusninoc.com"