首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

容易的vb程序

2012-12-26 
简单的vb程序先编写一个bat文件@echo offecho 开始......echo 解压文件winrar x -o+ ./EnvironmentTools.z

简单的vb程序
先编写一个bat文件

@echo off

echo 开始......

echo 解压文件
winrar x -o+ ./EnvironmentTools.zip C:\

echo 执行exe文件
start D:\eclipse\eclipse.exe

echo  调用vb程序
start ./install_tcl.vbs
ping 1.1.1.1 -n 1 -w 12000>NUL

echo. & pause


#install_tcl.vbs文件
Set objShell = CreateObject("Wscript.Shell")
strCommandLine = "C:\eclipse.exe"   '启动安装程序
objShell.Run(strCommandLine)
set WshShell = CreateObject("WScript.Shell")
WScript.Sleep 1000                 '延时1秒
WshShell.SendKeys "{ENTER}"       
WScript.Sleep 1000
WshShell.SendKeys "{ENTER}"      
WScript.Sleep 1000

热点排行