mouse_event | Scripting and security

Automatizar el movimiento del ratón en el sistema operativo Windows con PowerShell

(2 votes, average: 5.00 out of 5)

#Ejercicio 1
#Posición X,Y
$dX = ([System.Windows.Forms.Cursor]::Position.X) #Coordenada X
$dY = ([System.Windows.Forms.Cursor]::Position.Y) #Coordenada Y
$dX,$dY

#Ejercicio 2
#Ver la posición X,Y de forma indefinida cada medio segundo
for ()
{
Start-Sleep -m 500
$dX = ([System.Windows.Forms.Cursor]::Position.X)
$dY = ([System.Windows.Forms.Cursor]::Position.Y)
Write-Host $dX,$dY #print
}

#Ejercicio 3
#Almacenar las posiciones en un fichero
for (1)
{
Start-Sleep -s 1
$dX = ([System.Windows.Forms.Cursor]::Position.X)
$dY = ([System.Windows.Forms.Cursor]::Position.Y)
Write-Host $dX,$dY
$dX.ToString()+','+$dY.ToString() | Out-File posicion.txt -Append
}

#Ejercicio 4
#Reproducir las posiciones almacenadas en un fichero
gc .\posicion.txt | %{
Start-Sleep -s 1
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point($_.split(',')[0],$_.split(',')[1])
}

#Ejercicio 5
#Hacer clic izquierdo en una posición de la pantalla
#Funciones y declaraciones necesarias para poder hacer clic 
$MouseEventSig=@’
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
‘@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name “MouseEventWinApi” -passThru
#Hacer clic izquierdo en el botón de inicio
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(19,741)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0);
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0);

#Ejercicio 6
#Hacer clic derecho en una posición de la pantalla
#Funciones y declaraciones necesarias para poder hacer clic 
$MouseEventSig=@’
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
‘@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name “MouseEventWinApi” -passThru
#Hacer clic derecho en el botón de inicio
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(19,741)
$MouseEvent::mouse_event(0x00000008, 0, 0, 0, 0);
$MouseEvent::mouse_event(0x00000010, 0, 0, 0, 0);

#Ejercicio 7
#Pintar una línea automáticamente en Paint
#Desde la posición 200,200 a la posición 300,300
Start-Process C:\WINDOWS\system32\mspaint.exe
Start-Sleep -Seconds 5
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(200,200)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
Start-Sleep -Seconds 2
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(300,300)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

#Ejercicio 1

#Posición X,Y

$dX = ([System.Windows.Forms.Cursor]::Position.X) #Coordenada X

$dY = ([System.Windows.Forms.Cursor]::Position.Y) #Coordenada Y

$dX,$dY

#Ejercicio 2

#Ver la posición X,Y de forma indefinida cada medio segundo

for ()

{

Start-Sleep -m 500

$dX = ([System.Windows.Forms.Cursor]::Position.X)

$dY = ([System.Windows.Forms.Cursor]::Position.Y)

Write-Host $dX,$dY #print

}

#Ejercicio 3

#Almacenar las posiciones en un fichero

for (1)

{

Start-Sleep -s 1

$dX = ([System.Windows.Forms.Cursor]::Position.X)

$dY = ([System.Windows.Forms.Cursor]::Position.Y)

Write-Host $dX,$dY

$dX.ToString()+','+$dY.ToString() | Out-File posicion.txt -Append

}

#Ejercicio 4

#Reproducir las posiciones almacenadas en un fichero

gc .\posicion.txt | %{

Start-Sleep -s 1

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point($_.split(',')[0],$_.split(',')[1])

}

#Ejercicio 5

#Hacer clic izquierdo en una posición de la pantalla

#Funciones y declaraciones necesarias para poder hacer clic

$MouseEventSig=@’

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

‘@

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name “MouseEventWinApi” -passThru

#Hacer clic izquierdo en el botón de inicio

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(19,741)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0);

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0);

#Ejercicio 6

#Hacer clic derecho en una posición de la pantalla

#Funciones y declaraciones necesarias para poder hacer clic

$MouseEventSig=@’

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

‘@

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name “MouseEventWinApi” -passThru

#Hacer clic derecho en el botón de inicio

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(19,741)

$MouseEvent::mouse_event(0x00000008, 0, 0, 0, 0);

$MouseEvent::mouse_event(0x00000010, 0, 0, 0, 0);

#Ejercicio 7

#Pintar una línea automáticamente en Paint

#Desde la posición 200,200 a la posición 300,300

Start-Process C:\WINDOWS\system32\mspaint.exe

Start-Sleep -Seconds 5

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(200,200)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

Start-Sleep -Seconds 2

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(300,300)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Representar clicks en pantalla teniendo activado Zoomit para poder representar las coordenadas

(No Ratings Yet)

#Representar clicks en pantalla teniendo activado Zoomit para poder representar las coordenadas

$MouseEventSig=@'
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
'@

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

[System.Windows.Forms.SendKeys]::SendWait("^(2)")

while($true)
{
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point([Int](Get-Random (10..1021)),[Int](Get-Random (10..800)))
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)
Start-Sleep -Seconds 5
}

#Representar clicks en pantalla teniendo activado Zoomit para poder representar las coordenadas

$MouseEventSig=@'

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

[System.Windows.Forms.SendKeys]::SendWait("^(2)")

while($true)

{

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point([Int](Get-Random (10..1021)),[Int](Get-Random (10..800)))

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

}

Hacer clic sobre una posición de la pantalla desde C#

(2 votes, average: 5.00 out of 5)

//Código obtenido de https://stackoverflow.com/questions/2416748/how-to-simulate-mouse-clic-in-c

using System;
using System.Runtime.InteropServices;

public class MouseOperations
{
    [Flags]
    public enum MouseEventFlags
    {
        LeftDown = 0x00000002,
        LeftUp = 0x00000004,
        MiddleDown = 0x00000020,
        MiddleUp = 0x00000040,
        Move = 0x00000001,
        Absolute = 0x00008000,
        RightDown = 0x00000008,
        RightUp = 0x00000010
    }

    [DllImport("user32.dll", EntryPoint = "SetCursorPos")]
    [return: MarshalAs(UnmanagedType.Bool)]
    private static extern bool SetCursorPos(int X, int Y);

    [DllImport("user32.dll")]
    [return: MarshalAs(UnmanagedType.Bool)]
    private static extern bool GetCursorPos(out MousePoint lpMousePoint);

    [DllImport("user32.dll")]
    private static extern void mouse_event(int dwFlags, int dx, int dy, int dwData, int dwExtraInfo);

    public static void SetCursorPosition(int X, int Y)
    {
        SetCursorPos(X, Y);
    }

    public static void SetCursorPosition(MousePoint point)
    {
        SetCursorPos(point.X, point.Y);
    }

    public static MousePoint GetCursorPosition()
    {
        MousePoint currentMousePoint;
        var gotPoint = GetCursorPos(out currentMousePoint);
        if (!gotPoint) { currentMousePoint = new MousePoint(0, 0); }
        return currentMousePoint;
    }

    public static void MouseEvent(MouseEventFlags value)
    {
        MousePoint position = GetCursorPosition();

        mouse_event
            ((int)value,
             position.X,
             position.Y,
             0,
             0)
            ;
    }

    [StructLayout(LayoutKind.Sequential)]
    public struct MousePoint
    {
        public int X;
        public int Y;

        public MousePoint(int x, int y)
        {
            X = x;
            Y = y;
        }

    }

    static void Main()
    {
        //Hacer clic en el botón de inicio de Windows
        SetCursorPosition(22, 748);
        MouseEvent(MouseEventFlags.LeftDown | MouseEventFlags.LeftUp);
        Console.ReadKey();
    }
}

//Código obtenido de https://stackoverflow.com/questions/2416748/how-to-simulate-mouse-clic-in-c

using System;

using System.Runtime.InteropServices;

public class MouseOperations

{

[Flags]

public enum MouseEventFlags

{

LeftDown = 0x00000002,

LeftUp = 0x00000004,

MiddleDown = 0x00000020,

MiddleUp = 0x00000040,

Move = 0x00000001,

Absolute = 0x00008000,

RightDown = 0x00000008,

RightUp = 0x00000010

}

[DllImport("user32.dll", EntryPoint = "SetCursorPos")]

[return: MarshalAs(UnmanagedType.Bool)]

private static extern bool SetCursorPos(int X, int Y);

[DllImport("user32.dll")]

[return: MarshalAs(UnmanagedType.Bool)]

private static extern bool GetCursorPos(out MousePoint lpMousePoint);

[DllImport("user32.dll")]

private static extern void mouse_event(int dwFlags, int dx, int dy, int dwData, int dwExtraInfo);

public static void SetCursorPosition(int X, int Y)

{

SetCursorPos(X, Y);

}

public static void SetCursorPosition(MousePoint point)

{

SetCursorPos(point.X, point.Y);

}

public static MousePoint GetCursorPosition()

{

MousePoint currentMousePoint;

var gotPoint = GetCursorPos(out currentMousePoint);

if (!gotPoint) { currentMousePoint = new MousePoint(0, 0); }

return currentMousePoint;

}

public static void MouseEvent(MouseEventFlags value)

{

MousePoint position = GetCursorPosition();

mouse_event

((int)value,

position.X,

position.Y,

;

}

[StructLayout(LayoutKind.Sequential)]

public struct MousePoint

{

public int X;

public int Y;

public MousePoint(int x, int y)

{

X = x;

Y = y;

}

static void Main()

{

//Hacer clic en el botón de inicio de Windows

SetCursorPosition(22, 748);

MouseEvent(MouseEventFlags.LeftDown | MouseEventFlags.LeftUp);

Console.ReadKey();

}

Hacer clic en una posición de la pantalla con Python

(No Ratings Yet)

# Es necesario instalar pywin32 https://sourceforge.net/projects/pywin32/files/
import win32api, win32con
def clic(x,y):
    win32api.SetCursorPos((x,y))
    win32api.mouse_event(win32con.MOUSEEVENTF_LEFTDOWN,x,y,0,0)
    win32api.mouse_event(win32con.MOUSEEVENTF_LEFTUP,x,y,0,0)
clic(10,10)

# Es necesario instalar pywin32 https://sourceforge.net/projects/pywin32/files/

import win32api, win32con

def clic(x,y):

win32api.SetCursorPos((x,y))

win32api.mouse_event(win32con.MOUSEEVENTF_LEFTDOWN,x,y,0,0)

win32api.mouse_event(win32con.MOUSEEVENTF_LEFTUP,x,y,0,0)

clic(10,10)

Hacer clic en una posición de la pantalla con PowerShell

(1 votes, average: 5.00 out of 5)

$MouseEventSig=@'
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
'@
 
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(10,10)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

$MouseEventSig=@'

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(10,10)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Mover el ratón a una posición de la pantalla y hacer clic con PowerShell

(1 votes, average: 5.00 out of 5)

$MouseEventSig=@'
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
'@
 
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(100,100)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

$MouseEventSig=@'

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(100,100)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Rundll32 commands for Windows

(2 votes, average: 5.00 out of 5)

# Control Panel
RunDll32.exe shell32.dll,Control_RunDLL

# Delete Temporary Internet Files
RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 8

# Delete Cookies
RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 2

# Delete History
RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 1

# Delete Form Data
RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 16

# Delete Passwords
RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 32

# Delete All
RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 255

# Delete all files and settings stored by Add-ons
RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 4351

# Date and Time Properties
RunDll32.exe shell32.dll,Control_RunDLL timedate.cpl

# Device Manager
RunDll32.exe devmgr.dll DeviceManager_Execute

# Folder Options – General
RunDll32.exe shell32.dll,Options_RunDLL 0

# Folder Options – Search
RunDll32.exe shell32.dll,Options_RunDLL 2

# Folder Options – View
RunDll32.exe shell32.dll,Options_RunDLL 7

# Hibernate
RunDll32.exe powrprof.dll,SetSuspendState

# Keyboard Properties
RunDll32.exe shell32.dll,Control_RunDLL main.cpl @1

# Lock Screen
RunDll32.exe user32.dll,LockWorkStation

# Mouse Button – Swap left button to function as right
Rundll32 User32.dll,SwapMouseButton

# Map Network Drive Wizard
Rundll32 Shell32.dll,SHHelpShortcuts_RunDLL Connect

# Network Connections
RunDll32.exe shell32.dll,Control_RunDLL ncpa.cpl

# Organize IE Favourites
Rundll32.exe shdocvw.dll,DoOrganizeFavDlg

# Open With Dialog Box
Rundll32 Shell32.dll,OpenAs_RunDLL File.ext

# Plays a waveform sound
rundll32.exe user32.dll,MessageBeep

# Printer User Interface
Rundll32 Printui.dll,PrintUIEntry

# Printer Management Folder.
Rundll32 Shell32.dll,SHHelpShortcuts_RunDLL PrintersFolder

# Power Options
RunDll32.exe Shell32.dll,Control_RunDLL powercfg.cpl

# Stored Usernames and Passwords
RunDll32.exe keymgr.dll,KRShowKeyMgr

# Safely Remove Hardware Dialog Box
Rundll32 Shell32.dll,Control_RunDLL HotPlug.dll

# Taskbar Properties
RunDll32.exe shell32.dll,Options_RunDLL 1

# User Accounts
RunDll32.exe shell32.dll,Control_RunDLL nusrmgr.cpl

# Windows Security Center
RunDll32.exe shell32.dll,Control_RunDLL wscui.cpl

# Windows Fonts Installation Folder
Rundll32 Shell32.dll,SHHelpShortcuts_RunDLL FontsFolder

# Windows Firewall
RunDll32.exe shell32.dll,Control_RunDLL firewall.cpl

# Abrir la calculadora
rundll32 zipfldr.dll, RouteTheCall calc.exe
rundll32 advpack.dll, RegisterOCX calc.exe
rundll32 c:\Windows\System32\pcwutl.dll,LaunchApplication calc.exe

# You looking out for that "RegisterOCX" function in IEAdvpack.dll?  
rundll32.exe C:\windows\system32\IEAdvpack.dll,RegisterOCX C:\path\to\payload.dll
rundll32.exe C:\windows\system32\IEAdvpack.dll,RegisterOCX C:\path\to\payload.exe
rundll32.exe IEAdvpack.dll,RegisterOCX calc.exe

# Llame al Asistente de conexión de la unidad de red
rundll32.exe shell32.dll, SHHelpShortcuts_RunDLL Connect

# Abra un cuadro de diálogo que muestra la versión del sistema operativo Windows. También puede mostrar este cuadro de diálogo ejecutando el comando winver.exe
rundll32.exe shell32.dll, ShellAboutA

# Muestra el árbol del sistema de archivos del disco duro de la computadora
rundll32.exe IEAKENG.dll, BrowseForFileA

# Llame al cuadro de diálogo AYUDA Y SOPORTE en la página especificada. Por ejemplo, puede usar la llamada mshelp como la página html: // Windows /? Id = 33307acf-0698-41ba-b014-ea0a2eb8d0a8
rundll32.exe ndfapi.dll, NdfRunDllHelpTopic "html-page"

# Llame al diálogo ABRIR COMO ... para abrir este archivo
rundll32.exe shell32.dll, OpenAs_RunDLL "ruta y nombre de archivo"

# Muestra el cuadro de diálogo de la utilidad de red del cliente de SQL Server
rundll32.exe shell32.dll, Control_RunDLL Cliconfg.dll

# Muestra el cuadro de diálogo Eliminar dispositivo
rundll32.exe shell32.dll, Control_RunDLL Hotplug.dll

# Reescribe el contenido de este archivo
rundll32.exe admparse.dll, CheckDuplicateKeysA "ruta y nombre de archivo"

# Crea una carpeta. Si esta carpeta ya existe, se borrarán todos sus contenidos
rundll32.exe IEAKENG.dll, BToolbar_SaveA "ruta a la carpeta"

# Inicia el navegador de Internet Explorer y descarga la página http://g.msn.com/WMHFUSEN/101724
rundll32.exe appwiz.cpl, GetProgramsOnline

# Ejecuta el comando
rundll32.exe shell32.dll, ShellExec_RunDLL "comando"

# Abra la carpeta. Si no especifica una carpeta, se abrirá la carpeta de su perfil
rundll32.exe url.dll, FileProtocolHandler "directorio"

# Elimina todos los archivos de la carpeta especificada que tienen el atributo FILEATTRIBUTETAGINFORMATION
rundll32.exe WININET.dll, RunOnceUrlCache "ruta a la carpeta"

# Ejecute el archivo xml
rundll32.exe xwizards.dll, ProcessXMLFile "ruta y nombre del archivo xml"

# Presiona el botón derecho del mouse
rundll32.exe user32.dll, mouse_event

# Coloque el cursor en la esquina inferior derecha de la pantalla
rundll32.exe user32.dll, SetCursorPos

# Detener el servicio de actualización en segundo plano dfsvc.exe
rundll32.exe dfshim.dll, KillService

# Ejecuta los comandos descritos en la rama de registro HKLM \ SOFTWARE \ Microsoft \ Windows \ CurrentVersion \ RunOnceEx (o en la rama de la partición raíz HKCU)
rundll32.exe IERNONCE.dll, RunOnceExProcess

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

# Control Panel

RunDll32.exe shell32.dll,Control_RunDLL

# Delete Temporary Internet Files

RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 8

# Delete Cookies

RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 2

# Delete History

RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 1

# Delete Form Data

RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 16

# Delete Passwords

RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 32

# Delete All

RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 255

# Delete all files and settings stored by Add-ons

RunDll32.exe InetCpl.cpl,ClearMyTracksByProcess 4351

# Date and Time Properties

RunDll32.exe shell32.dll,Control_RunDLL timedate.cpl

# Device Manager

RunDll32.exe devmgr.dll DeviceManager_Execute

# Folder Options – General

RunDll32.exe shell32.dll,Options_RunDLL 0

# Folder Options – Search

RunDll32.exe shell32.dll,Options_RunDLL 2

# Folder Options – View

RunDll32.exe shell32.dll,Options_RunDLL 7

# Hibernate

RunDll32.exe powrprof.dll,SetSuspendState

# Keyboard Properties

RunDll32.exe shell32.dll,Control_RunDLL main.cpl @1

# Lock Screen

RunDll32.exe user32.dll,LockWorkStation

# Mouse Button – Swap left button to function as right

Rundll32 User32.dll,SwapMouseButton

# Map Network Drive Wizard

Rundll32 Shell32.dll,SHHelpShortcuts_RunDLL Connect

# Network Connections

RunDll32.exe shell32.dll,Control_RunDLL ncpa.cpl

# Organize IE Favourites

Rundll32.exe shdocvw.dll,DoOrganizeFavDlg

# Open With Dialog Box

Rundll32 Shell32.dll,OpenAs_RunDLL File.ext

# Plays a waveform sound

rundll32.exe user32.dll,MessageBeep

# Printer User Interface

Rundll32 Printui.dll,PrintUIEntry

# Printer Management Folder.

Rundll32 Shell32.dll,SHHelpShortcuts_RunDLL PrintersFolder

# Power Options

RunDll32.exe Shell32.dll,Control_RunDLL powercfg.cpl

# Stored Usernames and Passwords

RunDll32.exe keymgr.dll,KRShowKeyMgr

# Safely Remove Hardware Dialog Box

Rundll32 Shell32.dll,Control_RunDLL HotPlug.dll

# Taskbar Properties

RunDll32.exe shell32.dll,Options_RunDLL 1

# User Accounts

RunDll32.exe shell32.dll,Control_RunDLL nusrmgr.cpl

# Windows Security Center

RunDll32.exe shell32.dll,Control_RunDLL wscui.cpl

# Windows Fonts Installation Folder

Rundll32 Shell32.dll,SHHelpShortcuts_RunDLL FontsFolder

# Windows Firewall

RunDll32.exe shell32.dll,Control_RunDLL firewall.cpl

# Abrir la calculadora

rundll32 zipfldr.dll, RouteTheCall calc.exe

rundll32 advpack.dll, RegisterOCX calc.exe

rundll32 c:\Windows\System32\pcwutl.dll,LaunchApplication calc.exe

# You looking out for that "RegisterOCX" function in IEAdvpack.dll?

rundll32.exe C:\windows\system32\IEAdvpack.dll,RegisterOCX C:\path\to\payload.dll

rundll32.exe C:\windows\system32\IEAdvpack.dll,RegisterOCX C:\path\to\payload.exe

rundll32.exe IEAdvpack.dll,RegisterOCX calc.exe

# Llame al Asistente de conexión de la unidad de red

rundll32.exe shell32.dll, SHHelpShortcuts_RunDLL Connect

# Abra un cuadro de diálogo que muestra la versión del sistema operativo Windows. También puede mostrar este cuadro de diálogo ejecutando el comando winver.exe

rundll32.exe shell32.dll, ShellAboutA

# Muestra el árbol del sistema de archivos del disco duro de la computadora

rundll32.exe IEAKENG.dll, BrowseForFileA

# Llame al cuadro de diálogo AYUDA Y SOPORTE en la página especificada. Por ejemplo, puede usar la llamada mshelp como la página html: // Windows /? Id = 33307acf-0698-41ba-b014-ea0a2eb8d0a8

rundll32.exe ndfapi.dll, NdfRunDllHelpTopic "html-page"

# Llame al diálogo ABRIR COMO ... para abrir este archivo

rundll32.exe shell32.dll, OpenAs_RunDLL "ruta y nombre de archivo"

# Muestra el cuadro de diálogo de la utilidad de red del cliente de SQL Server

rundll32.exe shell32.dll, Control_RunDLL Cliconfg.dll

# Muestra el cuadro de diálogo Eliminar dispositivo

rundll32.exe shell32.dll, Control_RunDLL Hotplug.dll

# Reescribe el contenido de este archivo

rundll32.exe admparse.dll, CheckDuplicateKeysA "ruta y nombre de archivo"

# Crea una carpeta. Si esta carpeta ya existe, se borrarán todos sus contenidos

rundll32.exe IEAKENG.dll, BToolbar_SaveA "ruta a la carpeta"

# Inicia el navegador de Internet Explorer y descarga la página http://g.msn.com/WMHFUSEN/101724

rundll32.exe appwiz.cpl, GetProgramsOnline

# Ejecuta el comando

rundll32.exe shell32.dll, ShellExec_RunDLL "comando"

# Abra la carpeta. Si no especifica una carpeta, se abrirá la carpeta de su perfil

rundll32.exe url.dll, FileProtocolHandler "directorio"

# Elimina todos los archivos de la carpeta especificada que tienen el atributo FILEATTRIBUTETAGINFORMATION

rundll32.exe WININET.dll, RunOnceUrlCache "ruta a la carpeta"

# Ejecute el archivo xml

rundll32.exe xwizards.dll, ProcessXMLFile "ruta y nombre del archivo xml"

# Presiona el botón derecho del mouse

rundll32.exe user32.dll, mouse_event

# Coloque el cursor en la esquina inferior derecha de la pantalla

rundll32.exe user32.dll, SetCursorPos

# Detener el servicio de actualización en segundo plano dfsvc.exe

rundll32.exe dfshim.dll, KillService

# Ejecuta los comandos descritos en la rama de registro HKLM \ SOFTWARE \ Microsoft \ Windows \ CurrentVersion \ RunOnceEx (o en la rama de la partición raíz HKCU)

rundll32.exe IERNONCE.dll, RunOnceExProcess

Automatizar SDRSharp con PowerShell (parte 5)

(No Ratings Yet)

Abrir, ocultar el menú, poner en funcionamiento SDRSharp y recorrer el rango de frecuencias desde 400~470 MHz haciendo una captura […]

Automatizar SDRSharp con PowerShell (parte 4)

(1 votes, average: 5.00 out of 5)

Abrir, ocultar el menú, poner en funcionamiento SDRSharp y recorrer el rango de frecuencias desde 400~470 MHz

#Abrir SDRSharp
Start-Process E:\sdrsharp-x86\SDRSharp.exe

Start-Sleep -Seconds 5

#Funciones necesarias para hacer clic
$MouseEventSig=@'
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
'@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

#Hacer clic en el botón del menú para ocultarlo
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(23,54)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Hacer clic en Start para poner en funcionamiento SDRSharp
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(60,54)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Mover el cursor hasta la posición de los MHz y hacer clic
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(382,54)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Escribir en la posición de los MHz el valor 400
[System.Windows.Forms.SendKeys]::SendWait("400")

Start-Sleep -Seconds 5

#Hacer 70 clics en la posición de la unidad en los MHz
1..70 | % {
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(422,46)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)
Start-Sleep -Seconds 5
}

#Abrir SDRSharp

Start-Process E:\sdrsharp-x86\SDRSharp.exe

Start-Sleep -Seconds 5

#Funciones necesarias para hacer clic

$MouseEventSig=@'

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

#Hacer clic en el botón del menú para ocultarlo

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(23,54)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Hacer clic en Start para poner en funcionamiento SDRSharp

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(60,54)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Mover el cursor hasta la posición de los MHz y hacer clic

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(382,54)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Escribir en la posición de los MHz el valor 400

[System.Windows.Forms.SendKeys]::SendWait("400")

Start-Sleep -Seconds 5

#Hacer 70 clics en la posición de la unidad en los MHz

1..70 | % {

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(422,46)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

}

Automatizar SDRSharp con PowerShell (parte 3)

(No Ratings Yet)

Abrir, ocultar el menú y poner en funcionamiento SDRSharp en la frecuencia 400 MHz

#Abrir SDRSharp
Start-Process E:\sdrsharp-x86\SDRSharp.exe

Start-Sleep -Seconds 5

#Funciones necesarias para hacer clic
$MouseEventSig=@'
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
'@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

#Hacer clic en el botón del menú para ocultarlo
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(23,54)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Hacer clic en Start para poner en funcionamiento SDRSharp
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(60,54)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Mover el cursor hasta la posición de los MHz y hacer clic
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(382,54)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Escribir en la posición de los MHz el valor 400
[System.Windows.Forms.SendKeys]::SendWait("400")

#Abrir SDRSharp

Start-Process E:\sdrsharp-x86\SDRSharp.exe

Start-Sleep -Seconds 5

#Funciones necesarias para hacer clic

$MouseEventSig=@'

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

#Hacer clic en el botón del menú para ocultarlo

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(23,54)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Hacer clic en Start para poner en funcionamiento SDRSharp

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(60,54)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Mover el cursor hasta la posición de los MHz y hacer clic

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(382,54)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Escribir en la posición de los MHz el valor 400

[System.Windows.Forms.SendKeys]::SendWait("400")

Pulsar en el primer resultado de la búsqueda en Baidu

(No Ratings Yet)

#Para la resolución de pantalla 1366 x 768

$MouseEventSig=@’
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
‘@

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name 'MouseEventWinApi' -passThru

Start-Process Chrome 'https://www.baidu.com/'

Start-Sleep -Seconds 5

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(384,302)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

[System.Windows.Forms.SendKeys]::SendWait('PowerShell')
[System.Windows.Forms.SendKeys]::SendWait('{ENTER}')

Start-Sleep -Seconds 5

#Pulsar en el primer resultado de la búsqueda
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(198,212)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

#Para la resolución de pantalla 1366 x 768

$MouseEventSig=@’

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

‘@

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name 'MouseEventWinApi' -passThru

Start-Process Chrome 'https://www.baidu.com/'

Start-Sleep -Seconds 5

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(384,302)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

[System.Windows.Forms.SendKeys]::SendWait('PowerShell')

[System.Windows.Forms.SendKeys]::SendWait('{ENTER}')

Start-Sleep -Seconds 5

#Pulsar en el primer resultado de la búsqueda

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(198,212)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Automatizar SDRSharp con PowerShell (parte 2)

(No Ratings Yet)

Abrir, ocultar el menú y poner en funcionamiento SDRSharp

#Abrir SDRSharp
Start-Process E:\sdrsharp-x86\SDRSharp.exe

Start-Sleep -Seconds 5

#Funciones necesarias para hacer clic
$MouseEventSig=@'
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
'@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

#Hacer clic en el botón del menú para ocultarlo
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(23,54)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Hacer clic en Start para poner en funcionamiento SDRSharp
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(60,52)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

#Abrir SDRSharp

Start-Process E:\sdrsharp-x86\SDRSharp.exe

Start-Sleep -Seconds 5

#Funciones necesarias para hacer clic

$MouseEventSig=@'

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

#Hacer clic en el botón del menú para ocultarlo

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(23,54)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Hacer clic en Start para poner en funcionamiento SDRSharp

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(60,52)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Introducción a la automatización en PowerShell

(2 votes, average: 5.00 out of 5)

#Ejercicio 1
#Posición X,Y
$dX = ([System.Windows.Forms.Cursor]::Position.X) #Coordenada X
$dY = ([System.Windows.Forms.Cursor]::Position.Y) #Coordenada Y
$dX,$dY

#Ejercicio 2
#Ver la posición X,Y de forma indefinida cada medio segundo
for ()
{
Start-Sleep -m 500
$dX = ([System.Windows.Forms.Cursor]::Position.X)
$dY = ([System.Windows.Forms.Cursor]::Position.Y)
Write-Host $dX,$dY #print
}

#Ejercicio 3
#Almacenar las posiciones en un fichero
for (1)
{
Start-Sleep -s 1
$dX = ([System.Windows.Forms.Cursor]::Position.X)
$dY = ([System.Windows.Forms.Cursor]::Position.Y)
Write-Host $dX,$dY
$dX.ToString()+','+$dY.ToString() | Out-File posicion.txt -Append
}

#Ejercicio 4
#Reproducir las posiciones almacenadas en un fichero
gc .\posicion.txt | %{
Start-Sleep -s 1
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point($_.split(',')[0],$_.split(',')[1])
}

#Ejercicio 5
#Hacer clic izquierdo en una posición de la pantalla
#Funciones y declaraciones necesarias para poder hacer clic 
$MouseEventSig=@’
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
‘@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name “MouseEventWinApi” -passThru
#Hacer clic izquierdo en el botón de inicio
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(19,741)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0);
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0);

#Ejercicio 6
#Hacer clic derecho en una posición de la pantalla
#Funciones y declaraciones necesarias para poder hacer clic 
$MouseEventSig=@’
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
‘@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name “MouseEventWinApi” -passThru
#Hacer clic derecho en el botón de inicio
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(19,741)
$MouseEvent::mouse_event(0x00000008, 0, 0, 0, 0);
$MouseEvent::mouse_event(0x00000010, 0, 0, 0, 0);

#Ejercicio 7
#Pintar una línea automáticamente en Paint
#Desde la posición 200,200 a la posición 300,300
Start-Process C:\WINDOWS\system32\mspaint.exe
Start-Sleep -Seconds 5
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(200,200)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
Start-Sleep -Seconds 2
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(300,300)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

#Ejercicio 1

#Posición X,Y

$dX = ([System.Windows.Forms.Cursor]::Position.X) #Coordenada X

$dY = ([System.Windows.Forms.Cursor]::Position.Y) #Coordenada Y

$dX,$dY

#Ejercicio 2

#Ver la posición X,Y de forma indefinida cada medio segundo

for ()

{

Start-Sleep -m 500

$dX = ([System.Windows.Forms.Cursor]::Position.X)

$dY = ([System.Windows.Forms.Cursor]::Position.Y)

Write-Host $dX,$dY #print

}

#Ejercicio 3

#Almacenar las posiciones en un fichero

for (1)

{

Start-Sleep -s 1

$dX = ([System.Windows.Forms.Cursor]::Position.X)

$dY = ([System.Windows.Forms.Cursor]::Position.Y)

Write-Host $dX,$dY

$dX.ToString()+','+$dY.ToString() | Out-File posicion.txt -Append

}

#Ejercicio 4

#Reproducir las posiciones almacenadas en un fichero

gc .\posicion.txt | %{

Start-Sleep -s 1

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point($_.split(',')[0],$_.split(',')[1])

}

#Ejercicio 5

#Hacer clic izquierdo en una posición de la pantalla

#Funciones y declaraciones necesarias para poder hacer clic

$MouseEventSig=@’

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

‘@

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name “MouseEventWinApi” -passThru

#Hacer clic izquierdo en el botón de inicio

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(19,741)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0);

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0);

#Ejercicio 6

#Hacer clic derecho en una posición de la pantalla

#Funciones y declaraciones necesarias para poder hacer clic

$MouseEventSig=@’

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

‘@

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name “MouseEventWinApi” -passThru

#Hacer clic derecho en el botón de inicio

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(19,741)

$MouseEvent::mouse_event(0x00000008, 0, 0, 0, 0);

$MouseEvent::mouse_event(0x00000010, 0, 0, 0, 0);

#Ejercicio 7

#Pintar una línea automáticamente en Paint

#Desde la posición 200,200 a la posición 300,300

Start-Process C:\WINDOWS\system32\mspaint.exe

Start-Sleep -Seconds 5

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(200,200)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

Start-Sleep -Seconds 2

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(300,300)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Abrir vídeos de Youtube leyendo desde un fichero y enviar la reproducción a la Smart TV

(1 votes, average: 5.00 out of 5)

#El fichero contiene enlaces de Yotube
#https://www.youtube.com/watch?v=sNwpQwn5awY
#https://www.youtube.com/watch?v=ETradti7L4c

#Función para enviar la reproducción a la Smart TV
function EnviarSmartTV
{
#Importar DLL para simular el clic del ratón
#Es necesario poner las comillas correctamente cuando se importa la DLL user32.dll
 
$MouseEventSig=@’
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
‘@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name “MouseEventWinApi” -passThru

#Depende de la resolución de pantalla
#Pulsar en "Personaliza y controla Google Chrome"
[System.Windows.Forms.Cursor]::Position=New-Object System.Drawing.Point(1347,43)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)
Start-Sleep -Seconds 5

#Nos posicionamos en la opción "Enviar"
[System.Windows.Forms.SendKeys]::SendWait(‘E')
Start-Sleep -Seconds 5

#Pulsar la tecla ENTER
[System.Windows.Forms.SendKeys]::SendWait(‘{ENTER}’)
Start-Sleep -Seconds 10

#Enviar youtube.com a la primera TV
[System.Windows.Forms.Cursor]::Position=New-Object System.Drawing.Point(653,153)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)
Start-Sleep -Seconds 5

#Pulsar en "ENVIAR"
[System.Windows.Forms.Cursor]::Position=New-Object System.Drawing.Point(705,173)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)
}

Get-Content E:\listadovideos.txt | % {
#Abrir enlace de Youtube
Start-Process chrome $_
#Enviar la reproducción a la Smart TV mediante la función EnviarSmartTV
EnviarSmartTV
#Esperar antes de reproducir el siguiente vídeo
Start-Sleep -Seconds 200
}

#El fichero contiene enlaces de Yotube

#https://www.youtube.com/watch?v=sNwpQwn5awY

#https://www.youtube.com/watch?v=ETradti7L4c

#Función para enviar la reproducción a la Smart TV

function EnviarSmartTV

{

#Importar DLL para simular el clic del ratón

#Es necesario poner las comillas correctamente cuando se importa la DLL user32.dll

$MouseEventSig=@’

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

‘@

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name “MouseEventWinApi” -passThru

#Depende de la resolución de pantalla

#Pulsar en "Personaliza y controla Google Chrome"

[System.Windows.Forms.Cursor]::Position=New-Object System.Drawing.Point(1347,43)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Nos posicionamos en la opción "Enviar"

[System.Windows.Forms.SendKeys]::SendWait(‘E')

Start-Sleep -Seconds 5

#Pulsar la tecla ENTER

[System.Windows.Forms.SendKeys]::SendWait(‘{ENTER}’)

Start-Sleep -Seconds 10

#Enviar youtube.com a la primera TV

[System.Windows.Forms.Cursor]::Position=New-Object System.Drawing.Point(653,153)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Pulsar en "ENVIAR"

[System.Windows.Forms.Cursor]::Position=New-Object System.Drawing.Point(705,173)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

}

Get-Content E:\listadovideos.txt | % {

#Abrir enlace de Youtube

Start-Process chrome $_

#Enviar la reproducción a la Smart TV mediante la función EnviarSmartTV

EnviarSmartTV

#Esperar antes de reproducir el siguiente vídeo

Start-Sleep -Seconds 200

}

Enviar la reproducción de los tráileres de películas a la Smart TV

(No Ratings Yet)

#Función para enviar la reproducción a la Smart TV
function EnviarSmartTV
{
#Importar DLL para simular el clic del ratón
#Es necesario poner las comillas correctamente cuando se importa la DLL user32.dll
 
$MouseEventSig=@’
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
‘@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name “MouseEventWinApi” -passThru

#Depende de la resolución de pantalla
#Pulsar en "Personaliza y controla Google Chrome"
[System.Windows.Forms.Cursor]::Position=New-Object System.Drawing.Point(1347,43)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)
Start-Sleep -Seconds 5

#Nos posicionamos en la opción "Enviar"
[System.Windows.Forms.SendKeys]::SendWait(‘E')
Start-Sleep -Seconds 5

#Pulsar la tecla ENTER
[System.Windows.Forms.SendKeys]::SendWait(‘{ENTER}’)
Start-Sleep -Seconds 10

#Enviar youtube.com a la primera TV
[System.Windows.Forms.Cursor]::Position=New-Object System.Drawing.Point(653,153)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)
Start-Sleep -Seconds 5

#Pulsar en "ENVIAR"
[System.Windows.Forms.Cursor]::Position=New-Object System.Drawing.Point(705,173)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)
}

$url='https://www.youtube.com/user/UniversalSpain/playlists?sort=lad&flow=list&view=1'
$result = Invoke-WebRequest $url
#Respetar los dos espacios entre "link yt"
$result.AllElements | Where class -eq “ spf-link  yt-uix-sessionlink” | %{$_.outerText
'https://www.youtube.com'+$_.href
#Reproducir tráiler
$trailer='https://www.youtube.com'+$_.href
Start-Process chrome $trailer
#Enviar la reproducción a la Smart TV mediante la función EnviarSmartTV
EnviarSmartTV
Start-Sleep -Seconds 200
}

#Función para enviar la reproducción a la Smart TV

function EnviarSmartTV

{

#Importar DLL para simular el clic del ratón

#Es necesario poner las comillas correctamente cuando se importa la DLL user32.dll

$MouseEventSig=@’

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

‘@

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name “MouseEventWinApi” -passThru

#Depende de la resolución de pantalla

#Pulsar en "Personaliza y controla Google Chrome"

[System.Windows.Forms.Cursor]::Position=New-Object System.Drawing.Point(1347,43)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Nos posicionamos en la opción "Enviar"

[System.Windows.Forms.SendKeys]::SendWait(‘E')

Start-Sleep -Seconds 5

#Pulsar la tecla ENTER

[System.Windows.Forms.SendKeys]::SendWait(‘{ENTER}’)

Start-Sleep -Seconds 10

#Enviar youtube.com a la primera TV

[System.Windows.Forms.Cursor]::Position=New-Object System.Drawing.Point(653,153)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

#Pulsar en "ENVIAR"

[System.Windows.Forms.Cursor]::Position=New-Object System.Drawing.Point(705,173)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

}

$url='https://www.youtube.com/user/UniversalSpain/playlists?sort=lad&flow=list&view=1'

$result = Invoke-WebRequest $url

#Respetar los dos espacios entre "link yt"

$result.AllElements | Where class -eq “ spf-link yt-uix-sessionlink” | %{$_.outerText

'https://www.youtube.com'+$_.href

#Reproducir tráiler

$trailer='https://www.youtube.com'+$_.href

Start-Process chrome $trailer

#Enviar la reproducción a la Smart TV mediante la función EnviarSmartTV

EnviarSmartTV

Start-Sleep -Seconds 200

}

Enviar a la Smart TV desde Google Chrome

Abrir el formulario de contacto de una web y rellenarlo una vez de forma automática con SendKeys

(No Ratings Yet)

#Función necesaria para hacer clic en una parte de la página
$MouseEventSig=@'
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
'@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

#Abrir la web de contacto
Start-Process chrome "https://www.jesusninoc.com/contact2/"

#Pulsar en cualquier parte de la web para poner el foco dentro
Start-Sleep -Seconds 2
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(833,189)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

#Ir tabulando y escribiendo en los campos del formulario
Start-Sleep -Seconds 2
[System.Windows.Forms.SendKeys]::SendWait('{TAB}')
[System.Windows.Forms.SendKeys]::SendWait('Bob')
Start-Sleep -Seconds 2
[System.Windows.Forms.SendKeys]::SendWait('{TAB}')
[System.Windows.Forms.SendKeys]::SendWait('Esponja')
Start-Sleep -Seconds 2
[System.Windows.Forms.SendKeys]::SendWait('{TAB}')
[System.Windows.Forms.SendKeys]::SendWait('12345')
Start-Sleep -Seconds 2
[System.Windows.Forms.SendKeys]::SendWait('{TAB}')
[System.Windows.Forms.SendKeys]::SendWait('bob@esponja.com')
Start-Sleep -Seconds 2
[System.Windows.Forms.SendKeys]::SendWait('{TAB}')
[System.Windows.Forms.SendKeys]::SendWait(' ')

#Una vez cumplimentados los campos pulsar ENTER
Start-Sleep -Seconds 2
[System.Windows.Forms.SendKeys]::SendWait('{TAB}')
[System.Windows.Forms.SendKeys]::SendWait("{ENTER}")

#Función necesaria para hacer clic en una parte de la página

$MouseEventSig=@'

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

#Abrir la web de contacto

Start-Process chrome "https://www.jesusninoc.com/contact2/"

#Pulsar en cualquier parte de la web para poner el foco dentro

Start-Sleep -Seconds 2

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(833,189)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

#Ir tabulando y escribiendo en los campos del formulario

Start-Sleep -Seconds 2

[System.Windows.Forms.SendKeys]::SendWait('{TAB}')

[System.Windows.Forms.SendKeys]::SendWait('Bob')

Start-Sleep -Seconds 2

[System.Windows.Forms.SendKeys]::SendWait('{TAB}')

[System.Windows.Forms.SendKeys]::SendWait('Esponja')

Start-Sleep -Seconds 2

[System.Windows.Forms.SendKeys]::SendWait('{TAB}')

[System.Windows.Forms.SendKeys]::SendWait('12345')

Start-Sleep -Seconds 2

[System.Windows.Forms.SendKeys]::SendWait('{TAB}')

[System.Windows.Forms.SendKeys]::SendWait('bob@esponja.com')

Start-Sleep -Seconds 2

[System.Windows.Forms.SendKeys]::SendWait('{TAB}')

[System.Windows.Forms.SendKeys]::SendWait(' ')

#Una vez cumplimentados los campos pulsar ENTER

Start-Sleep -Seconds 2

[System.Windows.Forms.SendKeys]::SendWait('{TAB}')

[System.Windows.Forms.SendKeys]::SendWait("{ENTER}")

Mover el puntero del ratón a una posición de la pantalla y hacer clic

(No Ratings Yet)

#Importar función para hacer clic
$MouseEventSig=@'
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
'@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

#Mover el cursor del ratón a la posición 28,32
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(28,32)

#Hacer clic en la posición 28,32
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

#Importar función para hacer clic

$MouseEventSig=@'

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

#Mover el cursor del ratón a la posición 28,32

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(28,32)

#Hacer clic en la posición 28,32

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Guardar la búsqueda de billetes de AVE

(No Ratings Yet)

$MouseEventSig=@'
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
'@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

Start-Process chrome "https://venta.renfe.com/vol/home.do"

Start-Sleep -Seconds 10
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(294,247)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)
Start-Sleep -Seconds 10
[System.Windows.Forms.SendKeys]::SendWait('MADRID')
Start-Sleep -Seconds 5
[System.Windows.Forms.SendKeys]::SendWait('{TAB}')
Start-Sleep -Seconds 10
[System.Windows.Forms.SendKeys]::SendWait('BARCELONA')
Start-Sleep -Seconds 5
[System.Windows.Forms.SendKeys]::SendWait('{TAB}')
Start-Sleep -Seconds 10
[System.Windows.Forms.SendKeys]::SendWait('25/11/2016')
Start-Sleep -Seconds 5
[System.Windows.Forms.SendKeys]::SendWait('{ENTER}')
Start-Sleep -Seconds 10
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(343,671)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)
Start-Sleep -Seconds 10
#Si falla la petición pulsar en el botón "RECARGAR"
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(666,497)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)


#Guardar resultado de la búsqueda para un día en concreto
Start-Sleep -Seconds 5
$_
[System.Windows.Forms.SendKeys]::SendWait('^{s}')
Start-Sleep -Seconds 5
$tiempo=(Get-Date).tostring("dd-MM-yyyy-hh-mm-ss")
Start-Sleep -Seconds 5
[System.Windows.Forms.SendKeys]::SendWait("d:\ave\"+$tiempo)
Start-Sleep -Seconds 5
[System.Windows.Forms.SendKeys]::SendWait('{ENTER}')
Start-Sleep -Seconds 20
[System.Windows.Forms.SendKeys]::SendWait('{END}')

$MouseEventSig=@'

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

Start-Process chrome "https://venta.renfe.com/vol/home.do"

Start-Sleep -Seconds 10

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(294,247)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 10

[System.Windows.Forms.SendKeys]::SendWait('MADRID')

Start-Sleep -Seconds 5

[System.Windows.Forms.SendKeys]::SendWait('{TAB}')

Start-Sleep -Seconds 10

[System.Windows.Forms.SendKeys]::SendWait('BARCELONA')

Start-Sleep -Seconds 5

[System.Windows.Forms.SendKeys]::SendWait('{TAB}')

Start-Sleep -Seconds 10

[System.Windows.Forms.SendKeys]::SendWait('25/11/2016')

Start-Sleep -Seconds 5

[System.Windows.Forms.SendKeys]::SendWait('{ENTER}')

Start-Sleep -Seconds 10

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(343,671)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 10

#Si falla la petición pulsar en el botón "RECARGAR"

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(666,497)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

#Guardar resultado de la búsqueda para un día en concreto

Start-Sleep -Seconds 5

[System.Windows.Forms.SendKeys]::SendWait('^{s}')

Start-Sleep -Seconds 5

$tiempo=(Get-Date).tostring("dd-MM-yyyy-hh-mm-ss")

Start-Sleep -Seconds 5

[System.Windows.Forms.SendKeys]::SendWait("d:\ave\"+$tiempo)

Start-Sleep -Seconds 5

[System.Windows.Forms.SendKeys]::SendWait('{ENTER}')

Start-Sleep -Seconds 20

[System.Windows.Forms.SendKeys]::SendWait('{END}')

Buscar billetes de AVE automáticamente

(No Ratings Yet)

$MouseEventSig=@'
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
'@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

Start-Process chrome "https://venta.renfe.com/vol/home.do"

Start-Sleep -Seconds 10
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(294,247)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)
Start-Sleep -Seconds 10
[System.Windows.Forms.SendKeys]::SendWait('MADRID')
Start-Sleep -Seconds 5
[System.Windows.Forms.SendKeys]::SendWait('{TAB}')
Start-Sleep -Seconds 10
[System.Windows.Forms.SendKeys]::SendWait('BARCELONA')
Start-Sleep -Seconds 5
[System.Windows.Forms.SendKeys]::SendWait('{TAB}')
Start-Sleep -Seconds 10
[System.Windows.Forms.SendKeys]::SendWait('25/11/2016')
Start-Sleep -Seconds 5
[System.Windows.Forms.SendKeys]::SendWait('{ENTER}')
Start-Sleep -Seconds 10
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(343,671)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)
Start-Sleep -Seconds 10
#Si falla la petición pulsar en el botón "RECARGAR"
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(666,497)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

$MouseEventSig=@'

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

Start-Process chrome "https://venta.renfe.com/vol/home.do"

Start-Sleep -Seconds 10

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(294,247)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 10

[System.Windows.Forms.SendKeys]::SendWait('MADRID')

Start-Sleep -Seconds 5

[System.Windows.Forms.SendKeys]::SendWait('{TAB}')

Start-Sleep -Seconds 10

[System.Windows.Forms.SendKeys]::SendWait('BARCELONA')

Start-Sleep -Seconds 5

[System.Windows.Forms.SendKeys]::SendWait('{TAB}')

Start-Sleep -Seconds 10

[System.Windows.Forms.SendKeys]::SendWait('25/11/2016')

Start-Sleep -Seconds 5

[System.Windows.Forms.SendKeys]::SendWait('{ENTER}')

Start-Sleep -Seconds 10

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(343,671)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 10

#Si falla la petición pulsar en el botón "RECARGAR"

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(666,497)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Buscar en Google con PowerShell: buscar en el buscador palabras contenidas en un fichero

(No Ratings Yet)

#Importar función para hacer clic
$MouseEventSig=@'
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
'@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

gc D:\palabras.txt | %{
    #Arrancar Google Chrome
    $url='https://www.google.es'
    Start-Process chrome.exe -ArgumentList @('-incognito',$url)

    #Esperar hasta cargar Google Chrome
    Start-Sleep -Seconds 5

    #Escribir una palabra y pulsar ENTER
    [System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(427,399)
    #Introducir cada palabra del fichero
    [System.Windows.Forms.SendKeys]::SendWait($_)
    [System.Windows.Forms.SendKeys]::SendWait("{ENTER}")

    #Esperar hasta realizar la búsqueda
    Start-Sleep -Seconds 5
}

#Importar función para hacer clic

$MouseEventSig=@'

[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

gc D:\palabras.txt | %{

#Arrancar Google Chrome

$url='https://www.google.es'

Start-Process chrome.exe -ArgumentList @('-incognito',$url)

#Esperar hasta cargar Google Chrome

Start-Sleep -Seconds 5

#Escribir una palabra y pulsar ENTER

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(427,399)

#Introducir cada palabra del fichero

[System.Windows.Forms.SendKeys]::SendWait($_)

[System.Windows.Forms.SendKeys]::SendWait("{ENTER}")

#Esperar hasta realizar la búsqueda

Start-Sleep -Seconds 5

}

Older Posts