; 按快捷键`(即波浪号~所在的键盘按键)立即打开随身U盘中的办公专用文件夹
; 按快捷鍵`(即波浪號~所在的鍵盤按鍵)立即打開隨身U盤中的辦公專用文件夾
; WorkFolderHotkey.ahk
;
; http://www.autoahk.com/
; https://www.cnblogs.com/delphixx/p/12129024.html
; http://autohotkey.bokee.com/507525091.html
global OpenCount
Hotkey,``,打開隨身辦公專用U盤
:*:/wk::
打開隨身辦公專用U盤()
return
;
打開隨身辦公專用U盤()
{
OpenCount =0
; 檢測操作是否成功的定時器周期應當大于操作定時器的周期(即500大于100)
SetTimer,AllMissionComplete,500
SetTimer,OpenWorkFolder,100
SetTimer,ActivateWorkFolder,100
SetTimer,ReSizeWorkFolder,100
}
;
AllMissionComplete()
{
if(OpenCount >20)
{
SetTimer,AllMissionComplete,Delete
SetTimer,OpenWorkFolder,Delete
SetTimer,ActivateWorkFolder,Delete
SetTimer,ReSizeWorkFolder,Delete
ToolTip,沒有找到隨身U盤_請連接隨身U盤到電腦
SetTimer, RemoveToolTip, 2000
}
IfWinActive,,01_辦公文件
{
WinGetPos,X,Y,,,,01_辦公文件
if(A_ScreenWidth/2-X=0)
{
SetTimer,AllMissionComplete,Delete
SetTimer,OpenWorkFolder,Delete
SetTimer,ActivateWorkFolder,Delete
SetTimer,ReSizeWorkFolder,Delete
;~ ToolTip,已經成功打開辦公專用文件夾
;~ SetTimer, RemoveToolTip, 2000
}
}
}
;
OpenWorkFolder()
{
OpenCount++
IfWinNotExist,,01_辦公文件
{
DriveGet,DriveList,List
loop,Parse,DriveList
{
DriveGet,USBDriveLabel,Label,%A_LoopField%:
IfInString,USBDriveLabel, 隨身U盤
{
FileCreateDir,%A_LoopField%:\01_辦公文件
Run,%A_LoopField%:\01_辦公文件
}
}
}
}
;
ActivateWorkFolder()
{
WinShow,,01_辦公文件
WinActivate,,01_辦公文件
}
;
ReSizeWorkFolder()
{
WinMove,,01_辦公文件,A_ScreenWidth/2,0,A_ScreenWidth/2,A_ScreenHeight-35
}
;
RemoveToolTip:
SetTimer, RemoveToolTip, Off
ToolTip
return
總結
以上是生活随笔為你收集整理的; 按快捷键`(即波浪号~所在的键盘按键)立即打开随身U盘中的办公专用文件夹的全部內容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: 2072. Kirill the Gar
- 下一篇: Hadoop相关WebUI端口记录