上传至github
- 一直以来的问题出在不能用F1的组合键,会按键释放不及时造成乱键的效果。
#t::
Run, "D:\ahk1.0\Lib\0 tool\kscrcap\kscrcap.exe", , , pid
Process, WaitClose, %pid%, 7 ; --等待进程关闭,最长 20 秒
; 确认是否上传
MsgBox, 4,, 请在完成截图和编辑后点击“是”确认上传图片。
IfMsgBox, No
return ; 选择“否”则退出
; 上传图片
Run, D:\ahk1.0\Lib\0 tool\picgo-croe\upgit.exe :clipboard -o clipboard -f ccc, , hide
return
;ΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞ #T 上传截图到github/img ΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞ 000001-1984
#y::
; 获取选中文件的路径
FilePath := ""
Send, ^c ; 复制选中文件路径到剪贴板
Sleep, 200
FilePath := Clipboard
if (FilePath = "")
{
MsgBox, 请先选中一个文件!
return
}
; 提取目录和扩展名
SplitPath, FilePath, , Dir, Ext, Name
NewFileName := "up111." . Ext
NewFilePath := Dir . "\" . NewFileName
; 重命名文件(避免中文名)
FileMove, %FilePath%, %NewFilePath%, 1
if (ErrorLevel)
{
MsgBox, 文件重命名失败!
return
}
; 上传文件, 将文件的下载地址或直链复制到剪贴板中 txt,png为直链,ahk为下载地址
RunWait, "upgit.exe" "%NewFilePath%" --output-type clipboard, , hide
; 恢复原文件名
FileMove, %NewFilePath%, %FilePath%, 1
return
;ΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞ #y 上传剪贴板中的文件 ΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞ 000006-2067
;#Persistent
#u::
clipboard := ""
Send, ^c
Sleep, 100 ; 等待剪贴板更新
filePath := Clipboard ; 获取剪贴板内容
if (!FileExist(filePath))
{
MsgBox, 16, 错误, 剪贴板内容无效,请复制文件后再试。
return
}
RunWait, cmd /c picgo u "%filePath%", , Hide
MsgBox, 文件上传完成!
return
;ΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞ #u 上传剪贴板中的文件 ΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞ 000005-2051
#i::
Run, "D:\ahk1.0\Lib\0 tool\kscrcap\kscrcap.exe", , , pid
Process, WaitClose, %pid%, 20 ; 等待进程关闭,最长 20 秒
; 确认是否上传
MsgBox, 4,, 请在完成截图和编辑后点击“是”确认上传图片。
IfMsgBox, No ;---------------选择“否”则退出
return
; 上传图片
RunWait, cmd /c "picgo u",, hide
return
;ΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞ #i 上传截图到github/img ΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞ 000002-2000
```
===============================================
===============================================
===============================================
以下只作记录,不再用了
## 上传截图 upgit.exe
```
F1 & a::
Run, "D:\ahk1.0\Lib\0 tool\kscrcap\kscrcap.exe", , , pid
Process, WaitClose, %pid%, 20 ; --等待进程关闭,最长 20 秒
; 确认是否上传
MsgBox, 4,, 请在完成截图和编辑后点击“是”确认上传图片。
IfMsgBox, No
return ; 选择“否”则退出
; 上传图片
Run, D:\ahk1.0\Lib\0 tool\picgo-croe\upgit.exe :clipboard -o clipboard -f ccc, , hide
Sleep, 3000
; **强制释放 F1**
SendInput, {F1 up}
return
;ΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞ F1 & a 上传截图到github/img ΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞ 000001-1984
```
## upgit.exe 上传剪贴板中的文件
```
F1 & s::
; 获取选中文件的路径
FilePath := ""
Send, ^c ; 复制选中文件路径到剪贴板
Sleep, 200
FilePath := Clipboard
if (FilePath = "")
{
MsgBox, 请先选中一个文件!
return
}
; 提取目录和扩展名
SplitPath, FilePath, , Dir, Ext, Name
NewFileName := "up111." . Ext
NewFilePath := Dir . "\" . NewFileName
; 重命名文件(避免中文名)
FileMove, %FilePath%, %NewFilePath%, 1
if (ErrorLevel)
{
MsgBox, 文件重命名失败!
return
}
; 上传文件, 将文件的下载地址或直链复制到剪贴板中 txt,png为直链,ahk为下载地址
RunWait, "upgit.exe" "%NewFilePath%" --output-type clipboard, , hide
; 恢复原文件名
FileMove, %NewFilePath%, %FilePath%, 1
Sleep, 3000
; **强制释放 F1**
SendInput, {F1 up}
return
;ΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞ F1 & s 上传剪贴板中的文件 ΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞ 000006-2067
```
## picgo u 上传剪贴板中的文件
```
;#Persistent
F1 & d::
clipboard := ""
Send, ^c
Sleep, 100 ; 等待剪贴板更新
filePath := Clipboard ; 获取剪贴板内容
if (!FileExist(filePath))
{
MsgBox, 16, 错误, 剪贴板内容无效,请复制文件后再试。
return
}
RunWait, cmd /c picgo u "%filePath%", , Hide
MsgBox, 文件上传完成!
Sleep, 3000
; **强制释放 F1**
SendInput, {F1 up}
return
;ΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞ F1 & d 上传剪贴板中的文件 ΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞ 000005-2051
```
## 上传截图 picgo u
```
F1 & f::
Run, "D:\ahk1.0\Lib\0 tool\kscrcap\kscrcap.exe", , , pid
Process, WaitClose, %pid%, 20 ; 等待进程关闭,最长 20 秒
; 确认是否上传
MsgBox, 4,, 请在完成截图和编辑后点击“是”确认上传图片。
IfMsgBox, No ;---------------选择“否”则退出
return
; 上传图片
RunWait, cmd /c "picgo u",, hide
Sleep, 3000
; **强制释放 F1**
SendInput, {F1 up}
return
;ΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞ F1 & f 上传截图到github/img ΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞΞ 000002-2000
```
转载请注明出处