C****g 发帖数: 3945 | 1 【 以下文字转载自 ebiz 讨论区 】
发信人: intelbot (WORM), 信区: ebiz
标 题: 送给神医一个转信的脚本
发信站: BBS 未名空间站 (Mon Jan 3 23:02:51 2011, 美东)
免得和神医联系的时候老是信箱满,哪位神医满意了,给各包子把。
只适用于F-term,进入你的信箱的第一封信,然后运行脚本
假如你的信箱有499封信,把下面两处的 282 改为 499。
以此类推
Dim n
for n=1 to 282
On Error Resume Next
fterm.currentwindow.sendconverteddata("F^M^M^M^M^M")
fterm.delay(20000)
fterm.currentwindow.sendconverteddata("^M")
fterm.currentwindow.sendconverteddata("^]]B")
fterm.delay(2000)
Next
fterm.currentwindow.sendconverteddata("D")
fterm.currentwindow.sendconverteddata("2^M")
fterm.currentwindow.sendconverteddata("1^M")
fterm.currentwindow.sendconverteddata("282^M")
fterm.currentwindow.sendconverteddata("Y^M")
fterm.currentwindow.sendconverteddata("^M") |
|