powershell - 控制台 Foxpro 应用程序上的 Powershell UI 自动化

Question

我似乎无法让此代码在控制台 foxpro 应用程序上运行。有什么我想念的吗。我已经在其他应用程序上测试了这段代码，它可以工作。

    ipmo "D:\WASP\WASP.dll"
    Select-Window "ntvdm" | Set-WindowActive  | Select-Control | Send-Keys "r"

狐狸专业版

当我在键盘上按“r”时，应用程序接受输入，但是当我运行此代码时，它不接受。

非常感谢。

Answer 1

我刚刚尝试将 WASP 与您的代码一起用于计算器，它似乎工作正常。

您可能想尝试使用这个：

[void][System.Reflection.Assembly]::LoadWithPartialName("'Microsoft.VisualBasic")
[Microsoft.VisualBasic.Interaction]::AppActivate((ps ntvdm).MainWindowTitle)
[void][System.Reflection.Assembly]::LoadWithPartialName("'System.Windows.Forms")
[System.Windows.Forms.SendKeys]::SendWait("{R}")

顺便说一句，确保您的应用程序确实具有进程名称ntvdm这可能会导致问题。这样你就在做同样的事情。如果您遇到一些性能问题，您可以添加一些等待，即Sleep -m 50在每行之间。