用记事本编写脚本程序,按以下步骤 *** 拍搭作
打开记事本
将以下代码输入:
on error resume next
set ws = createobject("wscript.shell")
intmessage = msgbox("欢迎使用老匹夫刷屏器,请按照指示 *** 作!点击“是”以开始刷屏设置,点击“否”以退出",vbyesno,"老匹夫刷屏器")
if intmessage = vbyes then
dim a
dim c
a = inputbox("请输入您要刷屏的次数(非负整数)。请注意调整消息发送方式为“Enter”键发送,否则会无法使用。","老匹夫刷屏器")
c = inputbox("请输入刷屏内容(中文请打开输入法并在拼音后加“1”),请不要什么都不输,否则会导致系统崩溃,并在点击确认后迅速将光标点在消息输入框上,否则可能出现未知错误!","老匹夫刷屏器")
a = int(a)
b = 0
wscript.sleep 1000
do while b <a
wscript.sleep 200
ws.sendkeys (c)
wscript.sleep 200
ws.sendkeys "~"
b = b + 1
loop
wscript.sleep 200
intmessage = msgbox("已经刷完了"&a&"次,点击“是”以再次刷屏设置,点击“否”以退出",vbYesNo,"老匹夫刷屏器")
if intmessage = vbyes then
dim m
dim o
m = inputbox("请输入您要刷屏的次数(非负整数)。请注意调整消息发送方式为“Enter”键发送,否则会无法使用。","老匹夫刷屏器")
o = inputbox("请输入刷屏内容(中文请打开输入法并在拼音后加“1”),否则会导致系统崩溃,并在点击确认后迅速将光标点在消息输入框上,否则可能出现未知错误!","老匹夫刷屏器")
m = int(m)
n = 0
wscript.sleep 1000
do while n <m
wscript.sleep 200
ws.sendkeys (o)
wscript.sleep 200
ws.sendkeys "~"
n = n + 1
loop
wscript.sleep 200
intmessage = msgbox("已经刷完了"&m&"次,点击“是”以开始再次刷屏设置,点击“否”以退出",vbYesNo,"老匹夫刷屏器")
if intmessage = vbyes then
dim x
dim z
x = inputbox("请输入您要刷屏的次数(非负整数)。请注意调整消息发送方式为“Enter”键发送,否则会无法使用。","老匹夫刷屏器")
z = inputbox("请输入刷屏内容,(中文请打开输入法并在拼音后加“1”)请不要什么都不输,否则会导致系统崩溃,并在点击确认后迅速将光标点在消息输入框上,否则可能出现未知错误!","老匹夫刷屏器")
x = int(x)
y = 0
wscript.sleep 1000
do while y <x
wscript.sleep 200
袭中拿ws.sendkeys (z)
wscript.sleep 200
ws.sendkeys "~"
y = y + 1
loop
wscript.sleep 200
intmessage = msgbox("已经刷完了"&x&"次数,点击“是”以开始再次刷屏设置,点击“否”以退出",vbYesNo,"老匹夫培核刷屏器")
if intmessage = vbyes then
msgbox"你够了,再刷遭雷劈!"
else
msgbox"感谢使用!"
end if
else
msgbox"感谢使用!"
end if
else
msgbox"感谢使用!"
end if
else
msgbox"感谢使用!"
end if
3.保存为vbs文件
4.打开文件,按说明刷屏
个人建议 是不是中了木马一类的 在病毒百科里有提到自动刷屏的迹肢东锋乱东 你试试就知道了把那些文件给移走 点击左下角的开始→程序→附件→系统工具→磁盘碎片整理工具→打开它→点击分析捏那个磁盘E盘→如果有碎片就点击碎片整理
,整理完后 在放入别的文件试试
看看是那些影音文件的 问题还是别的问题如果不出现那种情况了那就是那些文件有问题姿基世。或者有什麽东东感染了那些文件,我看见过一些木马及病毒的中文名字叫:自动刷屏器,不会是那些东西吧。备注:东东指:木马病毒
置剪贴板内容(编辑框1.内容)模拟按键(#CTRL键+#V键族局稿)腊敬
模拟按键(#回车键)
这个代码是自己写兆孝的
不是用易语言打出来的
什么错误我不知道
应该是的
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)