vb6 - 在vb6中从客户端执行服务器中的exe

Question

我有一个连接到开发服务器的终端服务器。

在我的开发服务器中有一个共享文件夹，其中包含许多“.exe”文件。

我想要的是我的终端服务器上有权访问该共享文件夹的任何终端都应该能够启动“.exe”文件。

但是这些“.exe”文件不能在终端服务器上运行。这些“.exe”文件需要在我的开发服务器中工作。

出于这个原因，我试图创建一个执行器来执行我在我的开发服务器中定义的“.exe”文件。我如何在 vb6 中实现这一点？

score 1 · Accepted Answer

如果我理解你的问题，我想你会想要看起来像这样的代码

Sub Main()

    Dim objWSShell As Object
    Set objWSShell = CreateObject("Wscript.Shell")
    objWSShell.Run Command$, 0, True

End Sub

你会用你想作为参数运行的 exe 来调用你的 exe：

MyAppRunner MyAppToRun.exe

score 1 · Accepted Answer

如果程序需要在第二个“开发”服务器上运行，如果您想要交互，则需要 RDP 到该服务器。

您唯一能做的就是将它们分成客户端和服务器，然后在终端服务器上运行客户端。这些客户端将使用 DCOM、Web 服务等作为两者之间的粘合剂。

一个例外可能是编写为命令行或无 UI 批处理程序的程序，这在大多数 VB6 使用中相当罕见。这些可以通过 Telnet 到第二台服务器或远程执行来运行。没有必要详细说明这一点，因为它更不可能满足您的需求。如果您确实是指批处理/非交互式程序，请查看使用 WSH 的远程脚本。

2 回答 2