Re: [AHK-] 日期轉換加上星期 ex:11/23→11/23(五)
: 推 LPH66: 單純這個例子 (0 起連續整數) 的話 SubStr 似乎可以用? 11/23 21:13
: → LPH66: SubStr("日一二三四五六", TimeString+1, 1) 11/23 21:16
謝謝大大，修改後簡潔好寫多了。腳本如下：
===================================================================
F1:: ;將所選日期轉換添加星期，以當年計算 ex:11/23→11/23(五)
OldClip = %Clipboard% ;把目前的剪貼簿內容先存起來
Send, ^c
Loop, Parse, Clipboard, /,
{
if A_Index <= 1 ;第1個循環存入v_month
v_month = %A_LoopField%
if A_Index <= 2 ;第2個循環存入v_day
v_day = %A_LoopField%
}
if v_month < 10 ;小於10加0
v_month = 0%v_month%
if v_day < 10 ;小於10加0
v_day = 0%v_day%
FormatTime, TimeString,%A_YYYY%%v_month%%v_day%, WDay
TimeString := TimeString-1
V_CWday := SubStr("日一二三四五六", TimeString+1, 1)
;從字串開始向右複製不超過長度1的子字符串至V_CWday
Clipboard = %Clipboard%(%V_CWday%)
Send, ^v
Clipboard = %OldClip% ;恢復先前剪貼簿內容
return
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 218.187.101.27
※ 文章網址: https://www.ptt.cc/bbs/EzHotKey/M.1543161348.A.BA8.html
修正bug
※ 編輯: kslman (61.216.76.227), 11/30/2018 10:20:53
另外備註一下，有些運算的地方還是要加個sleep, 200會比較好
因為在部分程式運算可能會慢一些，腳本就會會異常，例如：evernote
※ 編輯: kslman (218.187.177.85), 12/02/2018 21:51:34
討論串 (同標題文章)
本文引述了以下文章的的內容：
完整討論串 (本文為第 2 之 2 篇)：