|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 |
$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) |
