从VBScript调用控制台应用程序中的函数

Question

我有一个控制台应用程序myapp.exe。在该应用程序是一个功能，我们称之为：

public static int AddIntegers(int a, int b) 

是否有可能使该功能从外部看到，这样一个VBScript能打电话吗？我是否必须将该函数移动到DLL中，还是可以将它放在EXE中并使其可见？如果是这样，怎么样？

Answer 1

理想化，你应该做一个DLL和组COM可见你需要公开的功能。

using System; 
using System.Runtime.InteropServices; 
namespace MyDLL 
{ 
    [ComVisible(true)] 
    public class Operations 
    { 
     [ComVisible(true)] 
     public int AddIntegers(int a, int b) 
     { 
      return a + b; 
     } 
    } 
} 

你编译你的DLL后，您需要与regasm.exe注册它，这样就可以从VBScript调用它：

Dim myObj 
Set myObj = CreateObject("MyDLL.Operations") 
Dim sum 
sum = myObj.AddIntegers(3, 5) 

这个答复是基于CodeProject上通过raymund的发布How to call a .NET DLL from a VBScript Macaalay。我建议你阅读它。

此外，你应该检查其他stackoverflow发布，如How to call C# DLL function from VBScript。

Answer 2

是的，您需要使托管代码库（DLL）对VBScript可见（很可能通过GAC）。然后在您的VBScript中，你可以这样做：

dim yourObject = CreateObject("YourContainingObject"); 
yourObject.AddIntegers yourFirstInt, yourSecondInt