vb里怎么调用用Microsoft Scripts Host脚本写的“Hello.vbs”程序？
该程序在资源管理器里用鼠标双击，就打开一个对话框显示：
Hello，everybody！
仅此而已。但我不知道在vb里怎么打开它？
请教请教！
问题点数：0、回复次数：9Top
1 楼online（龙卷风V4.0--决战江湖(MS MVP-VB)）回复于 2003-12-03 12:49:16 得分 0
测试通过
Option Explicit
Private Sub Command1_Click()
Shell "wscript.exe e:\windir.vbs", 1
End Sub
Top
2 楼online（龙卷风V4.0--决战江湖(MS MVP-VB)）回复于 2003-12-03 12:49:40 得分 0
windir.vbs
set wshshell=createobject("wscript.shell")
wscript.echo "windir is " &wshshell.expandenvironmentstrings("%windir%")
Top
3 楼Rick110AAA（海牛猪猪 And HerosⅢ之比蒙）回复于 2003-12-03 13:15:15 得分 0
学习ingTop
4 楼imur02（）回复于 2003-12-03 13:16:08 得分 0
谢谢大侠啊！您真是快啊！高！
有2个不明白：
（1）Shell "wscript.exe e:\windir.vbs", 1－－－中的“1”是什么意思？
（2）wscript.echo "windir is " &wshshell.expandenvironmentstrings("%windir%")－－－中expandenvironmentstrings（）函数是什么意思？
我是菜鸟，请教请教！
另外，我开始的那个问题，要是我想读取它的内容“Hello，everybody！”怎么写？
我另外给分！
谢谢先！
Top
5 楼online（龙卷风V4.0--决战江湖(MS MVP-VB)）回复于 2003-12-03 13:28:29 得分 0
Shell 函数
执行一个可执行文件，返回一个 Variant (Double)，如果成功的话，代表这个程序的任务 ID，若不成功，则会返回 0。
语法
Shell(pathname[,windowstyle])
Shell 函数的语法含有下面这些命名参数：
部分 描述
pathname 必要参数。Variant (String)，要执行的程序名，以及任何必需的参数或命令行变量，可能还包括目录或文件夹，以及驱动器。
Windowstyle 可选参数。Variant (Integer)，表示在程序运行时窗口的样式。如果 windowstyle 省略，则程序是以具有焦点的最小化窗口来执行的。
windowstyle 命名参数有以下这些值：
常量 值 描述
vbHide 0 窗口被隐藏，且焦点会移到隐式窗口。
VbNormalFocus 1 窗口具有焦点，且会还原到它原来的大小和位置。
VbMinimizedFocus 2 窗口会以一个具有焦点的图标来显示。
VbMaximizedFocus 3 窗口是一个具有焦点的最大化窗口。
VbNormalNoFocus 4 窗口会被还原到最近使用的大小和位置，而当前活动的窗口仍然保持活动。
VbMinimizedNoFocus 6 窗口会以一个图标来显示。而当前活动的的窗口仍然保持活动。
说明
如果 Shell 函数成功地执行了所要执行的文件，则它会返回程序的任务 ID。任务 ID 是一个唯一的数值，用来指明正在运行的程序。如果 Shell 函数不能打开命名的程序，则会产生错误。
注意 缺省情况下，Shell 函数是以异步方式来执行其它程序的。也就是说，用 Shell 启动的程序可能还没有完成执行过程，就已经执行到 Shell 函数之后的语句。
Top
6 楼online（龙卷风V4.0--决战江湖(MS MVP-VB)）回复于 2003-12-03 13:34:43 得分 0
str1="Hello，everybody！"
str2="wsh sample"
msgbox str1,vbinformation,str2Top
7 楼online（龙卷风V4.0--决战江湖(MS MVP-VB)）回复于 2003-12-03 13:38:56 得分 0
－－中expandenvironmentstrings（）函数是什么意思？
在运行过程中扩展环境变量，并将结果的字符串返回
object.expandenvironmentstrings(strstring)
Top
8 楼imur02（）回复于 2003-12-08 06:53:28 得分 0
谢谢大侠的答复！我要结贴了，结贴前有个小问题想请教一下,有没有空答复都是满分！
要是别的大侠解答，我另开贴给分！
这个问题就是：一个对话框显示“Hello，everybody！”，我怎样才能读取该msgbox框或者是网页返回的alert（）框的信息“Hello，everybody！”？
再一次感谢！Top
9 楼taomaintao（困了也不睡）回复于 2003-12-10 15:33:01 得分 0
这个问题没有遇见过,我想没必要嘛Top
