软件开发培训班 >> 编程开发 >> VbScript


鏁欎綘缂栧啓Windows鐨刅BScript涓嶮ac鐨凙ppleSCript鑴氭湰瑙ｆ斁鍙屾墜

涓�銆乄indows 绡?—— VBScript

鏈�杩戝彂鐜?windows 涓婃湁涓�涓ソ鐜╃殑涓滆タ锛屽彨鍋?VBScript锛屽彲浠ョ敤鏉ヨ嚜鍔ㄦ墽琛屼竴浜涙搷浣溿�?/p>

1銆佹晥鏋滃浘

鍏堟潵鐪嬩笅鏈�缁堟晥鏋滃惂锛?/p>

浠ヤ笂灏辨槸涓�涓畝鍗曠殑 VBS 鑴氭湰锛岃繍琛屾椂鑷姩鎵撳紑 Chrome 娴忚鍣紝鐒跺悗鑷姩鎵撳紑浜嗕笁涓綉椤碉細鎴戠殑鍗氬锛実ithub锛孡eetCode瀹樼綉銆?/p>

杩欐槸绗旇�呮瘡澶╁埌鍏徃鍚姩鐢佃剳鏃堕兘浼氬紑鐨勪笁涓綉椤点�傝櫧鐒朵繚瀛樹簡涔︾锛屾瘡娆″紑鏈轰篃瑕佺偣鍑讳竷鍏笅锛屼竴涓ゅぉ涓嶈寰楁湁浠�涔堬紝闀挎湡涓嬫潵绗旇�呮劅鍒伴潪甯告氮璐规垜鐨勬墜鎸囩粏鑳烇紒鎴戠殑鎵嬫寚缁嗚優鏄敤鏉ユ暟閽辩殑锛屽彲涓嶆槸鐢ㄦ潵鍋氶噸澶嶅伐浣滅殑锛岃繖鏍峰疄鍦ㄦ槸澶笉绋嬪簭鍛樹簡銆傜▼搴忓憳灏卞簲璇ユ妸閲嶅鐨勪簨鎯呬氦缁欑數鑴戯紒浜庢槸绗旇�呭彂鐜颁簡 VBScript 杩欎釜濂戒笢瑗裤�?/p>

2銆乂BS 绠�浠?/h3>

浠庡悕瀛椾腑鐨?Script 鍙互鐪嬪嚭锛屽畠鏄竴绉嶈剼鏈瑷�锛屾墍璋撹剼鏈紝灏辨槸鐢ㄦ潵瑙ｆ斁鎴戜滑鍙屾墜鐨勶紝璁╂垜浠敤鑴氶兘鍙互缂栫▼锛?/p>

WeChat Image_20190917173203.gif

——鍡紝杩欐鍏充簬鑴氭湰鐨勮В閲婄函灞炲惞姘达紝鎵嬪姩鐙楀ご闃叉灏忔湅鍙嬭瑙ｃ�?/p>

鍏跺疄鑴氭湰鐨勬湰鎰忔槸鍓ф湰锛岃绋嬪簭鎸夌収寮�鍙戣�呭啓濂界殑“鍓ф湰”寮�濮嬪畠鐨勮〃婕斻�?/p>

VBS 鑴氭湰鏄竴绉嶈В閲婂瀷璇█锛岃В閲婂瀷璇█鐨勬剰鎬濇槸瀹冭繍琛岀殑鏃跺�欎細鑷姩缁欑數鑴戣В閲婁唬鐮佺殑鎰忔�濓紝涔熷氨鏄笉鐢ㄥ畨瑁呬换浣曠紪璇戠幆澧冿紝闅忎究鍜变滑鐢ㄤ粈涔堣蒋浠跺啓閮藉彲浠ワ紝姣斿璁颁簨鏈�亀ord銆丼ublime銆乂SCode 鍟ョ殑锛屽彧瑕佷繚瀛樻垚 vbs 鏂囦欢鍗冲彲鍗曞嚮杩愯銆?/p>

3銆佷唬鐮佸疄鐜?/h3>

鏈緥浠ｇ爜涔熷緢绠�鍗曪紝鏂板缓涓�涓?vbs 鏂囦欢锛屽悕瀛楅殢渚垮彇锛屾瘮濡?robot.vbs锛岀紪杈戝涓嬶細

Set WshShell=WScript.CreateObject("WScript.Shell")
WshShell.Run """C:Program Files (x86)GoogleChromeApplicationchrome.exe"""
WScript.Sleep 3500
WshShell.SendKeys "https://blog.csdn.net/AlpinistWang"
WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "{ENTER}"
WScript.Sleep 1500
WshShell.SendKeys "^t"
WshShell.SendKeys "https://github.com"
WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "{ENTER}"
WScript.Sleep 1500
WshShell.SendKeys "^t"
WshShell.SendKeys "https://leetcode-cn.com"
WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "{ENTER}"
WScript.Quit

4銆佷唬鐮佽瑙?/h3>
  1. 瀵逛簬绗旇�呰繖鏍风殑甯︽湁鐩殑鎬у涔犵殑鍒濆鑰咃紝棣栧熬涓よ鐩存帴璁颁綔鍥哄畾鏍煎紡銆?/li>
  2. WshShell.Run 鐢ㄦ潵杩愯 exe 鏂囦欢锛屽皢璺緞鎹㈡垚鑷繁鐢佃剳涓兂瑕佽繍琛岀殑杞欢鍗冲彲锛岀敤 涓夊紩鍙?""" 鐨勭洰鐨勬槸鏄庣‘鍛婅瘔缂栬緫鍣ㄨ繖鏄竴涓瓧绗︿覆锛屼笉闇�瑕佽浆涔夛紝闃叉璺緞涓湁闇�瑕佽浆涔夌殑瀛楃瀵艰嚧绋嬪簭鍑洪敊銆傝繖閲屾垜璁剧疆鎴愪簡 chrome.exe 鐨勪綅缃�?/li>
  3. WScript.Sleep 3500 鐢ㄦ潵璁剧疆绛夊緟鏃堕棿锛?500 鐨勬剰鎬濇槸璁╃▼搴忕潯鐪?3.5绉掞紝鍚庨潰鐨?WScript.Sleep 1500 鍚岀悊锛屾剰鎬濇槸璁╃▼搴忕潯鐪?1.5 绉掋�傚鏋滀綘鐨勭▼搴忓惎鍔ㄨ緝鎱紝鍙互灏嗙瓑寰呮椂闂磋缃暱涓�鐐广�?/li>
  4. WshShell.SendKeys 鐢ㄦ潵妯℃嫙閿洏杈撳叆锛屽紩鍙蜂腑鐨勫唴瀹瑰氨鏄緭鍏ュ唴瀹广�傚彲浠ョ湅鍒版垜鍏堣緭鍏ヤ簡涓�涓綉鍧�銆?/li>
  5. WshShell.SendKeys “{ENTER}” 琛ㄧず杈撳叆鍥炶溅锛寋ENTER} 鏄竴涓壒娈婂瓧绗︼紝鏈枃鍚庨潰闄勬湁 VBS 鐗规畩瀛楃琛ㄦ牸銆傝繖閲岃緭鍏ョ綉鍧�涔嬪悗杈撳叆浜嗕袱涓洖杞︼紝鍘熷洜鏄垜杩欎釜涓嶄簤姘旂殑鎼滅嫍杈撳叆娉曞湪鎴戜竴鍚姩 Chrome 鐨勬椂鍊欙紝瀹冨氨璁剧疆鎴愪腑鏂囪緭鍏ワ紝瀵艰嚧绗竴娆″洖杞﹀彧鏄妸鑻辨枃鐨勬枃瀛楁墦涓婂幓浜嗭紝绗簩娆″洖杞︽墠鑳借烦杞埌杩欎釜缃戠珯銆?/li>
  6. 杈撳叆浜嗕袱娆″洖杞﹀悗锛屾垜鍙堣鑴氭湰鐫＄湢浜?1.5绉掞紝杩欒浠ｇ爜瀹屽叏鏄负浜嗗綍鍒堕偅涓?gif 鏃跺ソ鐪嬩竴鐐癸紝涓嶅啓鐨勮瘽浼氱珛鍗虫墦寮�涓変釜缃戠珯锛岀湅涓嶅嚭娓愭鍑虹幇鐨勬劅瑙夈�傚垹浜嗕細鏇村揩锛屽棷锛屾垜鍐欏畬杩欑瘒鏂囩珷鐨勬椂鍊欏凡缁忔妸瀹冨垹鎺変簡銆?/li>
  7. WshShell.SendKeys “^t” 琛ㄧず鍚屾椂鎸変笅 Ctrl + T锛宆琛ㄧず Ctrl 閿紝涔熷睘浜庝竴涓壒娈婂瓧绗︼紝杩欓噷鐨?t 蹇呴』瑕佸皬鍐欙紒锛堝挶涔熶笉鐭ラ亾涓轰粈涔堟湁杩欎箞锠㈢殑璇硶璁捐锛屽潙浜嗘垜浜斿垎閽熸壘鍘熷洜锛夈�侰trl + T 鏄?Chrome 鎵撳紑鏂扮殑鏍囩椤靛揩鎹烽敭锛屽鏋滀綘鐨勫揩鎹烽敭涓嶄竴鏍凤紝鍙互瀵圭収鐗规畩瀛楃琛ㄨ嚜琛屼慨鏀广�?/li>

OK锛孷BScript 澶ф灏辨槸杩欐牱鐨勪簡銆傚叾瀹?VBS 鐨勪綔鐢ㄥ苟涓嶄粎闄愪簬姝わ紝瀹冨彲浠ョ敤鏉ユā鎷熸墦寮�绋嬪簭锛屾ā鎷熼敭鐩樿緭鍏ワ紝鎵�浠ュ彲浠ュ仛鍑哄緢澶氬ソ鐜╃殑鍔熻兘銆傛瘮濡傜瑪鑰呯殑鍚屼簨鍐欎簡涓�涓嚜鍔ㄨ繛鎺?Cisco 鐨勮剼鏈紙姣忔閮借鎵嬪姩杈撳叆瀵嗙爜瑕佸悙浜嗭紝鐜板湪缁堜簬琚В鏀惧嚭鏉ヤ簡锛夛紝杩樺彲浠ョ敤鏉ヨ嚜鍔ㄧ櫥褰?QQ銆佸井淇′箣绫荤殑銆傛劅鍏磋叮鐨勬湅鍙嬩滑鍙互鑷鎺㈢储銆?/p>

瀵瑰涓▼搴忕殑鎿嶄綔鍙互鍐欏湪鍚屼竴涓?vbs 鏂囦欢閲岋紝鍙鍦ㄤ竴涓▼搴忕殑鑷姩鍖栬剼鏈墽琛岀粨鏉熷悗锛屽啀娆¤皟鐢?WshShell.Run 鍚姩鍏朵粬绋嬪簭锛屽氨鍙互缁х画鎿嶄綔鍏朵粬绋嬪簭浜嗐�傜瑪鑰呯幇鍦ㄧ敤鐨勮剼鏈晥鏋滄湁锛?/p>

  • 1.鑷姩鎵撳紑 Chrome锛屽苟鎵撳紑涓変釜甯哥敤缃戝潃
  • 2.鑷姩鎵撳紑 Typora锛屽苟杈撳叆褰撳墠鏃ユ湡鐢熸垚鏍囬锛岃繖鏄垜鐢ㄦ潵姣忓ぉ璁板綍宸ヤ綔鏃ュ織鐨?/li>
  • 3.鍚姩 Android Studio锛岀瑪鑰呮槸涓�鍚?Android developer锛岃繖鏄敤鏉ュ伐浣滅殑銆?/li>

杩樻湁涓�浜涘姛鑳芥秹鍙婂伐浣滃唴瀹逛笉鏂逛究閫忛湶锛屾�讳箣锛屾兂鎯虫瘡澶╁埌鍏徃鑷繁瑕佸仛鐨勫垵濮嬪寲宸ヤ綔涓�閿氨鑳藉畬鎴愶紝鏄笉鏄湁鐐瑰皬婵�鍔ㄥ憿锛?锛?锛?br />闄勪笂绗旇�呯幇鍦ㄤ娇鐢ㄧ殑 vbs 鑴氭湰鐨勪竴閮ㄥ垎浠ｇ爜锛?/p> 

Set WshShell=WScript.CreateObject("WScript.Shell")
' 鍚姩 Chrome锛屾墦寮�甯哥敤缃戝潃 
WshShell.Run """C:Program Files (x86)GoogleChromeApplicationchrome.exe"""
' 绛夊緟绋嬪簭鍚姩
WScript.Sleep 3500
WshShell.SendKeys "https://blog.csdn.net/AlpinistWang"
WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "^t"
WshShell.SendKeys "https://github.com"
WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "^t"
WshShell.SendKeys "https://leetcode-cn.com"
WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "{ENTER}"
' 姣忎釜绋嬪簭鐨勮嚜鍔ㄥ寲鑴氭湰缁撴潫鍚庢渶濂界瓑寰呬竴浼氾紝缁欒剼鏈竴鐐规墽琛屾椂闂达紝鍚﹀垯杈撳叆杩囧揩鍙兘浼氬奖鍝嶅悗闈㈢殑绋嬪簭
WScript.Sleep 3500
' 鍚姩 Typora
WshShell.Run """D:wareTyporain	ypora.exe"""
WScript.Sleep 5000
' 鑾峰彇褰撳墠鏃ユ湡鐨勫彿鏁?
dayString = day(now)
' 濡傛灉褰撳墠鏃ユ湡鐨勫彿鏁板彧鏈変竴浣嶆暟锛屽墠闈㈣ˉ 0锛屽噾鎴愪袱浣嶃�傛瘮濡?01, 02, 03... 杩欐牱鍋氱殑鐩殑鏄渶缁堜繚瀛樼殑鏃跺�欐牸寮忔洿濂界湅
if len(dayString) = 1 then dayString = "0"&dayString
' 鏍煎紡鍖栨棩鏈燂紝杩欓噷鐢熸垚鐨勬棩鏈熸牸寮忕被浼间簬 2019-12-01
Currentdate = year(Now)&"-"&Month(Now)&"-"&dayString
' MarkDown 璇硶锛岃緭鍏ユ棩鏈熷ぇ鏍囬
WshShell.SendKeys "# "&Currentdate&"{Enter}"
' Ctrl + S 淇濆瓨
WshShell.SendKeys "^s"
' 绛夊緟涓�绉掕淇濆瓨寮圭獥寮瑰嚭鏉?
WScript.Sleep 1000
' 涓嶆柇鍙戦�?Tab 鐩村埌瀹氫綅鍒拌緭鍏ュ湴鍧�鏍?
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{TAB}"
WshShell.SendKeys "{ENTER}"
' 瀹氫綅鍒板湴鍧�鏍忓悗绛夊緟涓�绉掞紝杈撳叆杩囧揩鍙兘浼氬嚭閿?
WScript.Sleep 1000
' 杈撳叆淇濆瓨鐨勫湴鍧�
WshShell.SendKeys "D:projectsgithubDailyNotes"
' 绛夊緟浠ヤ究杈撳叆瀹屾垚
WScript.Sleep 1000
WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "{ENTER}"
' 杈撳叆鍦板潃鍚庝繚瀛樺脊绐椾細璺宠浆鍒板湴鍧�鎵�鍦ㄦ枃浠跺す锛岄渶瑕佷竴鐐规椂闂淬�傝繖閲岄渶瑕佹牴鎹疄闄呮儏鍐佃皟鏁存寜閿?
WScript.Sleep 1000
WshShell.SendKeys "{ENTER}"
WshShell.SendKeys "{ENTER}"
WScript.Sleep 1000
WshShell.SendKeys "{ENTER}"
WScript.Sleep 3500
' 鍚姩 Android Studio
WshShell.Run """D:wareAndroidStudioinstudio64.exe"""

' 鏇村鍒濆鍖栧姛鑳?
' ...
WScript.Quit

5銆佸叾浠栬娉?/h3>

鑾峰彇褰撳墠鏃ユ湡锛?/p>

CurrentDate = date()

榛樿鐨勬牸寮忔槸鏈?鏃?骞达紝涔熷彲浠ヨ繖鏍疯嚜瀹氫箟鏍煎紡锛?/p>

CurrentDate = year(Now)&"-"&Month(Now)&"-"&day(Now)

鍏朵腑锛孋urrentDate 鏄彉閲忓悕锛屽悕绉板彲浠ラ殢渚胯捣锛?code>&鍙风敤鏉ヨ繛鎺ュ瓧绗︿覆銆?/p>

鐢ㄥ脊绐楀脊鍑哄瓧绗︿覆

msgbox "瀛楃涓?quot;

6銆侀檮锛歏BS 鐗规畩瀛楃琛ㄦ牸

鐗规畩瀛楃VBS 琛ㄧず
SHIFT+
CTRL^
ALT%
閫�鏍奸敭{BACKSPACE} 鎴?{BS} 鎴?{BKSP}
BREAK{BREAK}
Delete{Delete} 鎴?{DEL}
鍚戜笅閿?/td>{DOWN}
鍚戜笂閿?/td>{UP}
鍚戝乏閿?/td>{LEFT}
鍚戝彸閿?/td>{RIGHT}
END{END}
ENTER{ENTER} 鎴?'
ESC{ESC}
TAB{TAB}
CAPS LOCK{CAPSLOCK}
HELP{HELP}
HOME{HOME}
Insert{Insert} 鎴?{INS}
NUM LOCK{NUMLOCK}
PAGE DOWN{PGDN}
PAGE UP{PGUP}
PRINT SCREEN{PRTSC}
SCROLL LOCK{SCROLLLOCK}
F1{F1}
F2{F2}
……
F12{F12}

浜屻�丮ac 绡?—— AppleScript

Mac 涓婁篃鏈夌被浼肩殑鑴氭湰璇█锛屽彨鍋?AppleScript锛屾墦寮� Mac 鑷甫鐨勮剼鏈紪杈戝櫒鍗冲彲浣跨敤銆?/p>

1銆佹晥鏋滃浘

鍏堢湅鏁堟灉鍥撅細

2銆佷唬鐮佸疄鐜?/h3>

浠ｇ爜寰堢畝鍗曪紝鎵撳紑 Mac 鑷甫鐨勮剼鏈紪杈戝櫒锛岀紪杈戝涓嬶細

tell application "Safari"
	activate
	tell window 1
		set URL of current tab to "https://blog.csdn.net/AlpinistWang"
		set current tab to (make new tab with properties {URL:"http://www.github.com"})
		set current tab to (make new tab with properties {URL:"https://leetcode-cn.com"})
	end tell
end tell

3銆佷唬鐮佽瑙?/h3>
  1. AppleScript 鐨勮娉曟瘮杈冧汉鎬у寲锛屽氨鍍忓彛璇竴鏍凤紝tell application “Safari” 琛ㄧず鍛婅瘔搴旂敤 Safari銆?/li>
  2. activate 鎰忔�濇槸婵�娲伙紝涔熷氨鏄墦寮� Safari銆?/li>
  3. tell window 1 鎰忔�濇槸鍛婅瘔褰撳墠绐楀彛
  4. set URL of current tab to “xxx” 琛ㄧず灏嗗綋鍓?tab 椤电殑 URL 璁剧疆涓?“xxx” 缃戝潃
  5. set current tab to (make new tab with properties {URL:“xxx”}) 琛ㄧず鏂板缓涓�涓爣绛鹃〉锛屽苟灏嗗叾 URL 璁剧疆涓?“xxx” 缃戝潃
  6. 姣忎竴涓?tell 瀵瑰簲涓�涓?end tell锛宼ell 涓殑鍐呭闇�瑕佷繚鎸佺缉杩涗竴鑷淬�?/li>

杩欏氨鏄?Windows 鍜?Mac 涓婂悇鑷殑鑴氭湰宸ュ叿锛岀啛缁冭繍鐢ㄨ嚜鍔ㄥ寲鑴氭湰锛屽彲浠ヨ鐢佃剳鏇村姞鐨勬櫤鑳斤紒

浠ヤ笂灏辨槸鏁欎綘缂栧啓Windows鐨刅BScript涓嶮ac鐨凙ppleSCript鑴氭湰瑙ｆ斁鍙屾墜鐨勮缁嗗唴瀹癸紝鏇村鍏充簬Windows鐨刅BScript涓嶮ac鐨凙ppleSCrip鐨勮祫鏂欒鍏虫敞鑴氭湰涔嬪鍏跺畠鐩稿叧鏂囩珷锛?/p>