如何在VB应用程序中使用VBScript函数的返回值？

Question

我正在开发ASP.NET应用程序，我需要使用一个旧的VBScript文件，要在VB函数中将其转换为纯VB真的很难。

这个VBScript应该返回一个我想在调用它的VB函数中使用的数组。

如何在VB应用程序中调用VBScript函数并使用它返回的值？

我已经通过许多论坛和常见问题解答来搜索操作方法，但是这些结果似乎主要集中在旧版本的.NET框架上。

如果有人可以通过一个非常简单的例子解释给我，我会非常感激。

---

我试图使用以下代码来调用VBS：

Dim WShell As Object 
WShell = CreateObject("WScript.Shell") 
WShell.Run("F:/SERVER/IIS/MyScript.vbs", 1, 0) 

Answer 1

VBScript已从VB.NET中删除了几步，因此如果不进行大量重构以使代码在VB.NET中正常运行，将很难将两种语言混合在一起。 我看到您可以采用以下三种方法来解决此问题：

1. 重构代码以在VB.NET中工作
   • 如您所述，这可能需要大量工作，但是您必须决定，将其他依赖项引入解决方案的复杂性是否足以抵消重构代码所需的额外工作。 通过使代码专门在托管环境中运行而不是跨越HTTP或COM边界，还应该获得性能上的好处。
2. 将脚本嵌入经典的ASP页中，并使用HTTP消息在VB.NET应用程序和ASP页之间进行通信
   • VBScript是对经典ASP的自然补充，因此您的脚本应在ASP页面中“正常工作”。 您可以设计ASP页面以接受通过查询字符串的输入，并将数据输出为VB.NET应用程序可以理解的文本。 您没有提到是否要制作ASP.NET网站或其他类型的VB.NET应用程序，但是如果要构建ASP.NET网站，则可能要看一下问题。将会已经建立一个网站。
3. 在COM组件中使用VB6 / VBA脚本控件，并使用COM互操作与VB.NET中的组件进行通信
   • 这就是开始变得非常复杂的地方。 在发布Visual Basic 6（VB6）之前，Microsoft已发布脚本控件，该控件可以嵌入VB应用程序中并运行自定义用户脚本。 从理论上讲，您可以创建一个新的VB6组件并引用Microsoft Script Control 1.0 ，使用一个新的Script对象调用您的脚本，并使用COM interop从您的VB6应用程序中调用VB6组件。 要运行您的脚本，需要进行大量的工作和几层依赖，并且仅当您的脚本实际上是数千行代码时，我才建议您使用此选项。 每次跨越COM / .NET边界时，您都将付出性能损失，因此您需要确保自己精心设计解决方案。

就个人而言，我的首选是将代码重构为VB.NET代码。 尽管您确实需要做更多的工作，但要确保您利用了仅在托管代码中运行的性能优势，并且消除了应用程序中其他依赖项的需求。 如果脚本确实如此庞杂，以至于要转换为VB.NET都需要进行大量工作，那么您可以考虑其他工具选项。

Answer 2

我试图使用以下代码来调用VBS：

Dim WShell As Object  
WShell = CreateObject("WScript.Shell")  
WShell.Run("F:/SERVER/IIS/MyScript.vbs", 1, 0)