;---------- 按热键 ALT + ` (~键位于Esc键正下方) 打开当前工作文件夹 ----------------------------------
!`::
{
WinMinimizeAll
FileCreateDir, D:\快盘\
Run , "D:\快盘\",,max
WinMinimizeAll
IfWinExist ,D:\快盘
{
WinActivate
WinActivateBottom,D:\快盘
WinMaximize
#WinActivateForce
}
IfWinExist ,D:\快盘
{
WinActivate
WinActivateBottom,D:\快盘
WinMaximize
#WinActivateForce
}
}
return
;---------- 按热键 Shift + 空格键 打开_Total_Commander_Ver8.01 ----------------------------------
+Space::
{
Run, TC850RC1\TC850RC1.bat,,hide
}
return
;--- ;ALT+S 打开网站主页 --------------------------------
!s::
;存在多行命令时热键后的代码必须换行(另起一行)
SetTitleMatchMode,2
{
IfWinExist 360搜索 - 干净、安全、可信任的搜索引擎 - 搜狗高速浏览器
WinActivate
Else
{
Run "C:\Users\Administrator\AppData\Roaming\360se\bin\360se.exe"
Sleep,2000 ; 2秒
}
}
return
;---------- 按热键 Pause/Break 键 本脚本暂停480秒 -------------------------------------------------------
Pause::
;IfPaused{ReRun}
{
MsgBox,64,本脚本暂停480秒,本脚本暂停480秒,1
Sleep,480000
}
return
;---------- 按热键 Pause/Break 键 暂停或者启动本脚本 -------------------------------------------------------
;Pause::Pause
;---------- 按热键 ` 立即锁定桌面 ----------------------------------
;`::Run Rundll32.exe user32.dll LockWorkStation
;---------- 按热键 Alt+A 打开本脚本 -------------------------------------------------------
!a::
Run, %A_ScriptDir%\SciTE\SciTE.exe autoHotkey.ahk,,Max
Sleep 1500
IfWinExist ,SciTE4AutoHotkey
{
;WinActivate
;WinMaximize
; Sleep 500
; Send {AltDown}{L Down}
; Sleep 200
; Send {L Up}{AltUp}
; Sleep 200
; Send {A Down}{A Up}
}
return
;---------- 按热键 Ctrl + B 打开 BaiduDiskSearch 百度硬盘搜索 ----------------------------------
^b::run "C:\Program Files\Baidu\Disk Search\BaiduDiskSearch.exe"
;---------- 按热键 Alt + ` 打开 Search Everything 本地文件快速闪电查找搜索工具 ----------------------------------
;;^`::run "D:\Personal\AutoHotkey\Everything\Everything.exe"
;---------- 按热键 Alt + ` 打开 Search Everything 本地文件快速闪电查找搜索工具 ----------------------------------
#`::run "D:\快盘"
;---------- 按热键 Ctrl + W 打开 Microsoft Office Word 2003 ( 文件扩展名是 .doc 可执行文件是 winword.exe 热键Ctrl+W ) ----------------------------------
!w::run "C:\Program Files\Microsoft Office\OFFICE11\WINWORD.exe"
;---------- 按热键 Ctrl + E 打开 Microsoft Office Excel 2003 ( 文件扩展名是 .xls 可执行文件是 excel.exe 热键Ctrl+E) ----------------------------------
!e::run "C:\Program Files\Microsoft Office\OFFICE11\EXCEL.exe"
/*
;---------- 按热键 ` 打开我的当前工作文件夹 D:\D ----------------------------------
`::
{
;存在多行命令时热键后的代码必须换行(另起一行)
SetTitleMatchMode,2
IfWinExist %MyWorkingFolderWinTitle%
{
WinActivate
WinGetPos,,, Width, Height, %MyWorkingFolderWinTitle%
while (Width<>A_ScreenWidth) or (Height<> A_ScreenHeight)
{
WinMove, %MyWorkingFolder% ,,0,0, A_ScreenWidth, A_ScreenHeight
}
Send ,{alt down}{v}{alt up}
Sleep , 10
Send , {s}
}
Else
{
Run %MyWorkingFolderWinTitle%
WinWait, %MyWorkingFolderWinTitle%
WinActivate ,%MyWorkingFolderWinTitle%
WinGetPos,,, Width, Height, %MyWorkingFolderWinTitle%
while (Width<>A_ScreenWidth) or (Height<> A_ScreenHeight)
{
WinMove, %MyWorkingFolder% ,,0,0, A_ScreenWidth, A_ScreenHeight
}
Send ,{alt down}{v}{alt up}
Sleep , 10
Send , {s}
}
}
return
;---------- 按热键 ` 打开我的当前工作文件夹 D:\D ----------------------------------
*/