这篇文章主要讲解了“vbs脚本怎么实现下载jre包并静默安装”,文中的讲解内容简单清晰,易于学习与理解,下面请大家跟着小编的思路慢慢深入,一起来研究和学习“vbs脚本怎么实现下载jre包并静默安装”吧!
安装完成后可以回调,替换echo 123456789和pause就行了。
dim path set ws = CreateObject("WScript.Shell") set fso=createobject("scripting.filesystemobject") ''定义安装路径 path = ws.ExpandEnvironmentStrings("%windir%")+"\jre6\" ''创建目录 If (fso.FolderExists(path)) Then Else fso.createfolder(path) End If ''文件下载 Set xPost = CreateObject("Microsoft.XMLHTTP") Set sGet = CreateObject("ADODB.Stream") Sub DownloadToFile(url, file) xPost.Open "GET", url, False xPost.Send sGet.Type = 1 sGet.Open sGet.Write xPost.responseBody sGet.SaveToFile file, 2 sGet.Close End Sub dim url url = "http://xxx.com/jre-6-windows-i586.exe" dim fileName,batpath fileName = path+Right(url, Len(url) - InStrRev(url,"/")) DownloadToFile url, fileName batpath = path+"start.bat" set f=fso.createtextfile(batpath) ''写bat执行安装jre,完成后输出123456789,并暂停 f.write fileName+" /s INSTALLDIR="+path& vbcrlf&"echo 123456789"&vbcrlf&"pause" f.close ''隐藏运行 ws.run(batpath),0,true
感谢各位的阅读,以上就是“vbs脚本怎么实现下载jre包并静默安装”的内容了,经过本文的学习后,相信大家对vbs脚本怎么实现下载jre包并静默安装这一问题有了更深刻的体会,具体使用情况还需要大家实践验证。这里是亿速云,小编将为大家推送更多相关知识点的文章,欢迎关注!
免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。