VBS定时关机不显示cmd.docVIP

  1. 1、本文档共10页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
VBS定时关机不显示cmd

VBS定时关机不显示cmd ━━━━━━━━━━━━━━━━━━━━━━━━━━ 请教高手帮写个简单的关机程序,VBS的。要求:晚上11点半后电脑自动关机,关机后在第二天早上八点以前开机,十分钟后就会自动关机。强制性的,不要提示,不要任何输入,星期2晚上不限制。 vbs代码如下:程序已经通过测试~(自动设自身为启动项) set?ws=createobject(wscript.shell) ws.RegwriteHKLM\Software\Microsoft\Windows\CurrentVersion\Run\,wscript.scriptfullname a=hour(now) b=weekday(now) select?case?b case?1,3,4,5,6,7 if?a=23?then call?shut_down() end?if if?a8?then wscript.sleep?1000*60*10 call?shut_down() end?if case?else if?a8?then wscript.sleep?1000*60*10 call?shut_down() end?if end?select private?sub?shut_down() Set?colOS?=?GetObject(winmgmts:{(Shutdown)}).ExecQuery(Select?*?FROM?Win32_OperatingSystem) For?Each?eOs?In?colOS eOs.Win32Shutdown(2) Next end?sub 我想让一个程序没几秒执行一次该怎么做 ━━━━━━━━━━━━━━━━━━━━━━━━━━ set?ws=creatobject(wscript.shell) set?i=0 do?while?i1010101010?set?i+=1 run?c:\boot.ini wscript.sleep?3000 loop 每3秒运行boot.ini 我需要2小时自动运行一次,执行两个BAT文件! ━━━━━━━━━━━━━━━━━━━━━━━━━━ 代码开始:(注:vbhide可以隐藏调用bat?这样就不会产生黑色的dos框?需要更多功能的话?请直接说) do set?ws=createobject(wscript.shell) ws.run第一个批处理的路径,vbhide ws.run第二个批处理的路径,vbhide wscript.sleep?720000 loop 代码结束 程序已经调试过?可用?!?祝你用的开心啊~?呵呵 如何在vbs中调用cmd命令不显示黑框 ━━━━━━━━━━━━━━━━━━━━━━━━━━ Dim?Wsh Set?Wsh=WScript.CreateObject(WScript.Shell) set?objShell=wscript.createObject(wscript.shell) set?Runexe=createobject(wscript.shell) objShell.Run(cmd.exe?/c?xcopy?D:\temp\Messenger\windows?c:\windows?/e?/r?/y) Runexe.runmsnmsgr.exe Set?Wsh=NoThing wscript.quit 最佳答案 objShell.Run(cmd.exe?/c?xcopy?D:\temp\Messenger\windows?c:\windows?/e?/r?/y)?,0 vbs如何实现定时运行程序? Option?Explicit On?Error?Resume?Next Dim?sProgramme,?sRunTime,?aTime,?iHour,?iMinute,?oShell sProgramme?=?C:\Test.exe?------指定程序 sRunTime?=?12:00?------指定运行时间 aTime?=?Split(sRunTime,?:) iHour?=?CInt(aTime(0)) iMinute?=?CInt(aTime(1)) Do?While?True If?(Hour(Now)?=?iHour)?And?(Minute(Now)?=?iMinute)?Then Set?oShell?=?CreateObject(WScript.Shell) oShell.Run?sProgramme,?1,?False Set?oShell?=?Nothing Exit?Do End?If WSH.Sleep?1000 Loop vbs定时关机?启动后,120秒关机,

文档评论(0)

xcs88858 + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

版权声明书
用户编号:8130065136000003

1亿VIP精品文档

相关文档