如何执行VBS？

Question

我发现了怎么做这个

Download_Example

我有一个关于如何在vb6中执行VBS的问题(VBS有form3 (来自vb6项目)显示)

我用微软的通用对话控件6.0制作了一个对话框

CommonDialog1.Filter = "File (*.vbs)|*.txt|All Files (*.*)|*.*"
CommonDialog1.DefaultExt = "vbs"
CommonDialog1.DialogTitle = "Select File"
CommonDialog1.ShowOpen

FileName属性为您提供了需要使用的变量

Answer 1

一种变通方法可能只是使用Shell执行脚本。

Shell "wscript.exe c:\myscript.vbs", vbNormalFocus 

Shell "wscript.exe " & CommonDialog1.FileName, vbNormalFocus 

请参阅微软的wscript documentation。

vbNormalFocus的作用是将焦点恢复到您的vb6程序。它是可选的，但您可能需要它。参见documentation。

Answer 2

看起来你正在尝试从VB6应用程序运行VBScript，以便在VB6应用程序中打开一个对话框。

VB6 -> VBScript -> Same VB6 

您不能使用Shell执行此操作，因为它将脚本作为单独的进程运行。脚本不知道Form3是什么，因为它是VB6应用程序的一个组件，一旦应用程序编译完成，它就不会作为一个单独的实体存在。

编辑：看起来像是你想要做的，但使用Microsoft Script Control是可能的。Here are a few examples.感谢@GSerg指出这一点。

可以使用This或this作为变通方法，但我不认为这是正确的方法。

回到您的需求。你到底想要达到什么目的？一定有更好的方法。