保存为名字.vbs双击即可,会直接粘贴你剪切板的内容到你聚焦的窗口。
  结束方式:在任务管理器里结束wscript  

Set WshShell= WScript.CreateObject("WScript.Shell")
   WshShell.AppActivate ""
   for i=1 to 100
   WScript.Sleep 500
   WshShell.SendKeys "^v"
   WshShell.SendKeys i
   WshShell.SendKeys "%s"
   next