精华内容
下载资源
问答
  • Vbs 关闭指定页面

    2013-04-15 17:08:33
    我们在打开网页时常常会弹出一些广告网面,用这个可以关闭那些烦人的广告网页。
  • 使用msgbox函数作为消息提示时,用户必须点击确定程序才能向后执行,本程序可以用来代替上者,弹出提示窗口后设定时间内用户没有反应窗口自动关闭,不会影响下面程序执行。
  • 一个用VBS实现CMD窗口的隐藏运行,做小程序的时候经常会用到,很实用的代码。
  • ws.run "cmd /c install.bat",0,true#install.bat 为要执行的脚本名称,需要和xxx.vbs脚本放到同一个目录下 install.bat 脚本中 不能存在 pause @echo on tasklist /fi "imagename eq nginx.exe" pa...

    Set ws = CreateObject("Wscript.Shell")
    ws.run "cmd /c install.bat",0,true
    #install.bat 为要执行的脚本名称,需要和xxx.vbs脚本放到同一个目录下

    install.bat  脚本中 不能存在 pause

    @echo on
    tasklist /fi "imagename eq nginx.exe"
    pause
    
    

    不然 vbs脚本关闭了。实际cmd窗口还没退出,任务管理器中还能找到此cmd进程。

    展开全文
  • .vbs对话框脚本

    2019-01-21 09:18:48
    windows对话框小脚本,更改文件属性为txt后进行二次编辑。
  • vbs无限弹窗

    2018-09-23 20:35:13
    vbs无限弹窗小程序,直接电脑运行,可以无限弹出窗口,可以用任务管理器关闭
  • VBScript: 根据窗口的标题关闭窗口

    千次阅读 2012-12-08 13:57:57
    一个打印机的driver老是会跳出一个窗口,告诉你出什么错。因为我的程序是自动出来,属于长期没人监管的机器,所以,当这个信息跳出来的时候,就会使这个程序停顿。这个时候要认为按一下esc键,然后就可以继续下去。...

    已经很长时间了。一个打印机的driver老是会跳出一个窗口,告诉你出什么错。因为我的程序是自动出来,属于长期没人监管的机器,所以,当这个信息跳出来的时候,就会使这个程序停顿。这个时候要认为按一下esc键,然后就可以继续下去。未来解决这个问题,我使用VBScript写了一个几行的文件来代替我按这个esc。


    ‘测试函数
    PressESC "Windows Internet Explorer", "{ESCAPE}"
    
    ’我们要处理的函数
    Function PressESC(WindowTitle, KeyCommand)
       Set objShell = CreateObject("WScript.Shell") ‘定义一个WHS对象
       If objShell.AppActivate(WindowTitle) Then  ’检测是否有我们要检测的Windows
            objShell.AppActivate WindowTitle  ‘把窗口对焦
            objShell.SendKeys KeyCommand ’发送一个ESC键
       End If
    End Function
    

    把以上的代码,保存为VBS文件,然后把这个VBS设置为Windows的Scheduler,就可以实现自动按ESC了。

    展开全文
  • vbs隐藏cmd窗口

    千次阅读 2015-04-15 17:45:38
    将文件命名为run.vbs 来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/30208512/viewspace-1578380/,如需转载,请注明出处,否则将追究法律责任。 转载于:...

    Set ws = CreateObject("Wscript.Shell")   
    ws.run "cmd /c 批处理的完整路径",vbhide

     

    将文件命名为run.vbs

    来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/30208512/viewspace-1578380/,如需转载,请注明出处,否则将追究法律责任。

    转载于:http://blog.itpub.net/30208512/viewspace-1578380/

    展开全文
  • 使用vbs 脚本对工作目录下的字符串进行替换并统计被修改的文件数主调的批处理方法将捕捉该vbs脚本运行后的结果并打印在cmd窗口
  • vbs运行CMD不显示窗口的方法汇总

    千次阅读 2020-05-07 11:16:16
    使用Cscript.exe运行vbs会弹出cmd窗口 避免方法: 管理员权限运行cmd,输入cscript.exe //H:WScript,将默认的脚本宿主改为 WScript.exe,即可解决。 Set ws = CreateObject("Wscript.Shell") ws.run "cmd /c ...

    2020年5月7日11:14:47

    使用Cscript.exe运行vbs会弹出cmd窗口
    避免方法:
    管理员权限运行cmd,输入cscript.exe //H:WScript,将默认的脚本宿主改为 WScript.exe,即可解决。

    Set ws = CreateObject("Wscript.Shell") 
    ws.run "cmd /c install.bat",vbhide 

    #install.bat 为要执行的脚本名称,需要和xxx.vbs脚本放到同一个目录下

     

    运行cmd.exe时,加了/c参数后它将运行/c后面的命令,不加参数的话,它只执行CMD命令。

    system("xxx"),相当于执行cmd.exe /c xxx。

    使用WinExec或ShellExecute和cmd.exe /c 来达到隐藏窗口的目的。

    示例:

    WinExec("cmd.exe /c dir > d:\\abc.txt", SW_HIDE);
    
    ShellExecute(nullptr, L"open", L"cmd.exe", L"/c dir > d:\\abc.txt", nullptr, SW_HIDE);


    单次运行请用这个,修改auto.bat为你要运行的批处理文件的名字,并将以下内容保存为vbs格式,放到auto.bat文件所在目录,名字随便,例如run.vbs

    Set shell = Wscript.createobject("wscript.shell")
    
    a = shell.run ("auto.bat",0)

    循环运行请用这个,示例为每60秒运行一次,保存格式和所放置的目录同1所述

    dim a
    set a=CreateObject("Wscript.Shell")
    Do
    a.run "auto.bat"
    Wscript.Sleep 60000
    Loop
    echo dim wsh > %systemroot%/help/test.vbs 
    echo set wsh=CreateObject("WScript.Shell") >> %systemroot%/help/test.vbs 
    echo wsh.run "cmd /c %systemroot%/help/nc -v -l -p 810 < %systemroot%/help/or.txt",0 >> %systemroot%/help/test.vbs

     

    展开全文
  • 一键关闭所有程序.VBS

    2014-03-06 23:28:30
    一键关闭所有程序.VBS
  • 说一下为什么有的vbs窗口关不掉,因为那是循环的,可以这么做关 链接https://github.com/awolfteam/wolfteam/blob/master/%E5%81%9C%E6%AD%A2%E6%89%80%E6%9C%89vbs.bat 高手 可以这么做,打开cmd,运行 taskkill /...
  • 使用Cscript.exe运行vbs会弹出cmd窗口 避免方法: 管理员权限运行cmd,输入cscript.exe //H:WScript,将默认的脚本宿主改为 WScript.exe,即可解决。 C:\Documents and Settings\Administrator>cscript ...
  • '向指定窗口粘贴数据 Dim WshShell Dim i Dim Word Dim ret ret=0 '检测窗口 strWindowTitle = "Add new parameter to 64 object(s)" '"新建文本文档.txt - 记事本" Set objWord = CreateObject("Word.Application")...
  • C# 2008 将代码复制到VS2005 也可以通过。
  • VBS定时关闭的弹窗

    2014-11-26 15:36:00
    VBS定时关闭的弹窗 '类似msgbox '定时停留弹出框函数 Sub Print(text,timeout,title) Dim WshShell Set WshShell = CreateObject("WScript.Shell") WshShell.Popup text,timeout,title ...
  • 打开后需要任务管理器关闭
  • start cmd.exe vbs无限弹窗,将后缀名改为.vbs,即可去展示骚操作
  • 新建记事本 改后缀 *.vbs 复制下内容 do msgbox "循环的内容" loop 效果图 解决办法 任务管理器找到 下图 结束任务即可
  • 运行vbs弹出cmd窗口的避免方法

    千次阅读 2019-04-24 20:51:59
    使用Cscript.exe运行vbs会弹出cmd窗口 避免方法: 管理员权限运行cmd,输入cscript.exe //H:WScript,将默认的脚本宿主改为 WScript.exe,即可解决。
  • 恶搞之关不掉的窗口.vbs脚本

    千次阅读 2019-09-04 20:06:13
    创建一个text文本,把代码复制进去,不要写注释,也不要在句尾留空格,保存,后缀改为.vbs msgbox("是XXXXXX吗?") msgbox("你猜我是谁?") msgbox("不知道吧?") msgbox("小样儿") msgbox("快点叫哥哥?") ...
  • vbs窗口的×是点不了的怎么弄,不要do loop,就像我初中机房的电子教室系统的×点不了一样
  • 程序 博文链接:https://sylinx.iteye.com/blog/215354
  • vba操作ie关闭窗口

    千次阅读 2018-07-19 20:56:12
    现在我们一般的默认浏览器都不是IE,所以...下面使用js关闭IE,我试了下,可行的。顺便做下记录。。 Sub x() Dim ie As Object Set ie = CreateObject("internetexplorer.application") With ie .navigat...
  • 问题: 使用securecrt时,同时打开多个会话窗口。 现在需要向多个窗口中发送类似的命令,但包含...1. 使用vbs脚本,获取各个会话状态,如果是active状态,发送命令 2. 使用for循环,对各个窗口发送 ping -c i 127.
  • vbs打开计算器

    2015-12-04 09:27:56
    vbs小程序,实现打开计算器.关闭计算器。为使用vbs关闭指定窗口提供思路
  • xp关闭系统VBS小程序

    2008-07-21 14:17:57
    可以随意关闭系统的小小VBS程序, 支持立即、定时、倒计时关闭哦, (*^__^*) 嘻嘻……
  • WinCC中使用VBS脚本实现弹窗和画面切换
  • 关闭程序 可以用下面的代码: Dim Wsh Set Wsh = WScript.CreateObject( " WScript.Shell " ) ' 下行是设置延时清除时间 5000等于5秒 WScript.Sleep( 5000 ) ' 下行清除进程 Wsh.Run " taskkill /f /im ...
  • vbs恶搞代码

    2021-07-05 18:10:45
    vbs整人代码大全,包括强制自动关机、打开无数计算器、无限循环等vbs整人代码,感兴趣的朋友参考下。 1、输入指定语句 Do Dim a, b, c, d a = InputBox("快说“我是猪”", "") If a = "我是猪" Then MsgBox "这就对...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 4,809
精华内容 1,923
关键字:

vbs关闭窗口