[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

希望大家写代码的时候可以用到

每行前多个编号      
【list=1】【*】这里写入一行【/list】  (请在英文状态下输入 【  [  )   
  然后切换到Discuz!代码模式 在切换回来所见即所得模式

  • 1
  • 2
  • 3
  • 4
  • 5


[ 本帖最后由 leap 于 2010-10-16 17:16 编辑 ]

测试一下

[code ][list=1 ]...[/list ][/code ]  没用
  1. [list=1]
  2. @echo off
  3. setlocal enabledelayedexpansion
  4. :{计算耗时(不考虑小时) 10:35:31.42  [放在开头]
  5. ::    (m*60+s)*1000+s'*10=ms 毫秒
  6. ::取余去零操作
  7. set "m=%time:~3,2%"&set "s=%time:~6,2%"&set "ss=%time:~-2%"
  8. set /a m=1%m% "%%" 100,s=1%s% "%%" 100,ss=1%ss% "%%" 100
  9. set /a time_start=(%m%*60 + %s%)*1000 + %ss%*10
  10. :}
  11. ::查看已运行的服务
  12. echo.查看已运行的服务...
  13. sc query type^= service|findstr "SERVICE_NAME: DISPLAY_NAME:">tmpinsrv.txt
  14. start "notepad.exe" tmpinsrv.txt
  15. pause
  16. :: 枚举所有服务
  17. cd.>tmpsrv.txt
  18. sc query type^= service state^= all|findstr /r /C:"SERVICE_NAME:">>tmpsrv.txt
  19. echo 正在运行 稍后...
  20. ::设置启动类型:关闭
  21. for /f "tokens=2 delims= " %%a in (tmpsrv.txt) do sc config %%a start= DISABLED>nul
  22. ::for /f "tokens=2 delims= " %a in (tmpsrv.txt) do sc config %a start= AUTO>nul
  23. ::打开必要的服务:
  24. (rem 显示名:                                remote Procedure Call (RPC)
  25. sc config RpcSs start= AUTO
  26. rem 显示名:                                  Plug and Play (随插随用)
  27. sc config PlugPlay start= AUTO
  28. sc config AudioSrv start= AUTO
  29. sc config Eventlog start= AUTO
  30. rem 显示名:                                  Network Connections
  31. sc config Netman start= DEMAND
  32. rem 显示名:                                  Telephony (电话语音)
  33. sc config TapiSrv start= DEMAND
  34. rem 显示名:                                  Remote Access Connection Manager(PPPOE)
  35. sc config RasMan start= DEMAND
  36. rem 显示名:                                  Windows Installer (Windows 安装程序)
  37. sc config MSIServer start= DEMAND
  38. rem 显示名:                                Telnet  
  39. sc config TlntSvr start= DEMAND
  40. rem 显示名:                                  NVIDIA Display Driver Service (N显卡驱动)
  41. sc config NVSvc start= AUTO
  42. rem 显示名:                                Kaspersky Internet Security 7.0 (卡巴斯基)
  43. sc config AVP start= DEMAND
  44. )>nul
  45. set /p "choice=需要打印服务?(y|n)"
  46. if /i "%choice%"=="y" (sc config Spooler start= AUTO)
  47. set /p "choice=需要使用扫描仪/摄像头?(y|n)"
  48. if /i "%choice%"=="y" (sc config stisvc start= DEMAND)
  49. set /p "choice=需要DCOM/COM+服务?(y|n)"
  50. if /i "%choice%"=="y" (sc config DcomLaunch start= AUTO & sc config EventSystem start= DEMAND)
  51. set /p "choice=IP地址自动获得(DHCP)?(y|n)"
  52. if /i "%choice%"=="y" (sc config dhcp start= AUTO)
  53. set /p "choice=ASP.NET 玩大型网游?(y|n)"
  54. if /i "%choice%"=="y" (sc config aspnet_state start= DEMAND)
  55. ::for /f "tokens=1 delims= " %%a in (tmpsrv.txt) do sc start %%a
  56. :{计算耗时(不考虑小时) 10:35:31.42  [放在结尾]
  57. set "m=%time:~3,2%"&set "s=%time:~6,2%"&set "ss=%time:~-2%"
  58. set /a m=1%m% "%%" 100,s=1%s% "%%" 100,ss=1%ss% "%%" 100
  59. set /a time_end=(%m%*60 + %s%)*1000 + %ss%*10
  60. set /a time_lost=%time_end%-%time_start%
  61. ::echo ::耗时: %time_lost%ms (毫秒)>>"%FILENAME%"
  62. echo 耗时: %time_lost%ms (毫秒)
  63. :}
  64. echo 任务结束
  65. pause>nul
  66. del /q tmpsrv.txt tmpinsrv.txt
  67. exit /b
  68. [/list]
复制代码

[ 本帖最后由 hfg1977 于 2010-10-16 18:02 编辑 ]

TOP

相比之下,更加推荐大家使用code标签。
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

为什么 【code】和【list】没法子共存?

[ 本帖最后由 leap 于 2010-10-16 21:27 编辑 ]

TOP

code标签就是这么醋,它内部不允许其它标签起作用。
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表