中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » 论坛回收站 » 发一下自己写的bat
作者:
标题: 发一下自己写的bat 上一主题 | 下一主题
woaixusijie
新手上路





积分 10
发帖 10
注册 2008-1-7
状态 离线
『楼 主』:  发一下自己写的bat

发一下自己写的bat 希望各位前辈给点意见点此下载   (提取码:1cece265)

2008-1-30 22:41
查看资料  发送邮件  发短消息 网志  OICQ (570224586)  编辑帖子  回复  引用回复
ZJHJ
高级用户





积分 609
发帖 374
注册 2006-8-2
状态 离线
『第 2 楼』:  

@shift 1
@echo off
title 上网冲浪必备!!
:logon      
cls
echo.
echo                       【 ★============★ 】
echo                       【         上 网 必 备          】
echo                       【 ★============★ 】   
echo         ★★★★★★★★★★★★★★★★★★★★★★★★★★★★★
echo         ★                                                      ★
echo         ★    1. 【  百度搜索  】         5. 【修复IE无法浏览】 ★
echo         ★                                                      ★
echo         ★    2. 【  清理垃圾  】         6. 【删除自启动项】   ★
echo         ★                                                      ★
echo         ★    3. 【清除右键菜单】         7. 【清除多余启动项】 ★
echo         ★                                                      ★
echo         ★    4. 【解除注册表锁定】       8. 【更多】           ★
echo         ★                                                      ★
echo         ★                                                      ★
echo         ★    h. 【帮助】     u.访问作者空间      q.【退出】    ★
echo         ★                                                      ★
echo         ★★★★J兔制作★★★★★★★★联系qq:859557092★★★★★
echo.
set choice=
set /p choice=◆请您按键选择:
if /i "%choice%"=="1" goto baidu
if /i "%choice%"=="2" goto laji
if /i "%choice%"=="3" goto youjian
if /i "%choice%"=="4" goto jiesuo
if /i "%choice%"=="5" goto ie
if /i "%choice%"=="6" goto ziqidong
if /i "%choice%"=="7" goto duoyuqidongxiang
if /i "%choice%"=="8" goto gengduo
if /i "%choice%"=="u" goto kongjian
if /i "%choice%"=="h" goto help
if /i "%choice%"=="q" goto exit
goto logon
:exit
exit


:baidu
cls
set/p a=请输入关键字:
start http://www.baidu.com/s?wd=%a%
echo 完毕请按任意键回到主菜单...
pause & goto logon

:laji
cls
echo 正在清除系统垃圾文件,请稍等......
del /f /s /q %systemdrive%\*.tmp >nul 2>nul
del /f /s /q %systemdrive%\*._mp >nul 2>nul
del /f /q %systemdrive%\*.log >nul 2>nul
del /f /s /q %systemdrive%\*.gid >nul 2>nul
del /f /s /q %systemdrive%\*.chk >nul 2>nul
del /f /s /q %systemdrive%\*.old >nul 2>nul
del /f /s /q %systemdrive%\recycled\*.* >nul 2>nul
del /f /s /q %windir%\*.bak >nul 2>nul
del /f /q %windir%\kb*.log >nul 2>nul
del /f /s /q %windir%\*.tmp >nul 2>nul
del /f /s /q %windir%\prefetch\*.* >nul 2>nul
for /f "delims=" %%1 in ('dir /b /a "%windir%\temp"') do erase /s /q /a "%windir%\temp \%%1" >nul 2>nul
del /f /q %userprofile%\recent\*.* >nul 2>nul
del /f /s /q "%userprofile%\recent\*.*" >nul 2>nul
del /f /s /q "%userprofile%\locals~1\temp\*.*" >nul 2>nul
for /f "delims=" %%1 in ('dir /b /a "%userprofile%\locals~1\temp"') do erase /s /q /a "%userprofile%\locals~1\temp\%%1" >nul 2>nul & rd /s /q "%userprofile%\locals~1\temp\%%1" >nul 2>nul
for /f "delims=" %%1 in ('dir /b /a "%userprofile%\locals~1\tempor~1\"') do erase /s /q /a "%userprofile%\locals~1\tempor~1\%%1" >nul 2>nul & rd /s /q "%userprofile%\locals~1\tempor~1\%%1" >nul 2>nul
echo 清除系统LJ完成!请按任意键回到主菜单...
pause & goto logon

:youjian
regsvr32 /u /s igfxpph.dll
reg delete HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers /f
reg add HKEY_CLASSES_ROOT\Directory\Background\shellex\ContextMenuHandlers\new /ve /d {D969A300-E7FF-11d0-A93B-00A0C90F2719}
reg delete HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v HotKeysCmds /f
reg delete HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v IgfxTray /f
echo 完毕请按任意键回到主菜单...
pause & goto logon


:jiesuo
reg  add "HKEY_CURRENT_USER\\Software\\Microsoft\\Windows\\CurrentVersion\\Policies\\System" /v DisableRegistryTools /t reg_dword /d 00000000
echo 完毕请按任意键回到主菜单...
pause & goto logon


:ie
regsvr32 actxprxy.dll
regsvr32 shdocvw.dll
regsvr32 oleaut32.dll
regsvr32 urlmon.dll
echo 完毕请按任意键回到主菜单...
pause & goto logon


:gengduo
@echo 该模块建设中....
echo 请按任意键回到主菜单...
pause & goto logon



:ziqidong
ECHO Windows Registry Editor Version 5.00>SoundMam.reg
ECHO [-HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\SoundMam]>>SoundMam.reg
ECHO [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run]>>SoundMam.reg
ECHO "SoundMam"=->>SoundMam.reg
REGEDIT /S SoundMam.reg
DEL /F /Q SoundMam.reg
echo 完毕请按任意键回到主菜单...
pause & goto logon


:duoyuqidongxiang
reg delete HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /va /f
reg delete HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run /va /f
reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run /v ctfmon.exe /d C:\WINDOWS\system32\ctfmon.exe
reg delete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg" /f
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\IMJPMIG8.1"
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\IMJPMIG8.1" /v command /d ""C:\WINDOWS\IME\imjp8_1\IMJPMIG.EXE" /Spoil /RemAdvDef /Migration32"
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\IMJPMIG8.1" /v hkey /d HKLM
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\IMJPMIG8.1" /v inimapping /d 0
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\IMJPMIG8.1" /v item /d IMJPMIG
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\IMJPMIG8.1" /v key /d SOFTWARE\Microsoft\Windows\CurrentVersion\Run
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\PHIME2002A"
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\PHIME2002A" /v command /d "C:\WINDOWS\system32\IME\TINTLGNT\TINTSETP.EXE /IMEName"
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\PHIME2002A" /v hkey /d HKLM
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\PHIME2002A" /v inimapping /d 0
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\PHIME2002A" /v item /d TINTSETP
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\PHIME2002A" /v key /d SOFTWARE\Microsoft\Windows\CurrentVersion\Run
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\PHIME2002ASync"
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\PHIME2002ASync" /v command /d ""C:\WINDOWS\IME\imjp8_1\IMJPMIG.EXE" /Spoil /RemAdvDef /Migration32"
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\PHIME2002ASync" /v hkey /d HKLM
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\PHIME2002ASync" /v inimapping /d 0
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\PHIME2002ASync" /v item /d TINTSETP
reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\MSConfig\startupreg\PHIME2002ASync" /v key /d SOFTWARE\Microsoft\Windows\CurrentVersion\Run
del "C:\Documents and Settings\All Users\「开始」菜单\程序\启动\*.*" /q /f
del "C:\Documents and Settings\Default User\「开始」菜单\程序\启动\*.*" /q /f
del "%userprofile%\「开始」菜单\程序\启动\*.*" /q /f
echo 完毕请按任意键回到主菜单...
pause & goto logon




:help
@echo       ●○此程序是我参考修一明同志做的程序后兴起写的○●
@echo          ●○可能会有雷同的地方,但是绝对不是抄袭○●
@echo           ●○程序中的批处理都是从网上搜集而来的○●
@echo      本程序大部分脚本来自脚本之家http://www.jb51.net/
@echo                欢迎大家来我的QQzone发表建议和意见
@echo             空间地址:http://user.qzone.qq.com/859557092     
@echo                                                John.p
@echo                                              2008.1.30
echo 完毕请按任意键回到主菜单...
pause & goto logon



:kongjian
strat http://user.qzone.qq.com/859557092
echo 完毕请按任意键回到主菜单...
pause & goto logon

2008-1-31 13:13
查看资料  发短消息 网志   编辑帖子  回复  引用回复
dhlmdsnw
初级用户





积分 127
发帖 59
注册 2008-1-29
状态 离线
『第 3 楼』:  

楼上的大大,看你写得代码那么厉害,能不能到我的帖子上看看啊。。。有点问题,昨天terse大大给了我一个代码,但用了有问题,因此问题还没解决,现在我又急,你能帮我再看看吗?帖子标题:删除文本文件中的特殊字符但保持格式不变。http://www.cn-dos.net/forum/viewthread.php?tid=37424&fpage=1
谢了先。。。。

2008-1-31 14:15
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
lvch
新手上路





积分 4
发帖 2
注册 2008-1-24
状态 离线
『第 4 楼』:  

文件不存在

2008-1-31 21:15
查看资料  发短消息 网志   编辑帖子  回复  引用回复
zncznc
新手上路





积分 16
发帖 8
注册 2008-2-15
状态 离线
『第 5 楼』:  

不错不错。厉害啊

2008-2-15 06:18
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
xqx
初级用户





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

哈哈,我原来也弄了一个和这有点相似,在选择上要输入有点那个。
后我改成了.hta开关了

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

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


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



论坛跳转: