Board logo

标题: [系统增强] 多功能批处理更新版本 [打印本页]

作者: huajinghua    时间: 2008-4-5 13:56     标题: 多功能批处理更新版本

昨晚本人花了将尽一个半小时终于学会了点wmic 学以致用,马上进行实战,用wimc将多功能批处理更新了,将尽花了偶三四个小时。又将其他代码优化了。呵呵,更新信息如下: 1. 去除了开始的动画改为自己查看 2. 建立自己的program files目录,使产品运行更加安全 3. 在更新2的基础上优化了代码。使程序运行加速 4. 修改产品9的功能查看系统信息改为查看电脑信息。更加齐全了资料。能显示BIOS,显示器,CPU等信息 5. 增加了查看系统进程和路径功能,显示出更多的进程,以防隐藏进程。 由于代码过长,请大家下载使用 正在学wmic的可以看下,呵呵
  1. @mode con cols=105 lines=40&color 1f
  2. @echo off
  3. title 多功能批处理 MADE by 公孙轩辕 QQ:327828994
  4. setlocal EnableDelayedExpansion
  5. if not "%1"=="" color 1f&mode con cols=100 lines=40&echo 正在开始每日自动删除系统垃圾!&ping/n 3 127.1 >nul&call %1
  6. for /l %%i in (0,1,15) do echo\
  7. echo\
  8. echo 程序准备中……
  9. call :zb
  10. for /l %%i in (0,1,1000) do ver>nul
  11. :input
  12. cls
  13. title 多功能批处理 MADE by 公孙轩辕 QQ:327828994
  14. cls
  15. call :caidan
  16. echo\&echo\&echo\
  17. echo 请输入功能代号:
  18. echo\
  19. set sel=
  20. set/p sel=
  21. if "%sel%"=="" goto input
  22. call :%sel%
  23. if errorlevel 1 cls&msg * 输入错误的命令,想忽悠在下?&goto input
  24. :use
  25. call :select "IP Address" "ip"
  26. call :select "DNS Servers" "dns"
  27. call :select "Subnet Mask" "subnet"
  28. call :select "Default Gateway" "gateway"
  29. call :select "Physical Address" "phyaddr"
  30. call :select "Dhcp Enabled" "dhcp"
  31. goto :eof
  32. :0
  33. call :cl
  34. cls
  35. echo 获取网络信息……
  36. call :use
  37. cls
  38. echo 自动获得IP:%dhcp%
  39. echo 当前IP:%ip%
  40. echo 当前DNS:%dns%
  41. echo 网关:%gateway%
  42. echo 子网掩码:%subnet%
  43. ping 127.1>nul
  44. call :cl
  45. goto input
  46. :1
  47. title 设置静态IP
  48. call :cl
  49. cls
  50. echo 请稍后……
  51. call :use
  52. @echo 正在设置静态IP地址……
  53. netsh interface Ip set address "本地连接" source=static %ip% %subnet% %gateway% 1 >nul
  54. @echo 静态IP地址设置成功,现在设置DNS地址……
  55. Netsh interface IP set dns "本地连接" source=static %dns% both >nul
  56. @echo DNS设置成功!
  57. call :cl
  58. call :0
  59. :2
  60. call :cl
  61. cls
  62. title 设置动态IP
  63. @echo 开始设置动态IP地址……
  64. NETSH INTERFACE ip set address "本地连接" source=dhcp >nul
  65. @echo 设置动态IP地址成功!现在设置DNS……
  66. NETSH INTERFACE ip set dns "本地连接" source=dhcp >nul
  67. @echo 动态DNS地址设置成功!
  68. call :0
  69. :3
  70. call :cl
  71. cls
  72. title QQ临时聊天
  73. echo 请输入对方QQ号码:
  74. echo\
  75. set/p QQ=
  76. start tencent://message/?uin=%QQ%
  77. call :cl
  78. goto input
  79. :4
  80. call :cl
  81. cls
  82. schtasks /query|find "每日" >nul
  83. if errorlevel 1 echo 第一次使用需输入密码,无密码请直接按Enter键&echo\&echo (注意:输入错误的密码可能导致无法在正常时间运行)&goto not
  84. if errorlevel 0 goto have
  85. :not
  86. echo call %windir%\everybat.bat :4 >%windir%\every.bat
  87. SCHTASKS /create /ru %username% /st 22:00:00 /sc daily /tr %windir%\every.bat /tn 每日自动删除垃圾
  88. :have
  89. echo/&echo/
  90. echo/
  91. echo/
  92. echo ~正在删除COOKIES~~
  93. del /f /s /q "%userprofile%\cookies\*.*"
  94. echo/
  95. echo/
  96. echo ~删除完成~
  97. ping -n 2 127.1 >nul
  98. echo/&echo/
  99. echo/
  100. echo/
  101. echo ~正在删除Temporary Internet Files~
  102. del /f /s /q "%userprofile%\Local Settings\Temporary Internet Files\*.*"
  103. rd /s /q "%userprofile%\Local Settings\Temporary Internet Files" & md "%userprofile%\Local Settings\Temporary Internet Files"
  104. echo/&echo/
  105. echo/
  106. echo ~删除完成~
  107. ping -n 2 127.1 >nul
  108. echo/&echo/
  109. echo/
  110. echo/
  111. echo ~正在删除IE TEMP~
  112. del /f /s /q "%userprofile%\Local Settings\Temp\*.*"
  113. title 正在删除IE TEMP
  114. echo/&echo/
  115. echo/
  116. echo ~删除完成~
  117. ping -n 2 127.1 >nul
  118. echo/&echo/
  119. echo/
  120. echo/
  121. echo ~正在删除Windows TEMP~
  122. del /f /s /q "%windir%\Temp\*.*"
  123. echo/&echo/
  124. echo/
  125. echo ~删除完成~
  126. ping -n 2 127.1 >nul
  127. echo/&echo/
  128. echo/
  129. echo/
  130. echo ~正在删除WINDOWS Prefetch~
  131. del /f /s /q "%windir%\Prefetch\*.*"
  132. echo/&echo/
  133. echo/
  134. echo ~删除完成~
  135. ping -n 2 127.1 >nul
  136. echo/&echo/
  137. echo/
  138. echo/
  139. echo ~正在删除Downloaded Program Files~
  140. title 正在删除Downloaded Program Files
  141. rd /q /s "%windir%\Downloaded Program Files" &md "%windir%\Downloaded Program Files"
  142. echo/&echo/
  143. echo/
  144. echo ~删除完成~
  145. ping -n 2 127.1 >nul
  146. echo/&echo/
  147. echo/
  148. echo/
  149. echo/&echo/
  150. echo/
  151. echo/
  152. echo ~正在清理缓存~
  153. SFC /PURGECACHE
  154. echo/&echo/
  155. echo/
  156. echo/
  157. echo/&echo/
  158. echo/
  159. echo/&echo/ ~清理系统缓存完成~
  160. ping -n 2 127.1>nul
  161. echo/&echo/
  162. echo 已完成所有任务!
  163. call :cl
  164. goto input
  165. :5
  166. call :cl
  167. cls
  168. title 清理磁盘
  169. cleanmgr
  170. call :cl
  171. goto input
  172. :6
  173. call :cl
  174. cls
  175. for /f "skip=1 tokens=1,2 delims=\" %%i in ('fsutil fsinfo drives^|find /v ""') do (
  176. set drive=%%i
  177. set drive=!drive:~-2!
  178. echo 正在检查!drive!磁盘
  179. title 正在检查!drive!磁盘
  180. echo\&echo\
  181. chkdsk !drive! /v
  182. )
  183. ping -n 2 127.1>nul
  184. call :cl
  185. goto input
  186. :7
  187. title 定时关机
  188. call :cl
  189. cls
  190. echo 当前时间:%date%,%time%
  191. echo\&echo 请输入定时关机时间。(需24小时制,如23:30。:为英文标点。)
  192. set tim=
  193. set/p tim=
  194. at %tim% /INTERACTIVE shutdown -s -t 10 >nul
  195. if errorlevel 1 msg * 输入错误,请重新输入!&goto 7
  196. echo 设置成功!
  197. ping -n 2 127.1>nul
  198. call :cl
  199. goto input
  200. :8
  201. title 网速检测
  202. call :cl
  203. cls
  204. echo 检查是否连接互联网……
  205. ping -n 2 www.baidu.com>nul
  206. if errorlevel 1 msg * 互联网连接不通,无法检测! &goto input
  207. if errorlevel 0 echo 已连接互联网,开始检测……&ping -n 1 127.1>nul
  208. cls
  209. echo 正在检测与中国电信的连接速度……&echo\
  210. call :sudu www.chinatelecom.com.cn
  211. set dx=%ave%
  212. call :lost
  213. echo 正在检测与中国网通的连接速度……&echo\
  214. call :sudu www.chinanetcom.com.cn
  215. set wt=%ave%
  216. call :lost
  217. echo 正在检测与百度的连接速度……&echo\
  218. call :sudu www.baidu.com
  219. set bd=%ave%
  220. call :lost
  221. echo 正在检测与腾讯的连接速度……&echo\
  222. call :sudu www.qq.com
  223. set qq=%ave%
  224. call :lost
  225. echo 正在检测与网易的连接速度……&echo\
  226. call :sudu www.163.com
  227. set wy=%ave%
  228. call :lost
  229. set /a ave1=(%dx%+%wt%+%bd%+%qq%+%wy%)/5
  230. echo\&echo\
  231. echo 总体平均速度 :%ave1% 毫秒
  232. echo\&echo\
  233. if %ave1% leq 80 echo 总体连接速度 ………… 优&goto textfinished
  234. if %ave1% leq 150 echo 总体连接速度 ………… 良&goto textfinished
  235. if %ave1% leq 250 echo 总体连接速度 ………… 中&goto textfinished
  236. if %ave1% gtr 250 echo 总体连接速度 ………… 差&goto textfinished
  237. :textfinished
  238. echo\
  239. echo 检测完成!
  240. ping 127.1>nul
  241. call :cl
  242. goto input
  243. :9
  244. call :cl
  245. cls
  246. title 查看系统详细信息
  247. echo\&echo\ >>%file%\system.txt&echo\ >>%file%\system.txt
  248. set/p=正在加载BISO信息……<nul
  249. wmic bios get name,VERSION,Manufacturer >%systemdrive%\progra~1\XuanYuan\tempaa.txt
  250. for /f "tokens=1,2,3,6,7,9,10,11 skip=1 delims= " %%i in ('TYPE %systemdrive%\progra~1\XuanYuan\tempaa.txt') do (
  251. call :qc
  252. echo BISO信息:
  253. echo BISO信息: >%file%\system.txt
  254. echo\&echo\ >>%file%\system.txt
  255. echo BIOS生产商 :%%i %%j %%k
  256. echo BIOS生产日期:%%l
  257. echo BIOS生产时间:%%m
  258. echo BIOS版本: %%o%%p %%n
  259. echo BIOS生产商 :%%i %%j %%k >>%file%\system.txt
  260. echo BIOS生产日期:%%l >>%file%\system.txt
  261. echo BIOS生产时间:%%m >>%file%\system.txt
  262. echo BIOS版本: %%o%%p %%n >>%file%\system.txt
  263. )
  264. set/p=正在加载CD-Rom信息……<nul
  265. wmic cdrom get name,id,Manufacturer >%systemdrive%\progra~1\XuanYuan\tempaa.txt
  266. call :qc
  267. echo CD-Rom 信息 :
  268. echo CD-Rom 信息 : >>%file%\system.txt
  269. echo\&echo\ >>%file%\system.txt
  270. echo 盘符 类型 名称
  271. echo 盘符 类型 名称 >>%file%\system.txt
  272. echo\&echo\ >>%file%\system.txt
  273. echo\ >>%file%\system.txt
  274. for /f "skip=1 tokens=1,2,3 delims= " %%i in ('type %systemdrive%\progra~1\XuanYuan\tempaa.txt') do (
  275. echo %%i %%j
  276. echo %%i %%j >>%file%\system.txt
  277. echo\&echo\ >>%file%\system.txt
  278. echo\ >>%file%\system.txt
  279. )
  280. set/p=正在加载系统管理信息……<nul
  281. wmic computersystem get name,username,domain >%systemdrive%\progra~1\XuanYuan\tempaa.txt
  282. call :qc
  283. echo 系统管理信息:
  284. echo 系统管理信息:>>%file%\system.txt
  285. echo\&echo\ >>%file%\system.txt
  286. for /f "skip=1 tokens=1,2,3 delims= " %%i in ('type %systemdrive%\progra~1\XuanYuan\tempaa.txt') do (
  287. echo 主机名: %%j
  288. echo 当前用户: %%k
  289. echo 登陆域: %%i
  290. echo 主机名: %%j >>%file%\system.txt
  291. echo 当前用户: %%k >>%file%\system.txt
  292. echo 登陆域: %%i >>%file%\system.txt
  293. )
  294. set/p=正在加载处理器信息……<nul
  295. wmic cpu get Name,Version,DeviceID,MaxClockSpeed >%systemdrive%\progra~1\XuanYuan\tempaa.txt
  296. call :qc
  297. echo 处理器信息:
  298. echo 处理器信息: >>%file%\system.txt
  299. echo\&echo\ >>%file%\system.txt
  300. echo ID 频率(MHZ) 名称 版本
  301. echo ID 频率(MHZ) 名称 版本 >>%file%\system.txt
  302. echo\&echo\ >>%file%\system.txt&echo\ >>%file%\system.txt
  303. call :fo
  304. set/p=正在加载用户桌面信息……<nul
  305. wmic desktop get Name,ScreenSaverExecutable,ScreenSaverTimeout >%systemdrive%\progra~1\XuanYuan\tempaa.txt
  306. call :qc
  307. echo 桌面信息:
  308. echo 桌面信息: >>%file%\system.txt
  309. echo\&echo\ >>%file%\system.txt
  310. echo 用户 屏保地址 屏保等待时间(秒)
  311. echo 用户 屏保地址 屏保等待时间(秒) >>%file%\system.txt
  312. echo\&echo\ >>%file%\system.txt&echo\ >>%file%\system.txt
  313. call :fo
  314. set/p=正在加载显示器信息……<nul
  315. wmic desktopmonitor get Caption,MonitorManufacturer,PixelsPerXLogicalInch,ScreenHeight,ScreenWidth >%systemdrive%\progra~1\XuanYuan\tempaa.txt
  316. call:qc
  317. echo 显示器信息:
  318. echo 显示器信息: >>%file%\system.txt
  319. echo\&echo\ >>%file%\system.txt
  320. echo 名称 类型 大小(dpi) 高像素 宽像素
  321. echo 名称 类型 大小(dpi) 高像素 宽像素 >>%file%\system.txt
  322. echo\&echo\ >>%file%\system.txt&echo\ >>%file%\system.txt
  323. call :fo
  324. set/p=正在加载硬盘信息……<nul
  325. wmic DISKDRIVE get Caption,Manufacturer, Size >%systemdrive%\progra~1\XuanYuan\tempaa.txt
  326. call :qc
  327. echo 硬盘信息:
  328. echo 硬盘信息: >>%file%\system.txt
  329. echo\&echo\ >>%file%\system.txt
  330. echo 名称 型号 大小(KB)
  331. echo 名称 型号 大小(KB) >>%file%\system.txt
  332. echo\&echo\ >>%file%\system.txt&echo\ >>%file%\system.txt
  333. call :fo
  334. set/p=正在加载磁盘分区信息……<nul
  335. wmic LOGICALDISK get Caption,Description,FileSystem,FreeSpace,Size,VolumeName >%systemdrive%\progra~1\XuanYuan\tempaa.txt
  336. call :qc
  337. echo 磁盘分区信息:
  338. echo 磁盘分区信息: >>%file%\system.txt
  339. echo\&echo\ >>%file%\system.txt
  340. echo 分区 类型 格式 剩余大小(KB) 总大小(KB) 标卷
  341. echo 分区 类型 格式 剩余大小(KB) 总大小(KB) 标卷 >>%file%\system.txt
  342. echo\&echo\ >>%file%\system.txt&echo\ >>%file%\system.txt
  343. call :fo
  344. set/p=正在加载系统信息……<nul
  345. wmic OS get Caption,CSDVersion,TotalVirtualMemorySize,TotalVisibleMemorySize >%systemdrive%\progra~1\XuanYuan\tempaa.txt
  346. call :qc
  347. echo 系统信息:
  348. echo 系统信息: >>%file%\system.txt
  349. echo\&echo\ >>%file%\system.txt
  350. echo 系统 版本 物理内存(KB) 虚拟内存(KB)
  351. echo 系统 版本 物理内存(KB) 虚拟内存(KB) >>%file%\system.txt
  352. echo\&echo\ >>%file%\system.txt&echo\ >>%file%\system.txt
  353. call :fo
  354. set/p=正在加载共享信息……<nul
  355. wmic SHARE get Caption, Name,Path >%systemdrive%\progra~1\XuanYuan\tempaa.txt
  356. call :qc
  357. echo 共享信息:
  358. echo 共享信息: >>%file%\system.txt
  359. echo\&echo\ >>%file%\system.txt
  360. echo 项目 名称 路径
  361. echo 项目 名称 路径 >>%file%\system.txt
  362. echo\&echo\ >>%file%\system.txt&echo\ >>%file%\system.txt
  363. for /f "skip=1 tokens=1,* delims= " %%i in ('type %systemdrive%\progra~1\XuanYuan\tempaa.txt') do (
  364. echo %%i %%j
  365. echo %%i %%j >>%file%\system.txt
  366. )
  367. pause
  368. del /f %systemdrive%\progra~1\XuanYuan\tempaa.txt >nul
  369. start %file%\system.txt
  370. goto input
  371. :10
  372. title 系统优化
  373. call :cl
  374. cls
  375. @echo 加快搜索网上邻居的速度
  376. @reg delete HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\RemoteComputer\NameSpace /f
  377. @echo 去掉右键“新建”中的RTF
  378. @reg delete HKEY_CLASSES_ROOT\.rtf /v ShellNew /f
  379. @echo 加速开机时间
  380. @reg add "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\" /v "SystemStartOptions" /t reg_sz /d NODETECT /f
  381. @echo 卸载无用DLL
  382. @reg add "HKEY_LOCAL_MACHINE\SOFTWARE\MicrosoftWindowsCurrentVersion\explorer\" /v "AlwaysUnloadDLL" /t REG_DWORD /d 1 /f
  383. @echo 禁止更改主页设置
  384. @reg add "HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Control Panel" /v "HomePage" /t reg_DWORD /d 00000001 /f
  385. @echo 取消快捷方式的箭头
  386. @reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer" /v "Link" /t reg_binary /d 00 00 00 00 /f
  387. @echo 关闭华医生
  388. @reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\AeDebug" /v "AUTO" /t reg_sz /d 0 /f
  389. @echo 加速程序运行
  390. @reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\FileSystem" /v "ConfigFileAllocSize" /t reg_dword /d 000001f4 /f
  391. @echo 关闭错误报告
  392. @reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\ERSvc" /v "Start" /t reg_dword /d 00000003 /f
  393. @echo 关闭WEBCLINT服务
  394. @reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\WebClient" /v "Start" /t reg_dword /d 00000003 /f
  395. @echo 硬件优化
  396. @reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Vxd\BIOS" /v "CPUPriority" /t reg_dword /d 00000001 /f
  397. @echo 停止磁盘空间不足警告
  398. @reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\Explorer" /v "NoLowDiskSpaceChecks" /t reg_dword /d 00000001 /f
  399. @echo 关闭TIME服务
  400. @reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\W32Time" /v "Start" /t reg_dword /d 00000004 /f
  401. @echo 禁止自动打开默认共享
  402. @reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\lanmanServer\parameters" /v "AutoShareServer" /t reg_dword /d 00000000 /f
  403. @echo 禁止自动共享
  404. @reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\lanmanServer\parameters" /v "AutoShareWks" /t reg_dword /d 00000000 /f
  405. @echo 关闭XP漫游
  406. @reg add "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Applets\Tour" /v "RunCount" /t reg_dword /d 00000000 /f
  407. @reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Applets\Tour" /v "RunCount" /t reg_dword /d 00000000 /f
  408. @echo 关闭XP信使服务
  409. @reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Messenger" /v "Start" /t reg_dword /d 00000004 /f
  410. @echo 关闭光盘自动运行
  411. @reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer" /v "NoDriveTypeAutoRun" /t reg_multi_sz /d 91,00,00,00 /f
  412. @echo 关闭自动重启
  413. @reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\CrashControl" /v "AutoReboot" /t reg_dword /d 00000000 /f
  414. @echo 加速屏幕刷新率
  415. @reg add "HKEY_LOCAL_MACHINE\ystem\CurrentControlSet\Control\Update\" /v "UpdateMode" /t reg_sz /d 0 /f
  416. @echo 加速窗口显示
  417. @reg add "HKEY_CURRENT_USER\Control Panel\Desktop\WindowMetrics" /v "MinAniMate" /t reg_sz /d 0 /f
  418. @echo 禁止启动时自动弹出错误信息
  419. @reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Windows" /v "NoPopUpsOnBoot" /t reg_sz /d 1 /f
  420. @echo 系统启动失败不写入系统日志
  421. @reg add "HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Control\CrashControl" /v "LogEvent" /t reg_dword /d 00000000 /f
  422. @echo 不发送管理警报
  423. @reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\CrashControl" /v "SendAlert" /t reg_dword /d 00000000 /f
  424. @echo 禁止远程修改注册表
  425. @reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\SecurePipeServers\winreg" /v "RemoteRegAccess" /t reg_dword /d 00000001 /f
  426. @echo 未知文件直接选择打开方式
  427. @reg add "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\policies\system" /v "NoInternetOpenWith" /t reg_dword /d 00000001 /f
  428. @echo 始终显示扩展名
  429. reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced" /v HideFileExt /t reg_dword /d 00000000 /f
  430. @echo 禁止保留文档记录
  431. @REG ADD "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer" /V NORECENTDOCSHISTORY /T REG_DWORD /D 1 /F
  432. @echo 关闭桌面清理向导
  433. @reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Desktop\CleanupWiz" /v "NoRun" /t reg_dword /d 00000001 /f
  434. @echo 开启小键盘
  435. @reg add "HKEY_USERS\.DEFAULT\Control Panel\Keyboard" /v "InitialKeyboardIndicators" /t reg_sz /d 2 /f
  436. @echo 在系统属性里显示更多CPU信息
  437. @reg add "HKEY_LOCAL_MACHINE\Hardware\Description\System\CentralProcessor\0 " /v "VendorIdentifier" /t reg_sz /d "Genuine Intel" /f
  438. @echo 把IE的起始页面改为空白页
  439. @reg add "HKEY_USERS\.DEFAULT\Software\Microsoft\Internet Explorer\Main " /v "Start page" /t reg_sz /d about:blank /f
  440. @echo 扩充回收站右键功能
  441. @reg add "HKEY_CLASSES_ROOT\CLSID\{645FF040-5081-101B-9F08-00AA002F954E}\ShellFolder" /v "Attributes" /t reg_dword /d 10 01 00 20 /f
  442. @echo CD四倍加速
  443. @reg add "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Control\FileSystem\CDFS" /v "Prefetch" /t reg_dword /d 00000004 /f
  444. @echo 快速关机
  445. @reg add "HKEY_LOCAL_MACHINE\System\CourrentControlSet\Control\Shutdown" /v "FastReboot" /t reg_sz /d 1 /f
  446. echo 解锁注册表
  447. @reg add "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System" /v DisableRegistryTools /t reg_dword /d 00000000 /f
  448. @echo 关闭XP自带ZIP支持
  449. regsvr32 /u /s zipfldr.dll
  450. echo ………………………………OK!
  451. @echo 关闭非法光机后的硬盘扫描
  452. chkntfs /t:0
  453. echo ………………………………OK!
  454. @echo 关闭远程连接的默认共享
  455. @net share IPC$ /del
  456. echo\
  457. echo\
  458. echo 优化完成!
  459. call :cl
  460. goto input
  461. :11
  462. title 显示局域网共享资源
  463. call :cl
  464. cls
  465. for /f "tokens=1 delims=\\" %%i in ('net view^|find "\\"') do (
  466. echo %%i >>%systemdrive%\progra~1\XuanYuan\share.txt
  467. net view %%i
  468. net view %%i >>%systemdrive%\progra~1\XuanYuan\share.txt
  469. )
  470. call :cl
  471. start %systemdrive%\progra~1\XuanYuan\share.txt
  472. goto input
  473. :12
  474. call :cl
  475. cls
  476. rundll32.exe user32.dll,LockWorkStation
  477. goto input
  478. :13
  479. call :cl
  480. cls
  481. echo 进程 路径 >%systemdrive%\progra~1\XuanYuan\tempa.txt
  482. for /l %%i in (0,1,15) do echo\
  483. echo 正在获取中……
  484. wmic process get Caption,CommandLine >%systemdrive%\progra~1\XuanYuan\tempaa.txt
  485. for /f "tokens=* skip=1" %%i in ('type %systemdrive%\progra~1\XuanYuan\tempaa.txt') do (
  486. if not "%%i"=="" (
  487. echo %%i >>%systemdrive%\progra~1\XuanYuan\tempa.txt)
  488. )
  489. call :cl
  490. start %systemdrive%\progra~1\XuanYuan\tempa.txt
  491. goto input
  492. :14
  493. call :cl
  494. cls
  495. echo\&echo\&echo\&echo\&echo\
  496. set/p= <nul
  497. @for /l %%b in (0,1,32) do (
  498. @set ",=★多功能批处理由公孙轩辕制作,QQ:327828994。欢迎使用!"
  499. set/p=!,:~%%b,1!<nul
  500. set/p= ★<nul
  501. for /l %%l in (1,1,600) do ver>nul
  502. set/p=<nul)
  503. for /l %%l in (1,1,1500) do ver>nul
  504. echo\
  505. echo\&echo\&echo\&echo\&echo\
  506. set/p= <nul
  507. for /l %%i in (0,1,14) do (
  508. set ",=获取本产品更多信息,请到 : "
  509. set/p=!,:~%%i,1!<nul
  510. for /l %%l in (1,1,600) do ver>nul
  511. )
  512. for /l %%a in (0,1,29) do (
  513. set,=http://hi.baidu.com/huajinghua
  514. set/p=!,:~%%a,1!<nul
  515. for /l %%a in (1,1,500) do ver>nul
  516. )
  517. for /l %%a in (1,1,5000) do ver>nul
  518. for /l %%i in (0,1,3) do (
  519. for /l %%a in (0,1,29) do set/p=<nul
  520. for /l %%a in (1,1,2000) do ver>nul
  521. for /l %%a in (0,1,29) do set/p= <nul
  522. for /l %%a in (1,1,2000) do ver>nul
  523. for /l %%a in (0,1,29) do set/p=<nul
  524. set/p=http://hi.baidu.com/huajinghua<nul
  525. )
  526. for /l %%i in (0,1,2) do (
  527. for /l %%a in (0,1,29) do (
  528. set/p=<nul
  529. set/p= <nul
  530. set/p=<nul
  531. for /l %%i in (1,1,100) do ver>nul)
  532. for /l %%i in (0,1,29) do (
  533. set,=http://hi.baidu.com/huajinghua
  534. call set/p=!,:~%%i,1!<nul
  535. for /l %%a in (1,1,500) do ver>nul
  536. ))
  537. for /l %%i in (0,1,2) do (
  538. for /l %%a in (0,1,29) do set/p=<nul
  539. for /l %%i in (0,1,29) do (
  540. set/p= http://hi.baidu.com/huajinghua<nul
  541. for /l %%a in (1,1,600) do ver>nul
  542. for /l %%a in (0,1,29) do set/p=<nul
  543. )
  544. for /l %%i in (0,1,30) do (
  545. set/p=http://hi.baidu.com/huajinghua <nul
  546. for /l %%a in (1,1,600) do ver>nul
  547. for /l %%a in (0,1,31) do set/p=<nul
  548. )
  549. set/p= http://hi.baidu.com/huajinghua<nul
  550. )
  551. echo\&echo\&echo\&echo\&echo\
  552. set/p= 按任意键返回主菜单<nul
  553. pause >nul
  554. goto input
  555. :fo
  556. for /f "skip=1 tokens=* delims= " %%i in ('type %systemdrive%\progra~1\XuanYuan\tempaa.txt') do (
  557. echo %%i
  558. echo %%i >>%file%\system.txt
  559. )
  560. goto :eof
  561. :select
  562. ipconfig/all >%systemdrive%\progra~1\XuanYuan\ip.txt
  563. for /f "tokens=2 delims=:" %%i in ('findstr /i /c:%1 %systemdrive%\progra~1\XuanYuan\ip.txt') do set "%~2=%%i"
  564. goto :eof
  565. :sudu
  566. ping -n 3 %1 >%systemdrive%\progra~1\XuanYuan\ping.txt
  567. for /f "tokens=3,6,9 delims=, " %%i in ('find /i "mini" %systemdrive%\progra~1\XuanYuan\ping.txt') do (
  568. set min=%%i
  569. set max=%%j
  570. set ave=%%k
  571. set min=!min:~0,-2!
  572. set max=!max:~0,-2!
  573. set ave=!ave:~0,-3!
  574. echo 最小延迟 :!min! 毫秒
  575. echo 最大延迟 :!max! 毫秒
  576. echo 平均延迟 :!ave! 毫秒
  577. if !ave! leq 80 echo 连接速度 ………… 优&goto :eof
  578. if !ave! leq 150 echo 连接速度 ………… 良&goto :eof
  579. if !ave! leq 250 echo 连接速度 ………… 中&goto :eof
  580. if !ave! gtr 250 echo 连接速度 ………… 差&goto :eof
  581. echo\)
  582. goto :eof
  583. :lost
  584. for /f "tokens=11 delims= " %%i in ('find /i "lost" %systemdrive%\progra~1\XuanYuan\ping.txt') do (
  585. set lo=%%i
  586. set lo=!lo:~1!)
  587. echo 丢包率 : %lo%
  588. goto :eof
  589. :qc
  590. for /l %%i in (1,1,100) do set/p=<nul
  591. for /l %%i in (1,1,100) do set/p= <nul
  592. echo\&echo\ >>%file%\system.txt
  593. goto :eof
  594. :caidan
  595. echo\&echo\&echo\&echo\&echo 多功能批处理 MADE BY 公孙轩辕 QQ:327828994
  596. echo\&echo\&echo ★菜单★ &echo\
  597. echo ======================================================================
  598. echo $ $
  599. echo $ 0=查看本地连接详细信息 $
  600. echo $ $
  601. echo $ 1=固定IP地址 2=设置动态IP $
  602. echo $ $
  603. echo $ 3=发起QQ临时会话 4=每日定时清理系统垃圾 $
  604. echo $ $
  605. echo $ 5=清理磁盘 6=检查硬盘错误 $
  606. echo $ $
  607. echo $ 7=定时关机 8=网速测试 $
  608. echo $ $
  609. echo $ 9=查看电脑详细信息 10=常用系统优化 $
  610. echo $ $
  611. echo $ 11=显示局域网上的所有共享资源 12=锁定计算机 $
  612. echo $ $
  613. echo $ 13=查看系统进程及路径 14=产品广告动画 $
  614. echo $ $
  615. echo ======================================================================
  616. echo\&echo\
  617. echo (注释:等号左边的为功能代号,请输入左边的的代号!)
  618. goto :eof
  619. :cl
  620. for /l %%i in (1,1,40) do (
  621. echo\
  622. for /l %%a in (1,1,250) do ver>nul
  623. )
  624. goto :eof
  625. :zb
  626. ver|find /i "XP" >nul
  627. if errorlevel 1 msg * 抱歉!当前只支持XP系统。&exit
  628. if not exist %systemdrive%\progra~1\XuanYuan md %systemdrive%\progra~1\XuanYuan>nul
  629. echo %date%%time% >%systemdrive%\progra~1\XuanYuan\使用日志.txt
  630. if exist %systemdrive%\progra~1\XuanYuan\tempaa.txt del /f %systemdrive%\progra~1\XuanYuan\tempaa.txt >nul
  631. if exist %systemdrive%\progra~1\XuanYuan\tempa.txt del /f %systemdrive%\progra~1\XuanYuan\tempa.txt >nul
  632. if exist %systemdrive%\progra~1\XuanYuan\ping.txt del /f %systemdrive%\progra~1\XuanYuan\ping.txt
  633. if exist %systemdrive%\progra~1\XuanYuan\ip.txt del /f %systemdrive%\progra~1\XuanYuan\ip.txt >nul
  634. if not exist %windir%\everybat.bat copy "%~f0" %windir%\everybat.bat >nul
  635. if exist %systemdrive%\progra~1\XuanYuan\share.txt del /f %systemdrive%\progra~1\XuanYuan\share.txt>nul
  636. goto :eof
  637. 产品更新信息:
  638. ======================
  639. 1. 去除了开始的动画改为自己查看
  640. 2. 建立自己的program files目录,使产品运行更加安全
  641. 3. 在更新2的基础上优化了代码。使程序运行加速
  642. 4. 修改产品9的功能查看系统信息改为查看电脑信息。更加齐全了资料。能显示BIOS,显示器,CPU等信息
  643. 5. 增加了查看系统进程和路径功能,显示出更多的进程,以防隐藏进程。
  644. ======================
  645. 谢谢您的支持!
  646. --------公孙轩辕
  647. 13:36 2008-4-5
复制代码

作者: fml520    时间: 2008-4-5 21:45

还没下,不过我还是会顶滴~~~~~~~~~
作者: jx0302    时间: 2008-4-28 13:31

顶,学了很多东西,楼主好人
作者: 剑工场    时间: 2008-6-18 02:37

很强大的样子,赞的!!!
作者: lac312    时间: 2008-6-19 16:35

没理由不回贴~ 好~
作者: 帝魂神    时间: 2008-8-21 02:30

我下了个,很不错的东西,哈哈
作者: chineselzh    时间: 2008-8-28 19:26

非常不错!看到介绍就想流口水,呵呵
作者: 死者祭祀    时间: 2008-8-28 21:51

貌似很强大~
能公布下原代码吗?
作者: 受教者    时间: 2008-10-3 23:19

代码那么多,看糊涂了
学习
作者: z422s922    时间: 2008-10-6 20:35

下载了一定要回帖!!¬
作者: simen31    时间: 2008-10-16 22:52

好好,多谢,我拿去研究。
作者: mazt007    时间: 2008-11-10 16:31



非常不错!看到介绍就想流口水
作者: aqaqzhao    时间: 2008-11-21 00:56

谢谢啦,新手正学习
作者: ciciwenwen    时间: 2008-11-28 17:39

挖塞!!LZ真是人才啊。  这个功能就强大了!!要是给别人装系统时直接输入10就能优化了。。免去了手动操做的麻烦了!!
作者: ljl    时间: 2008-12-1 12:37

我是新手下来看一看好看不你真强大啊
作者: x411492112    时间: 2008-12-12 10:53

下载了,的确是个好东东
作者: kof9917    时间: 2009-3-14 13:36     标题: 534444444444444444444444444444444444444

444444444444444444444444444444444444
作者: 5566ljlj    时间: 2009-10-28 21:19

好像运行有问题,是不是哪些地方有误,楼主?
作者: SonJunCai    时间: 2009-12-11 16:37

还不错,顶你....
作者: xzwxxwjg    时间: 2009-12-11 21:01

在哪里怎么看不到下来试试
作者: fx1095    时间: 2010-1-16 13:50

谢谢  楼主
作者: oldshell    时间: 2010-6-5 17:46

顶!厉害啊,保存代码,好好学习




欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2