Simulación de pulsaciones de teclado en un Servicio de Windows (VB .Net)

Iniciado por ArkadyDezhnev, 2 Febrero 2012, 17:17 PM

0 Miembros y 1 Visitante están viendo este tema.

ArkadyDezhnev

Hola! Como bien dice el largo titulo que le he puesto al thread, he creado un servicio de windows en VB .Net, con Visual Studio 2010. Lo he generado, instalado y ejecutado, pero no realiza su función, que debería ser simular las pulsaciones del teclado según los datos que recibe de un xml en un servidor web. No tengo ninguna experiencia con servicios, no se si es que SendKeys no se puede usar dentro del mismo. El Servicio se ejecuta con permisos de LocalSystem.Alguien podria ayudarme? Copio el codigo que he usado:

Código (vbnet) [Seleccionar]
Imports System.Xml
Imports System
Imports System.Runtime.InteropServices
Imports System.Windows.Forms

Public Class Service1

    Protected Overrides Sub OnStart(ByVal args() As String)

        EventLog.WriteEntry("Ready for input")

    End Sub

    Protected Overrides Sub OnStop()
       
    End Sub

    Private Sub reloj_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles reloj.Tick
        Dim xmldoc As XElement = New XElement("http://www.loquesea.com//input.xml")

        Dim keydown As String = xmldoc.Element("keydown").Value

        SendKeys.SendWait(keydown)
        SendKeys.Flush()


    End Sub
End Class


Editado: Se me olvido añadir que hay un timer que regula el tiempo entre pulsacion y pulsación