@echo off <"%~f0" more +5 >tmp.vbs cscript //NoLogo /e:vbscript tmp.vbs %1>ip.txt echo >nul && del tmp.vbs goto:eof set oDOM = WScript.GetObject("http://www.duosc.com/ip.aspx") do until oDOM.readyState = "complete" WScript.sleep 200 Loop s=oDOM.documentElement.innerText set re = New RegExp re.Pattern="(/d+)/.(/d+)/.(/d+)/.(/d+)" For Each m in re.Execute(s) WScript.Echo m Next
@echo off mode con lines=25 title 定時關機 color 1f cls echo. echo. echo. echo. echo 時間使用24小時制(如2:15、12:00),可以輸入多個時間點 echo. echo 多個時間點用空格分隔 echo. echo. echo ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ echo. set times= set /p times= 請輸入關機時間: :: 以下語句實現每個星期的每一天指定時間關機 :: 如果要換成每個月的某幾天,請改字母為數字,并用逗號分隔 :: 以下代碼沒有錯誤檢測語句,輸入時間的時候務必按照指定格式輸入 :: 可以用在CMD窗口用at命令來查看計劃任務 if not "%times%"=="" for %%i in (%times%) do ( at %%i /every:M,T,W,Th,F,S,Su shutdown -s )