Question

我正在尝试制作自己的自动化软件以同时登录多台计算机，

我创建了一个VB.net服务，该服务使用sendkeys函数将密钥发送到PC，但是我无法获得该服务来为登录的用户输入这些密钥，而不是在Windows 10登录屏幕上，

这是我的代码：

Public Class Service1

Protected Overrides Sub OnStart(ByVal args() As String)
    ' Add code here to start your service. This method should set things
    ' in motion so your service can do its work.
    Dim thread As New Thread(AddressOf maisection)
    thread.Start()

End Sub
Public Function maisection()
    Threading.Thread.Sleep(10000)
    ' Send the keystrokes
    My.Computer.Keyboard.SendKeys("22", True)

    Return True
End Function
Protected Overrides Sub OnStop()
    ' Add code here to perform any tear-down necessary to stop your service.
End Sub

End Class

我不明白为什么我要安装该服务并启动它，在10秒钟后应该输入22，但没有输入，目前该服务以LocalService的身份运行，并且我已选中“允许服务”框与桌面互动”。我希望这项服务可以发送用户名和密码，以便将来登录PC，目前，这只是一个概念证明。

请有人帮忙吗？

谢谢

自动登录PC-VB.net

0 个答案: