Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/algorithm/12.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
在vb6中从客户端在服务器中执行exe_Vb6_Client_Exe_Execution - Fatal编程技术网

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

在vb6中从客户端在服务器中执行exe,vb6,client,exe,execution,Vb6,Client,Exe,Execution,我有一个连接到开发服务器的终端服务器 在我的开发服务器中有一个共享文件夹,其中包含许多“.exe”文件 我想要的是,我的终端服务器上有权访问该共享文件夹的任何终端都应该能够启动“.exe”文件 但是这些“.exe”文件无法在终端服务器上工作。这些“.exe”文件是在我的开发服务器中工作所必需的 由于这个原因,我试图创建一个执行器,它将执行我在开发服务器中定义的“.exe”文件。如何在vb6中实现这一点?如果我理解您的问题,我想您可能需要类似这样的代码 Sub Main() Dim ob

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

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

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

但是这些“.exe”文件无法在终端服务器上工作。这些“.exe”文件是在我的开发服务器中工作所必需的


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

如果我理解您的问题,我想您可能需要类似这样的代码

Sub Main()

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

End Sub
您可以使用要作为参数运行的exe调用exe:


MyAppRunner MyAppToRun.exe

如果程序需要在第二台“开发”服务器上运行,那么如果需要交互,您需要向该服务器发送RDP

您可以做的另一件事是将它们分为客户端和服务器,然后在终端服务器上运行客户端。这些客户机将使用DCOM、Web服务等作为两部分之间的粘合剂


例外情况可能是作为命令行或无UI批处理程序编写的程序,这在大多数VB6使用中非常罕见。这些可以通过远程登录到第二台服务器或通过远程执行来运行。不过,没有必要详细说明这一点,因为它更不可能满足您的需求。如果你真的是指批处理/非交互式程序,那么可以使用WSH进行远程脚本编写。

这实际上是它的一半,但仍然是+1。