Re: [問題] 文字文件開啟最大化
※ 引述《pkokqk (流風)》之銘言:
: 就是txt檔
: 希望每次開啟時就是最大化
: 不要那種還要建立捷徑去設定最大化
我的作法是寫一支程式幫忙,步驟很簡單,如下:
1. 在記事本貼入下列程式,存檔時,請注意:
1) 副檔名請用 .vbs,例如:「c:\temp\MaxNotepad.vbs」。
2) 編碼方式請選: ANSI。
' -- cut here --
strComputer = "."
strMaxProgram = UCase("notepad.exe")
strExitProgram = UCase("calc.exe")
Set objWMIService = GetObject("winmgmts:\\" _
& strComputer & "\root\cimv2")
Set colMonitoredProcesses = objWMIService. _
ExecNotificationQuery( _
"select * from __instancecreationevent " _
& " within 1 where TargetInstance isa 'Win32_Process'")
i = 0
Set Shell = WScript.CreateObject("WScript.Shell")
Do While i = 0
Set objLatestProcess = colMonitoredProcesses.NextEvent
If UCase(objLatestProcess.TargetInstance.Name) = strMaxProgram Then
Shell.SendKeys "% x"
End If
If UCase(objLatestProcess.TargetInstance.Name) = strExitProgram Then
Exit Do
End If
Loop
' -- cut here --
2. 點兩下上述步驟建立的 .vbs 程式檔案。
(這支程式會背景執行,工作管理員預設會多出一支 wscript.exe)。
3. 啟動記事本或者點兩下 .txt 文字檔,順利的話,記事本會自動極大化。
啟動「小算盤」可關閉這支程式。
《原理說明》
1. 副檔名 .vbs 的檔案會被 Windows 當作是「程式」,由 wscript.exe 或
cscript.exe 載入執行。
2. 我們的程式會跟 WMI 要求「程式啟動通知」,只要有程式啟動,我們的
程式都會收到通知。
3. 通知的程式名稱如果是 notepad.exe,就送出「Alt+空白」「x」來最大化視窗;
通知的程式名稱如果是 calc.exe,就脫離迴圈結束程式。
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 111.252.120.208
※ 編輯: TeemingVoid 來自: 111.252.120.208 (01/05 14:29)
推
01/05 15:54, , 1F
01/05 15:54, 1F
→
01/05 16:07, , 2F
01/05 16:07, 2F
推
01/05 16:31, , 3F
01/05 16:31, 3F
→
01/05 18:32, , 4F
01/05 18:32, 4F
→
01/05 18:33, , 5F
01/05 18:33, 5F
推
01/05 20:40, , 6F
01/05 20:40, 6F
→
01/05 20:40, , 7F
01/05 20:40, 7F
→
01/05 20:41, , 8F
01/05 20:41, 8F
→
01/05 20:42, , 9F
01/05 20:42, 9F
→
01/05 20:42, , 10F
01/05 20:42, 10F
→
01/05 21:19, , 11F
01/05 21:19, 11F
→
01/05 21:37, , 12F
01/05 21:37, 12F
推
01/05 22:14, , 13F
01/05 22:14, 13F
討論串 (同標題文章)