首页 > 代码库 > 论坛自动灌水脚本(vbs)

论坛自动灌水脚本(vbs)

  估计都快有两年历史了~也无需重构,因为差不多已经是最简版本。vbs纯粹是为了好玩,几次看到vbs身处语言排行榜的最尾端,心疼啊。

  

 1 on error resume Next  遇到错误继续执行     2 dim url, val 3 url = InputBox("输入需要灌水的网址:") 4 val = InputBox("输入需要灌水的内容:") 5 set ie = wscript.createObject("internetExplorer.application") 6 ie.navigate(url) 7 ie.visible = true 8  9 do while ie.busy or ie.readystate <> 410     wscript.sleep 5011 loop12 13 do14   ie.document.getElementById("fastpostmessage").innerHTML = val15   ie.document.getELementById("fastpostsubmit").click()16   wscript.sleep 300017 loop

 

论坛自动灌水脚本(vbs)