Set WshShell= WScript.CreateObject("WScript.Shell") WshShell.AppActivate "" for i=1 to 10 ´要發送的次數 WScript.Sleep 500 ´定義發送信的所要的時間以ms毫秒為單位。如：1000為一秒發一次 WshShell.SendKeys "^v" ´把剪貼版上的內容粘貼出來 WshShell.SendKeys i ´輸出次數值 WshShell.SendKeys "%s"´按下鍵盤上的Alt+S發送信息 next
