使用.bat

时间:2016-12-26 22:39:14

标签: windows powershell batch-file vbscript desktop

我正在尝试创建一个快捷方式,通过该快捷方式我可以切换显示桌面'以及如果程序是通过桌面运行而隐藏桌面图标'所以这是我的.bat文件

set mypath=%cd%
cd C:\Program Files\oneClickHD\
start ShowDesktop.lnk
if "%mypath%"=="C:\Users\admin\Desktop" goto GO
:GO
start HideDesktopIcons.exe
如果我使用它的快捷方式来运行它,那么这段代码并没有真正起作用,因为我想到了3种方法但是无法实现它们这些方法是:

1)如果是,则检测是否有任何窗口打开然后切换showdesktop.lnk   或者当前前景窗口不是桌面切换

2)检查桌面是否在前台,如果是,请运行hideIcons.exe

3)而不是使用showdesktop.lnk切换显示桌面使用只打开桌面的东西

找到解决方案我尝试使用nircmd通过它我无法找到如何返回活动窗口的值或检查桌面是否处于活动状态并且有一个值得赞扬的:nircmd win min alltopnodesktop 这是唯一一个似乎有效的,但它最大限度地减少了一切,我只能看到壁纸它只是以奇怪的方式工作。 然后我也想过使用vbs脚本,但发现更好地使用.bat用于windows相关的东西。 然后我也尝试使用powershell,但它在我的电脑上似乎没有。

1 个答案:

答案 0 :(得分:1)

没有窗口支持的东西比窗口支持最少的东西要好。

你需要写一个真正的程序。这会告诉您前景窗口的句柄,类名和窗口标题。

请参阅我的答案,了解VBScript How to find the window Title of Active(foreground) window using Window Script Host

等COM语言的方法

创建一个名为GetForegroundWindow.bas的文件。把它放进去吧。

Imports System
Imports System.IO
Imports System.Runtime.InteropServices
Imports Microsoft.Win32

Public Module MyApplication  
    Public Declare Function GetForegroundWindow Lib "user32"  As Integer
    Public Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
    Public Declare Function GetClassName Lib "user32" Alias "GetClassNameA" (ByVal hwnd As Long, ByVal lpClassName As String, ByVal nMaxCount As Long) As Long

Sub Main()
        Dim hWnd as Long, WT as String, CN as String, Length as Long
        On Error Resume Next
        hWnd=GetForegroundWindow()
        WT = Space(512)
        Length = GetWindowText(hwnd, WT, 508)
        WT = Left$(WT, Length)
        If WT = "" Then WT = Chr(171) & "No Window Text " & Err.LastDllError & Chr(187)
        CN = Space(512) 
        Length = GetClassName(hwnd, CN, 508)
        CN = Left$(CN, Length)      
        If CN = "" Then CN = "Error=" & Err.LastDllError
        Console.Out.WriteLine(hWnd & "," & WT & "," & CN)
'This shows how to toggle desktop, etc
'This will work as a vbscript if you remove "as object"

    Dim ShellApp as Object
    ShellApp = CreateObject("Shell.Application")
    ShellApp.MinimizeAll()
    ShellApp.UndoMinimizeAll()
    ShellApp.ToggleDesktop()

End Sub
End Module

将以上文件放在桌面上。启动命令提示符并键入

"C:\Windows\Microsoft.NET\Framework\v4.0.30319\vbc.exe" /platform:anycpu /sdkpath:C:\Windows\Microsoft.NET\Framework\v4.0.30319 /target:exe /out:"%userprofile%\desktop\GetForegroundWindow.exe" "%userprofile%\desktop\GetForegroundWindow.bas" /verbose

它提供这样的输出。

C:\Windows\system32>"C:\Users\User\Desktop\GetForegroundWindow.exe"
593444,Administrator: Command Prompt - "C:\Users\User\Desktop\GetForegroundWindow.exe",ConsoleWindowClass

您可以使用For /f循环进行解析。请参阅For /?

C:\Windows\system32>@for /f "Tokens=1-3 Delims=," %A in ('"C:\Users\User\Desktop\GetForegroundWindow.exe"') Do @Echo %C
ConsoleWindowClass

这些是Shell的窗口

Order   Level   WindowText  ClassName   HWnd    ParentHWnd  ProcessID   ParentProcessID ThreadID    ModuleNameHWin  EXENameProcess

21      «No Window Text 0»  Shell_TrayWnd   41227310    52039984    12336   5532    10668   «Not Available Error=126»   explorer.exe
22          Start   Start   43979912    41227310    12336   5532    10668   «Not Available Error=126»   explorer.exe
23          «No Window Text 0»  TrayDummySearchControl  73536804    41227310    12336   5532    10668   «Not Available Error=126»   explorer.exe
24              Search Windows  Button  56497500    73536804    12336   5532    10668   «Not Available Error=126»   explorer.exe
25              «No Window Text 0»  Edit    11736392    73536804    12336   5532    10668   «Not Available Error=126»   explorer.exe
26              «No Window Text 0»  ToolbarWindow32 23991502    73536804    12336   5532    10668   «Not Available Error=126»   explorer.exe
27          Task View   TrayButton  33362614    41227310    12336   5532    10668   «Not Available Error=126»   explorer.exe
28          «No Window Text 0»  TrayNotifyWnd   34476878    41227310    12336   5532    10668   «Not Available Error=126»   explorer.exe
29              10:06 AM    TrayClockWClass 24449812    34476878    12336   5532    10668   «Not Available Error=126»   explorer.exe
30              «No Window Text 0»  TrayShowDesktopButtonWClass 40899346    34476878    12336   5532    10668   «Not Available Error=126»   explorer.exe
31              Tray Input Indicator    TrayInputIndicatorWClass    46273942    34476878    12336   5532    10668   «Not Available Error=126»   explorer.exe
32                  «No Window Text 0»  Button  28185460    46273942    12336   5532    10668   «Not Available Error=126»   explorer.exe
33                  «No Window Text 0»  Button  25170502    46273942    12336   5532    10668   «Not Available Error=126»   explorer.exe
34              «No Window Text 0»  SysPager    21238280    34476878    12336   5532    10668   C:\Users\David Candy\Desktop\Editor\EditorSdi\Ed.exe    explorer.exe
35                  User Promoted Notification Area ToolbarWindow32 25628972    21238280    12336   5532    10668   «Not Available Error=126»   explorer.exe
36              «No Window Text 0»  Button  21107412    34476878    12336   5532    10668   «Not Available Error=126»   explorer.exe
37                  «No Window Text 0»  Button  32313836    21107412    12336   5532    10668   «Not Available Error=126»   explorer.exe
38              System Promoted Notification Area   ToolbarWindow32 16781596    34476878    12336   5532    10668   «Not Available Error=126»   explorer.exe
39              Notification Center TrayButton  18157900    34476878    12336   5532    10668   «Not Available Error=126»   explorer.exe
40              Touch keyboard  TIPBand 21697390    34476878    12336   5532    10668   «Not Available Error=126»   explorer.exe
41          «No Window Text 0»  ReBarWindow32   9375916 41227310    12336   5532    10668   «Not Available Error=126»   explorer.exe
42              Running applications    MSTaskSwWClass  24842334    9375916 12336   5532    10668   «Not Available Error=126»   explorer.exe
43                  Running applications    MSTaskListWClass    18485304    24842334    12336   5532    10668   «Not Available Error=126»   explorer.exe
44              Favorites   ToolbarWindow32 12193824    9375916 12336   5532    10668   «Not Available Error=126»   explorer.exe
45              Desktop ToolbarWindow32 25497672    9375916 12336   5532    10668   «Not Available Error=126»   explorer.exe