(vbScript)vbs自动安装postgressql

来源:互联网  时间:2016/8/17 12:55:07

关于网友提出的“ (vbScript)vbs自动安装postgressql”问题疑问,本网通过在网上对“ (vbScript)vbs自动安装postgressql”有关的相关答案进行了整理,供用户进行参考,详细问题解答如下:

问题: (vbScript)vbs自动安装postgressql
描述:

vbspostgresql自动安装

vbs自动安装postgressql时,是通过设置等待时间安装的
vbs:
Set objWord = CreateObject("Word.Application")
Set ws = CreateObject("Wscript.Shell") 
strCommandLine = "postgresql-9.3.4-4-windows.exe"        'start
ws.Run(strCommandLine)
WScript.Sleep 20000
Set colTasks = objWord.Tasks
for each colTask in colTasks
if instr(colTask.name,"Setup")<>0 then k=1
next
objWord.Quit
if k=1 then 
ws.appactivate "Setup"
wscript.sleep 3000
ws.sendkeys "{enter}"
wscript.sleep 1000
ws.sendkeys "{enter}"
wscript.sleep 1000
ws.sendkeys "{enter}"
wscript.sleep 1000
ws.sendkeys "p"
ws.sendkeys "o"
ws.sendkeys "s"
ws.sendkeys "t"
ws.sendkeys "g"
ws.sendkeys "r"
ws.sendkeys "e"
ws.sendkeys "s"
wscript.sleep 1000
ws.sendkeys "{tab}"
ws.sendkeys "p"
ws.sendkeys "o"
ws.sendkeys "s"
ws.sendkeys "t"
ws.sendkeys "g"
ws.sendkeys "r"
ws.sendkeys "e"
ws.sendkeys "s"
wscript.sleep 1000
ws.sendkeys "{enter}"
wscript.sleep 1000
ws.sendkeys "{enter}"
wscript.sleep 1000
ws.sendkeys "{enter}"
wscript.sleep 1000
ws.sendkeys "{enter}"
wscript.sleep 30000
ws.sendkeys "{tab}"
ws.sendkeys "{space}"
ws.sendkeys "{tab}"
ws.sendkeys "{enter}"
else
msgbox "no"
end if
有没有其他办法,可以不通过时间点击下一步的

上一篇net程序在vs2010中可以添加和查询,在iis里只能添加,查询结果是空的,里边有数据
下一篇(JavaScript)js的函数不能用,比如onclilk,split,求大神指点一下
明星图片
相关文章
《 (vbScript)vbs自动安装postgressql》由码蚁之家搜集整理于网络,
联系邮箱:mxgf168#qq.com(#改为@)