文章详情

  • 游戏榜单
  • 软件榜单
关闭导航
热搜榜
热门下载
热门标签
php爱好者> php文档>VB程序调用脚本

VB程序调用脚本

时间:2010-09-14  来源:vivieu

  vb里怎么调用用Microsoft Scripts Host脚本写的“Hello.vbs”程序?
VB调用CMD命令,VBS脚本等等都可以实现. 这个不需要控件的
测试

Option Explicit
Private Sub Command1_Click()
 Shell "wscript.exe e:\windir.vbs ", 1
End Sub

windir.vbs
set wshshell=createobject( "wscript.shell ")
wscript.echo "windir is " & wshshell.expandenvironmentstrings( "%windir% ")



详解
Shell函数
执行一个可执行文件,返回一个   Variant   (Double),如果成功的话,代表这个程序的任务ID,若不成功,则会返回 0。
  语法
Shell(pathname[,windowstyle])
  参数:
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函数之后的语句。
    一个有趣的测试: 一台仪器X通道串口与PC端的VB程序通信,用于测试X是否有工作异常。我在另一主机上工作,需要及时发现X的异常。通过VB调用脚本可以实现远程通知: 当VB程序运行到一定程度(例如出错)时执行一个脚本,这个脚本通过QQ快速聊天通道向外发送一条消息。      
相关阅读 更多 +
排行榜 更多 +
辰域智控app

辰域智控app

系统工具 下载
网医联盟app

网医联盟app

运动健身 下载
汇丰汇选App

汇丰汇选App

金融理财 下载