Board logo

标题: [网络连接] [已解决]批处理怎样修改映射盘名？ [打印本页]
作者: mxxcgzxxx    时间: 2011-3-23 08:51     标题: [已解决]批处理怎样修改映射盘名？

本帖最后由 mxxcgzxxx 于 2011-3-23 16:15 编辑

由于学校有近100台电脑需要做网络共享，又由于权限的不同要不同的方式，所以做了个批处理但可以改本地盘的名，却改不动映射盘的名，
总是提示：访问遭拒绝
只能用鼠标重命名，求大虾帮改改：
  1. @echo off

  2. cls

  3. net use z: /delete

  4. net use y: /delete

  5. net use x: /delete

  6. net use w: /delete

  7. net use v: /delete

  8. net use u: /delete

  9. net use t: /delete

  10. net use s: /delete

  11. net use r: /delete

  12. net use q: /delete

  13. net use p: /delete

  14. net use o: /delete

  15. net use n: /delete

  16. net use m: /delete

  17. net use l: /delete

  18. net use K: /delete

  19. net use J: /delete

  20. net use I: /delete

  21. 

  22. :kk

  23. cls

  24. 

  25. echo   网络映射权限

  26. echo.

  27. echo    1、学生机

  28. echo    2、中小备课组

  29. echo    3、教务处

  30. echo    4、管理员

  31. echo    5、退出

  32. echo.

  33. 

  34. set/p qq=   您的选择:

  35. 

  36. echo.

  37. 

  38. if "%qq%"=="1" goto qx1

  39. if "%qq%"=="2" goto qx2

  40. if "%qq%"=="3" goto qx3

  41. if "%qq%"=="4" goto qx4

  42. if "%pp%"=="5" goto quit

  43. 

  44. 

  45. goto kk

  46. 

  47. :qx1

  48. net use l: \\10.150.10.220\学生目录 /user:学生

  49. net use m: \\10.150.10.220\影视资源 /user:学生

  50. net use n: \\10.150.10.220\网站支持 /user:学生

  51. 

  52. label c:系统

  53. label d:软件

  54. label e:数据

  55. label f:备份

  56. label l:学生目录

  57. label m:影视资源

  58. label n:网站支持

  59. 

  60. goto quit

  61. 

  62. :qx2

  63. net use l: \\10.150.10.220\服务器课程资源 /user:中小备课组

  64. net use m: \\10.150.10.220\影视资源 /user:中小备课组

  65. net use n: \\10.150.10.220\网站支持 /user:中小备课组

  66. net use o: \\10.150.10.220\软件支持 /user:中小备课组

  67. 

  68. label c:系统

  69. label d:软件

  70. label e:数据

  71. label f:备份

  72. label l:服务器课程资源

  73. label m:影视资源

  74. label n:网站支持

  75. label o:软件支持

  76. 

  77. 

  78. goto quit

  79. 

  80. :qx3

  81. net use l: \\10.150.10.220\服务器课程资源 /user:教务处

  82. net use m: \\10.150.10.220\校务管理 /user:教务处

  83. net use n: \\10.150.10.220\影视资源 /user:教务处

  84. net use o: \\10.150.10.220\网站支持 /user:教务处

  85. net use p: \\10.150.10.220\软件支持 /user:教务处

  86. 

  87. label c:系统

  88. label d:软件

  89. label e:数据

  90. label f:备份

  91. label l:服务器课程资源

  92. label m:校务管理

  93. label n:影视资源

  94. label o:网站支持

  95. label p:软件支持

  96. 

  97. goto quit

  98. 

  99. :qx4

  100. net use l: \\10.150.10.220\服务器课程资源 /user:zxbkz 4483

  101. net use m: \\10.150.10.220\校务管理 /user:zxbkz 4483

  102. net use n: \\10.150.10.220\影视资源 /user:zxbkz 4483

  103. net use o: \\10.150.10.220\网站支持 /user:zxbkz 4483

  104. net use p: \\10.150.10.220\软件支持 /user:zxbkz 4483

  105. 

  106. label c:系统

  107. label d:软件

  108. label e:数据

  109. label f:备份

  110. label l:服务器课程资源

  111. label m:校务管理

  112. label n:影视资源

  113. label o:网站支持

  114. label p:软件支持

  115. goto quit

  116. 

  117. 

  118. :quit

  119. pause

  120. shutdown -f
复制代码
作者: TX_kakashi    时间: 2011-3-23 12:50

没有测试环境，label 加上参数mp试试？
作者: TX_kakashi    时间: 2011-3-23 12:52

网上有用vbs实现的，似乎是通过修改注册表完成的。
回头研究研究下看看。
  1. On Error Resume Next: b8 G+ u( t5 d; I0 o1 q& q

  2. ‚孤烟编写于2007.8.18 QQ:632745 zjrencn @ bbs.txwm.com

  3. serverpath="//webserver/temp$/"   ‚要映射的网络路径+ p8 s# f0 F& X4 ]- R1 H

  4. mydisk="j:/"                      ‚要映射的盘符2 g9 i% T4 A, p8 X% B+ C$ [

  5. mydiskname="音乐盒"           ‚要映射的名字

  6. if right(serverpath,1)="/" then0 e1 B4 ^7 C) i' _+ f

  7. serverpath=left(serverpath,len(serverpath)-1); O( i1 q- \2 l, [9 c7 ^# C

  8. end if1 e8 j. }* M. g9 @$ s6 N; }

  9. if right(mydisk,1)="/" then

  10. mydisk=left(mydisk,len(mydisk)-1)

  11. end if

  12. set wshshell=wscript.createObject("wscript.shell")- T+ J1 G' ~* y& u" K1 c4 m' R

  13. wshshell.run ("%comspec% /c regsvr32 /s scrrun.dll"),0,True2 ?0 i  C! C# D0 C: Z$ L

  14. regspath=replace(serverpath,"/","#")

  15. wshshell.Regwrite "HKCU/Software/Microsoft/Windows/CurrentVersion/Explorer/MountPoints2/"& regspath&"/_LabelFromReg",mydiskname,"REG_SZ" 5 D7 M4 G! E* B5 ^& n

  16. Set WSHNetwork = WScript.CreateObject("WScript.Network")

  17. WSHNetwork.RemoveNetworkDrive mydisk

  18. WSHNetwork.MapNetworkDrive mydisk, serverpath: g5 R: H) ?2 |. Q6 E

  19. wshshell.run "explorer "&mydisk
复制代码
作者: mxxcgzxxx    时间: 2011-3-23 15:06

本帖最后由 mxxcgzxxx 于 2011-3-23 16:27 编辑

你提醒了我我查了下注册表发现关键句了，问题解决了 ：
  1. reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##10.150.10.220#服务器课程资源 /v _LabelFromReg /t REG_SZ /d 服务器课程资源 /f > nul

  2. reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##10.150.10.220#校务管理 /v _LabelFromReg /t REG_SZ /d 校务管理 /f > nul

  3. reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##10.150.10.220#影视资源 /v _LabelFromReg /t REG_SZ /d 影视资源 /f > nul

  4. reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##10.150.10.220#网站支持 /v _LabelFromReg /t REG_SZ /d 网站支持 /f > nul

  5. reg add HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\##10.150.10.220#软件支持 /v _LabelFromReg /t REG_SZ /d 软件支持 /f > nul
复制代码
解决问题就是爽啊，谢谢大家,对了我的是XP操作系统，如果别的系统可能要根据实际情况修改！
作者: mxxcgzxxx    时间: 2011-4-7 22:19

实践中发现还是有的机子不能改，连手动都不能改，进注册表看发现连相关的注册项都不存在，郁闷。
应该是版本问题~~~~
所以我打算自制一个系统盘把所有的机子重装一次



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