自动定量发表删除空间说说脚本代码

//很简单的录制，和课堂联系的小作业差不多。值得注意的是，在登录空间账号是会弹出快速登录提示框，在发表说说时也会弹出一次，所以后面的循环发表要把录上的那一次去掉。//还有一点要注意的是，可能由于网速的原因，连续的发表和删除可能出现数量上的达不到预期，所以在中间添加几秒等待的时间。下面是发表和删除说说的脚本代码

<span style="font-size:18px;color:#000099;">Browser("QQ空间-分享生活，留住感动").Page("QQ空间-分享生活，留住感动").Frame("login_frame;login_href=http%3A").Link("946933660Sure。").ClickBrowser("QQ空间-分享生活，留住感动").Page("再见丶青春 [http://946933660.qzone._2").Link("说说").ClickFor i = 0 To 10 step 1<pre name="code" class="plain">Browser("QQ空间-分享生活，留住感动").Page("QQ空间-分享生活，留住感动").Frame("login_frame;login_href=http%3A").Link("946933660Sure。").ClickBrowser("QQ空间-分享生活，留住感动").Page("再见丶青春 [http://946933660.qzone.").Link("说说").ClickBrowser("QQ空间-分享生活，留住感动").Page("再见丶青春 [http://946933660.qzone.").Frame("Frame").WebEdit("10").set "成功"Browser("QQ空间-分享生活，留住感动").Page("再见丶青春 [http://946933660.qzone.").Frame("Frame").Link("发表").ClickBrowser("QQ空间-分享生活，留住感动").Page("再见丶青春 [http://946933660.qzone.").Frame("Frame_2").Link("946933660Sure。").ClickBrowser("QQ空间-分享生活，留住感动").Page("再见丶青春 [http://946933660.qzone.").Frame("Frame").Link("发表").ClickBrowser("QQ空间-分享生活，留住感动").Page("再见丶青春 [http://946933660.qzone.").Frame("Frame").WebEdit("10").Set "批量发表说说脚本测试"Browser("QQ空间-分享生活，留住感动").Page("再见丶青春 [http://946933660.qzone.").Frame("Frame").Link("发表").ClickFor i = 0 To 10 Step 2Browser("QQ空间-分享生活，留住感动").Page("再见丶青春 [http://946933660.qzone.").Frame("Frame").WebEdit("10").set "成功"Browser("QQ空间-分享生活，留住感动").Page("再见丶青春 [http://946933660.qzone.").Frame("Frame").Link("发表").Clickwait(3)Browser("QQ空间-分享生活，留住感动").Page("再见丶青春 [http://946933660.qzone.").Frame("Frame").WebEdit("10").Set "批量发表说说脚本测试"Browser("QQ空间-分享生活，留住感动").Page("再见丶青春 [http://946933660.qzone.").Frame("Frame").Link("发表").Clickwait(3)Browser("QQ空间-分享生活，留住感动").Page("再见丶青春 [http://946933660.qzone.").Frame("Frame").WebEdit("10").set "循环"Browser("QQ空间-分享生活，留住感动").Page("再见丶青春 [http://946933660.qzone.").Frame("Frame").Link("发表").Clickwait(5)Next

Browser("QQ空间-分享生活，留住感动").Page("再见丶青春 [http://946933660.qzone._2").Frame("Frame").Link("删除").ClickBrowser("QQ空间-分享生活，留住感动").Page("再见丶青春 [http://946933660.qzone._2").Link("是").ClickBrowser("QQ空间-分享生活，留住感动").Page("再见丶青春 [http://946933660.qzone._2").Syncwait(3)Next</span>