怎麼用vbs製作輔助腳本
❶ 一個簡單的VBS腳本
set r=createobject("wscript.shell")
r.run "cmd",1
wscript.sleep 1000
r.appactivate "cmd.exe"
r.sendkeys "cmd /k cd c:\windows{ENTER}"
r.sendkeys "dir{ENTER}"
看資料吧
SendKeys 方法
請參閱
WshShell 對象 | Run 方法
將一個或多個鍵擊發送到活動窗口（彷彿是在鍵盤上擊鍵一樣）。
object.SendKeys(string)
參數
object
WshShell 對象。
string
表示要發送的鍵擊（一個或多個）的字元串值。
說明
使用 SendKeys 方法可以將鍵擊發送到無自動化界面的應用程序中。多數鍵盤字元都可用一個鍵擊表示。某些鍵盤字元由多個鍵擊組合而成（例如，CTRL+SHIFT+HOME）。要發送單個鍵盤字元，請將字元本身作為 string 參數發送。例如，要發送字母 x，則請發送 string 參數 "x"。
注意 要發送空格，則請發送字元串 " "。
可使用 SendKeys 同時發送多個鍵擊。為此，可將每個鍵擊按順序排列在一起，以此來創建表示一系列鍵擊的復合字元串參數。例如，要發送鍵擊 a、b 和 c，則需要發送字元串參數 "abc"。SendKeys 方法將某些字元用作字元的修飾符（而不使用其本身的含義）。這組特殊的字元可包括圓括弧、中括弧、大括弧，以及：
加號 "+"、
插入記號 "^"、
百分號 "%"、
和「非」符號 "~"。
用大括弧 "{}" 括起這些字元可以發送它們。例如，要發送加號，請使用字元串參數 "{+}"。SendKeys中使用的中括弧 "[ ]" 無任何特殊含義，但是必須把它們括在大括弧中，以便容納確實要賦予其特殊含義的應用程序（例如，對於動態數據交換 (DDE) 就是這樣）。
要發送左中括弧字元，請發送字元串參數 "{[]"；要發送右中括弧字元，請發送字元串參數 "{]}"。
要發送左大括弧字元，請發送字元串參數 "{{}"；要發送右大括弧字元，請發送字元串參數 "{}}"。
某些鍵擊不生成字元（如 ENTER 和 TAB）。某些鍵擊表示操作（如 BACKSPACE 和 BREAK）。要發送這些類型的鍵擊，請發送下表中列出的參數：
鍵 參數
退格鍵 {BACKSPACE}、{BS} 或 {BKSP}
BREAK {BREAK}
CAPS LOCK {CAPSLOCK}
DEL 或 DELETE {DELETE} 或 {DEL}
向下鍵 {DOWN}
END {END}
ENTER {ENTER} 或 ~
ESC {ESC}
HELP {HELP}
HOME {HOME}
INS 或 INSERT {INSERT} 或 {INS}
向左鍵 {LEFT}
NUM LOCK {NUMLOCK}
PAGE DOWN {PGDN}
PAGE UP {PGUP}
PRINT SCREEN {PRTSC}
向右鍵 {RIGHT}
SCROLL LOCK {SCROLLLOCK}
TAB {TAB}
向上鍵 {UP}
F1 {F1}
F2 {F2}
F3 {F3}
F4 {F4}
F5 {F5}
F6 {F6}
F7 {F7}
F8 {F8}
F9 {F9}
F10 {F10}
F11 {F11}
F12 {F12}
F13 {F13}
F14 {F14}
F15 {F15}
F16 {F16}
要發送由常規鍵擊和 SHIFT、CTRL 或 ALT 組合而成的鍵盤字元，請創建表示該鍵擊組合的復合字元串參數。可通過在常規鍵擊之前添加一個或多個以下特殊字元來完成上述操作：
鍵 特殊字元
SHIFT +
CTRL ^
ALT %
注意 這樣使用時，不用大括弧括起這些特殊字元。
要指定在按下多個其他鍵時，按下 SHIFT、CTRL 和 ALT 的組合，請創建復合字元串參數，用括弧括起其中的組合鍵。例如，要發送的組合鍵指定：
如果在按 e 和 c 的同時按 SHIFT 鍵，則發送字元串參數 "+(ec)"。
如果在按 e 時只按 c（而不按 SHIFT），則發送字元串參數 "+ec"。
可使用 SendKeys 方法發送一種在一行內重復按鍵的鍵擊。為此，要創建復合字元串參數，以指定要重復的鍵擊，並在其後指定重復次數。可使用 {鍵擊 數字} 形式的復合字元串參數來完成上述操作。例如，如果要發送 10 次 "x"，則需要發送字元串參數 "{x 10}"。請確保在鍵擊和數字之間有一個空格。
注意 只可以發送重復按一個鍵的鍵擊。例如，可以發送 10 次 "x"，但不可發送 10 次 "Ctrl+x"。
注意 不能向應用程序發送 PRINT SCREEN 鍵 {PRTSC}。
示例
下面的示例演示如何將一個 .wsf 文件用於以不同腳本語言（VBScript 和 Jscript）寫成的兩個作業。每個作業都運行 Windows 計算器並將它發送給鍵擊以執行簡單的計算。
<package>
<job id="vbs">
<script language="VBScript">
set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "calc"
WScript.Sleep 100
WshShell.AppActivate "Calculator"
WScript.Sleep 100
WshShell.SendKeys "1{+}"
WScript.Sleep 500
WshShell.SendKeys "2"
WScript.Sleep 500
WshShell.SendKeys "~"
WScript.Sleep 500
WshShell.SendKeys "*3"
WScript.Sleep 500
WshShell.SendKeys "~"
WScript.Sleep 2500
</script>
</job>
<job id="js">
<script language="JScript">
var WshShell = WScript.CreateObject("WScript.Shell");
WshShell.Run("calc");
WScript.Sleep(100);
WshShell.AppActivate("Calculator");
WScript.Sleep(100);
WshShell.SendKeys ("1{+}");
WScript.Sleep(500);
WshShell.SendKeys("2");
WScript.Sleep(500);
WshShell.SendKeys("~");
WScript.Sleep(500);
WshShell.SendKeys("*3");
WScript.Sleep(500);
WshShell.SendKeys("~");
WScript.Sleep(2500);
</script>
</job>
</package>
請參閱
WshShell 對象 | Run 方法
❷ word-利用vbs寫一個腳本
Vbs 腳本編程簡明教程之一—為什麼要使用Vbs？
在Windows 中，學習計算機操作也許很簡單，但是很多計算機工作是重復性勞動，例如你每周
也許需要對一些計算機文件進行復制、粘貼、改名、刪除，也許你每天啟動計算機第一件事情
就是打開WORD，切換到你喜愛的輸入法進行文本編輯，同時還要播放優美的音樂給工作創造
一個舒心的環境，當然也有可能你經常需要對文本中的某些數據進行整理，把各式各樣的數據
按照某種規則排列起來……。這些事情重復、瑣碎，使人容易疲勞。
第三方軟體也許可以強化計算機的某些功能，但是解決這些重復勞動往往事倍功半，我也嘗試
過使用計算機語言編寫程序來解決這些問題，但是隨之而來的命令、語法、演算法、系統框架和
類庫常常讓我覺得這樣是否有必要，難道就是因為豬毛比較難拔，所以我就要去學習機械，為
自己設計一個拔豬毛機（？）嗎？
Vbs 是一種Windows 腳本，它的全稱是:Microsoft Visual Basic Script Editon.(微軟公司可視化
BASIC 腳本版)，VBS 是Visual Basic 的的一個抽象子集，是系統內置的，用它編寫的腳本代碼
不能編譯成二進制文件，直接由Windows 系統執行（實際是一個叫做宿主host 的解釋源代碼並
執行），高效、易學，但是大部分高級語言能乾的事情，它基本上都具備，它可以使各種各樣的
任務自動化，可以使你從重復瑣碎的工作中解脫出來，極大的提高工作效率。
我個人認為Vbs 腳本其實就是一種計算機編程語言，但是由於缺少計算機程序設計語言中的部
分要素，對於事件的描述能力較弱，所以稱為腳本，它最方便的地方就是提供了對COM 對象
的簡便支持。那麼什麼是COM 對象呢？
我這樣理解，COM 對象就是一些具有特定函數功能項程序模塊，他們一般以ocx 或者dll 作為
擴展名，你只要找到包含有你需要的功能的模塊文件，並在腳本中規范的引用，就可以實現特
定的功能，也就是說Vbs 腳本就是調用現成的「控制項」作為對象，用對象的屬性和方法實現目的，
完全免去了編寫代碼、設計演算法等等麻煩。說白了，我不是覺得拔豬毛麻煩么？我發覺xx 機（比
如真空離心器）有一個功能可以實現脫毛，ok，我把它拿來給豬脫毛。什麼？大材小用？太浪
費資源了？天哪，那是計算機晶元的事情，死道友不死貧道，反正我的事情是方便快速的解決
了，這就行了。
最方便的是它甚至不需要專門的開發環境，在你的計算機中，只要有notepad，就可以編寫Vbs
腳本了，並且可以直接執行。
===============================
Vbs 腳本編程簡明教程之二—如何開始第一個Vbs 腳本？
就像多數計算機教程一樣，我們從「Hello World！」程序開始我們的練習。什麼？不知道是什
么意思？就是說大部分的計算機程序設計教程開篇入門都是編寫一個小程序，執行這個程序的
結果就是在計算機的屏幕上或者dos 窗口中顯示一行文字：Hello World！好了，我們開始吧。
打開你的「記事本」程序，在編輯窗口填寫：
msgbox "He llo World!"
然後用滑鼠單擊「文件」菜單，單擊「保存」，把「保存在」一欄設為桌面，在「文件名」一欄中填寫
kk.vbs，單擊「保存」就可以了。然後最小化「記事本」窗口，在桌面上尋找你剛剛保存的kk.vbs，
然後雙擊。看到彈出的對話框了沒有，單擊「確定」，對話框消失了。難看了點，不過確實是你
編寫的第一個腳本程序。
說明之一：上面的操作中，保存位置放在桌面，僅僅是為了執行方便，你保存到其他的地方完
全沒有問題，只要你知道你保存在什麼地方就可以了，什麼？是廢話，自己保存的當然知道保
存在那裡了。不，自己保存的文件自己找不到的人我見的多了去了。文件名你可以隨意填寫，
不一定非要寫kk，只要符合Windows 的文件命名規則就可以了，但是擴展名必須是vbs，什麼?
不知道什麼是擴展名？就是文件名中「.」後的那部分，簡單說，就是vbs 腳本文件命名時必須是：
xxx.vbs，其中xxx 你隨意。
說明之二：在記事本編輯窗口中寫的這行是什麼意思？
Msgbox 是VBS 內建的函數，每一個函數都可以完成一定的功能，你只需要按照語法要求，在
函數的相應部分填寫相應的內容就可以了，這部分內容我們稱為參數，當然函數執行的結果我
們稱為返回值，一個函數可以有返回值也可以沒有，可以有參數也可以沒有。你不用了解函數
是怎麼運作的，只要了解這個函數能幹什麼就行了。
Msgbox 語法：msgbox "對話框內容", , "對話框的標題"
你不妨用記事本打開剛才的文件在編輯窗口中輸入：
msgbox "He llo World!" , , "系統提示"
執行一下，看看效果和位置。
說明之三：如果執行失敗，看看你的標點符號，所有的標點符號必須是在英文狀態下輸入的。
當然，這個腳本實在是太簡單了，甚至連最簡單的交互都沒有，所以你可以把腳本這樣修改一
下：
Dim name
name=Inputbox("請輸入你的名字:","名稱")
Msgbox name, , "您的名字是"
保存執行一下，看到彈出的對話框了么？填入你的名字，點確定，看到結果了嗎？
說明之一：第一句是定義變數，dim 是定義變數的語句
其格式為：dim 變數1,變數2……，
Vbs 只有一種變數類型，所以不用聲明變數類型。系統會自動分辨變數類型。
說明之二：inputbox 是VBS 內建的函數，可以接受輸入的內容，其語法格式為：
Inputbox("對話框內容","對話框標題")
第二句的意思是接受用戶的輸入，並把輸入結果傳遞給變數name。
好了，到此腳本基本的輸入輸出函數都有了，已經可以完成一些比較簡單的功能了，你可以編
寫一個簡單的腳本，然後拷貝的「程序」—>「啟動」中，然後重新啟動計算機看看結果。
❸ 如何編輯VBS腳本刷屏
msgbox"單擊「確定」後請點擊QQ文字輸入區,並把「回車」設置為發送消息。",4096,"提示"
set ws=createobject("wscript.shell")
wscript.sleep 3000
a=0
do until a=100
ws.sendkeys a
a=a+1
wscript.sleep 100
ws.sendkeys "~"
loop