无忧启动论坛

标题: 请高手帮忙对以下关闭IE浏览器和资源管理器窗口的vbs脚本添加对360安全浏览器窗口... [打印本页]

---

作者: 有阴也有阳    时间: 2018-12-22 12:49
标题: 请高手帮忙对以下关闭IE浏览器和资源管理器窗口的vbs脚本添加对360安全浏览器窗口...



        请高手帮忙对以下关闭IE浏览器和资源管理器窗口的vbs脚本添加对360安全浏览器窗口的支持：


Set SHApp = CreateObject("Shell.Application")
Dim i,n
Dim win(100)
n=0
'Do
    For Each SHWin In SHApp.windows
        'WSH.Echo SHWin.FullName
        'WSH.Echo SHWin.LocationURL
        'WSH.Echo SHWin.LocationName
        Set win(n)=SHWin
        'SHWin.Quit
        n=n+1
        'If InStr(SHWin.LocationURL, "www.baidu.com") > 1 Then
        '    SHWin.Quit
        'ElseIf SHWin.LocationURL = "file:///D:/" Then
        '    SHWin.Quit
        'ElseIf SHWin.LocationURL = "file:///C:/" Then
        '    Exit Do
        'End If
    Next
    'WSH.Sleep(1000)
'Loop

For i=0 To n - 1
    win(i).Quit
Next


        谢谢！！！

---

作者: ku588    时间: 2018-12-22 13:39
利用cmdow关闭任务栏所有窗口：不知道能否有用！
@echo off
cmdow @ /hid
for /f %%a in ('cmdow /t') do cmdow %%a /cls

---

作者: 有阴也有阳    时间: 2018-12-22 13:55

ku588 发表于 2018-12-22 13:39
利用cmdow关闭任务栏所有窗口：不知道能否有用！
@echo off
cmdow @ /hid

谢谢！！！

---

作者: kingshui    时间: 2018-12-24 12:35

1. Examples:
   
2.     TASKKILL /IM notepad.exe
   
3.     TASKKILL /PID 1230 /PID 1241 /PID 1253 /T
   
4.     TASKKILL /F /IM cmd.exe /T
   
5.     TASKKILL /F /FI "PID ge 1000" /FI "WINDOWTITLE ne untitle*"
   
6.     TASKKILL /F /FI "USERNAME eq NT AUTHORITY\SYSTEM" /IM notepad.exe
   
7.     TASKKILL /S system /U domain\username /FI "USERNAME ne NT*" /IM *
   
8.     TASKKILL /S system /U username /P password /FI "IMAGENAME eq note*"

复制代码

如果可能 的话，，，taskkill也可以啊，
前提是窗口标题是正确的。

---

欢迎光临 无忧启动论坛 (http://bbs.wuyou.net/)

Powered by Discuz! X3.3