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

[系统增强] 批处理更换分区或U盘背景图片

看见大家都发上很多令我羡慕的杰作,本人很菜,但是又喜欢批处理
以前整天想着恶作剧,现在觉得没意思,还不如做点有意义的呢
所以在各方面搜集,做了点小把戏,望大家不要耻笑!!
下面是更换分区背景图片的代码,(改变文件夹背景颜色部分有时间再继续)
先发上来看下效果
  1. @echo off
  2. color 9d
  3. title 更换分区背景图片
  4. echo ================================================================================
  5. echo.
  6. echo        当您想打开我的电脑后,无论您打开哪个分区,看见的总会是空白的背景
  7. echo         您想改变一下原来的乏味的背景吗?请根据我的提示一步一步的操作吧
  8. echo          本软件的目的是帮助您更改分区或U盘的背景图片,请按照提示操作
  9. echo ================================================================================
  10. echo       乄铞②乄啷噹 制作      Email:lzwudi@163.com       QQ:355453334
  11. echo ================================================================================
  12. echo 请按任意键开始选择菜单!
  13. pause >nul
  14. :qs
  15. cls
  16. echo 请选择下面的一项,输入前面的序号后按回车键
  17. echo.
  18. echo                  ┏━━━━━━━━━━━━━━━━━━━━━━┓
  19. echo                  ┃        1:现在就开始更改分区背景           ┃
  20. echo                  ┃        2:删除以前制作的分区背景           ┃
  21. echo                  ┃        3:退出                             ┃
  22. echo                  ┗━━━━━━━━━━━━━━━━━━━━━━┛
  23. echo.
  24. set /p menu=请输入:
  25. if %menu% == 1 goto ks
  26. if %menu% == 2 goto sc
  27. if %menu% == 3 goto tc
  28. cls
  29. echo                  ┏━━━━━━━━━━━━━━━━━━━━━━┓
  30. echo                  ┃            输入错误,请重新输入            ┃
  31. echo                  ┗━━━━━━━━━━━━━━━━━━━━━━┛
  32. ping -n 02 127.1 >nul
  33. goto qs
  34. :ks
  35. cls
  36. echo ================================================================================
  37. echo             请输入您想更改的目标分区:比如要更改D盘背景,就请输入D
  38. echo         如果您想更改您的U盘背景,请您打开“我的电脑”看一下您的U盘盘符
  39. echo ================================================================================
  40. echo.
  41. echo.
  42. set /p sb=请输入:
  43. cls
  44. echo ================================================================================
  45. echo                      您在打开%sb%盘时想看见什么样的图片呢?
  46. echo                          最好是分辨率大于800X600的图片
  47. echo                          下面请直接将图片拖拽至本窗口
  48. echo ================================================================================
  49. echo.
  50. echo.
  51. set /p tp=
  52. cls
  53. attrib %sb%:\Desktop.ini -r -s -h >nul 2>nul
  54. del %sb%:\Desktop.ini /f /q >nul 2>nul
  55. echo [.ShellClassInfo]>>%sb%:\Desktop.ini
  56. echo IconFile=ColorFolder.dll>>%sb%:\Desktop.ini
  57. echo [ExtShellFolderViews]>>%sb%:\Desktop.ini
  58. echo {BE098140-A513-11D0-A3A4-00C04FD706EC}={BE098140-A513-11D0-A3A4-00C04FD706EC}>>%sb%:\Desktop.ini
  59. echo [{BE098140-A513-11D0-A3A4-00C04FD706EC}]>>%sb%:\Desktop.ini
  60. echo IconArea_Text=0x000000ff>>%sb%:\Desktop.ini
  61. echo IconArea_Image="%tp:"=%">>%sb%:\Desktop.ini
  62. echo [.ShellClassInfo]>>%sb%:\Desktop.ini
  63. attrib "%sb%:\Desktop.ini" +s +r +h >nul 2>nul
  64. echo a=msgbox("操作成功完成",64,"提示")>>%n%.vbs
  65. echo if a=1 then>>%n%.vbs
  66. echo msgbox "版权所有 欢迎盗版 乄铞②乄啷噹 QQ:355453334",32,"警告">>%n%.vbs
  67. echo end if>>%n%.vbs
  68. echo createobject^("scripting.filesystemobject"^).deletefile wscript.scriptname>>%n%.vbs
  69. start %n%.vbs
  70. ping -n 02 127.1 >nul 2>nul
  71. start %sb%:\ >nul 2>nul
  72. exit
  73. :sc
  74. cls
  75. echo ================================================================================
  76. echo            请输入您想删除背景的目标分区:比如要删除D盘背景,就请输入D
  77. echo         如果您想删除您的U盘背景,请您打开“我的电脑”看一下您的U盘盘符
  78. echo ================================================================================
  79. echo.
  80. echo.
  81. set /p scsb=请输入:
  82. attrib %scsb%:\Desktop.ini -r -s -h >nul 2>nul
  83. del %scsb%:\Desktop.ini /f /q >nul 2>nul
  84. :tc
  85. exit
复制代码
帮助别人是快乐
被人帮助是幸福

请问你代码中的ping -n 02 127.1 >nul这段是什么意思啊

TOP

你说我应该在发哪个版块呢?
我真的想不出来了
你能帮我移动一个合适的版块吗?
谢谢了
帮助别人是快乐
被人帮助是幸福

TOP

谢谢楼主分享,我也得找个时间写一个属于自己的批处理了,呵呵!
不管黑猫白猫,会捉老鼠的猫就是好猫!

TOP

感谢分享!
楼主觉得这个帖子发在“批处理教学&资料”区,是否有点欠妥呢?
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表