随风

呵呵，匆忙中打错了，应该是 delims=
另：代码以更改，你试试。。

wangplay163

我把机器重起下试试看~！~


辛苦 你了

wangplay163

这是怎么搞的啊~！？

wangplay163

D:\pingtai>for %i in (g h i j k) do (
cd/d %i:
for %a in (o p q r s) do if exist %a call :loop %i %a
)

D:\pingtai>(
cd/d g:
for %a in (o p q r s) do if exist %a call :loop g %a
)

G:\>if exist o call :loop g o

G:\>if exist p call :loop g p

G:\>if exist q call :loop g q

G:\>if exist r call :loop g r

G:\>for /F %j in ('mountvol g /L') do (mountvol g /d   && mountvol r %j )

G:\>(mountvol g /d   && mountvol r 系统找不到指定的文件。 )
系统找不到指定的文件。

G:\>echo 以将 g 盘改为 r 盘
以将 g 盘改为 r 盘

G:\>goto :eof

G:\>if exist s call :loop g s

G:\>(
cd/d h:
for %a in (o p q r s) do if exist %a call :loop h %a
)

H:\>if exist o call :loop h o

H:\>if exist p call :loop h p

H:\>if exist q call :loop h q

H:\>for /F %j in ('mountvol h /L') do (mountvol h /d   && mountvol q %j )

H:\>(mountvol h /d   && mountvol q 系统找不到指定的文件。 )
系统找不到指定的文件。

H:\>echo 以将 h 盘改为 q 盘
以将 h 盘改为 q 盘

H:\>goto :eof

H:\>if exist r call :loop h r

H:\>if exist s call :loop h s

H:\>(
cd/d i:
for %a in (o p q r s) do if exist %a call :loop i %a
)

I:\>if exist o call :loop i o

I:\>if exist p call :loop i p

I:\>if exist q call :loop i q

I:\>if exist r call :loop i r

I:\>if exist s call :loop i s

I:\>for /F %j in ('mountvol i /L') do (mountvol i /d   && mountvol s %j )

I:\>(mountvol i /d   && mountvol s 系统找不到指定的文件。 )
系统找不到指定的文件。

I:\>echo 以将 i 盘改为 s 盘
以将 i 盘改为 s 盘

I:\>goto :eof

I:\>(
cd/d j:
for %a in (o p q r s) do if exist %a call :loop j %a
)

J:\>if exist o call :loop j o

J:\>if exist p call :loop j p

J:\>if exist q call :loop j q

J:\>if exist r call :loop j r

J:\>if exist s call :loop j s

J:\>(
cd/d k:
for %a in (o p q r s) do if exist %a call :loop k %a
)

K:\>if exist o call :loop k o

K:\>if exist p call :loop k p

K:\>for /F %j in ('mountvol k /L') do (mountvol k /d   && mountvol p %j )

K:\>(mountvol k /d   && mountvol p 系统找不到指定的文件。 )
系统找不到指定的文件。

K:\>echo 以将 k 盘改为 p 盘
以将 k 盘改为 p 盘

K:\>goto :eof

K:\>if exist q call :loop k q

K:\>if exist r call :loop k r

K:\>if exist s call :loop k s

K:\>pause
请按任意键继续. . .


这是生成的信息

随风

不好意识，忘了冒号了。
再试试。。。
:

@echo off
for %%i in (g h i j k) do (
  for %%a in (o p q r s) do if exist %%i:\%%a\ call :loop %%i %%a
)  
pause&exit
:loop
for /f %%j in ('mountvol %~1: /L') do (mountvol %~1: /d && mountvol %~2: %%j)
echo 以将 %~1 盘改为 %~2 盘
goto :eof
复制代码

[ 本帖最后由 随风 于 2008-3-31 17:50 编辑 ]

wangplay163

执行后所有盘都不见了
这是为什么啊

wangplay163

这是执行信息

E:\>for %i in (G H I J K L) do (
cd/d %i:
for %a in (O P Q R S T) do if exist %a call :loop %i %a
)

E:\>(
cd/d G:
for %a in (O P Q R S T) do if exist %a call :loop G %a
)

G:\>if exist O call :loop G O

G:\>if exist P call :loop G P

G:\>if exist Q call :loop G Q

G:\>if exist R call :loop G R

G:\>for /F %j in ('mountvol G: /L') do (mountvol G: /d   && mountvol R: %j )

G:\>(mountvol G: /d   && mountvol R: \\?\Volume{e704cf7a-fefe-11dc-bbb2-0019e072
64c0}\ )
当前目录无效。

G:\>echo 以将 G 盘改为 R 盘
以将 G 盘改为 R 盘

G:\>goto :eof

G:\>if exist S call :loop G S

G:\>if exist T call :loop G T

G:\>(
cd/d H:
for %a in (O P Q R S T) do if exist %a call :loop H %a
)

H:\>if exist O call :loop H O

H:\>if exist P call :loop H P

H:\>if exist Q call :loop H Q

H:\>for /F %j in ('mountvol H: /L') do (mountvol H: /d   && mountvol Q: %j )

H:\>(mountvol H: /d   && mountvol Q: \\?\Volume{e704cf7b-fefe-11dc-bbb2-0019e072
64c0}\ )
当前目录无效。

H:\>echo 以将 H 盘改为 Q 盘
以将 H 盘改为 Q 盘

H:\>goto :eof

H:\>if exist R call :loop H R

H:\>if exist S call :loop H S

H:\>if exist T call :loop H T

H:\>(
cd/d I:
for %a in (O P Q R S T) do if exist %a call :loop I %a
)

I:\>if exist O call :loop I O

I:\>if exist P call :loop I P

I:\>if exist Q call :loop I Q

I:\>if exist R call :loop I R

I:\>if exist S call :loop I S

I:\>for /F %j in ('mountvol I: /L') do (mountvol I: /d   && mountvol S: %j )

I:\>(mountvol I: /d   && mountvol S: \\?\Volume{e704cf7c-fefe-11dc-bbb2-0019e072
64c0}\ )
当前目录无效。

I:\>echo 以将 I 盘改为 S 盘
以将 I 盘改为 S 盘

I:\>goto :eof

I:\>if exist T call :loop I T

I:\>(
cd/d J:
for %a in (O P Q R S T) do if exist %a call :loop J %a
)

J:\>if exist O call :loop J O

J:\>if exist P call :loop J P

J:\>if exist Q call :loop J Q

J:\>if exist R call :loop J R

J:\>if exist S call :loop J S

J:\>if exist T call :loop J T

J:\>for /F %j in ('mountvol J: /L') do (mountvol J: /d   && mountvol T: %j )

J:\>(mountvol J: /d   && mountvol T: \\?\Volume{e704cf7d-fefe-11dc-bbb2-0019e072
64c0}\ )
当前目录无效。

J:\>echo 以将 J 盘改为 T 盘
以将 J 盘改为 T 盘

J:\>goto :eof

J:\>(
cd/d K:
for %a in (O P Q R S T) do if exist %a call :loop K %a
)

K:\>if exist O call :loop K O

K:\>if exist P call :loop K P

K:\>for /F %j in ('mountvol K: /L') do (mountvol K: /d   && mountvol P: %j )

K:\>(mountvol K: /d   && mountvol P: \\?\Volume{e704cf7e-fefe-11dc-bbb2-0019e072
64c0}\ )
当前目录无效。

K:\>echo 以将 K 盘改为 P 盘
以将 K 盘改为 P 盘

K:\>goto :eof

K:\>if exist Q call :loop K Q

K:\>if exist R call :loop K R

K:\>if exist S call :loop K S

K:\>if exist T call :loop K T

K:\>(
cd/d L:
for %a in (O P Q R S T) do if exist %a call :loop L %a
)
系统找不到指定的驱动器。

K:\>if exist O call :loop L O

K:\>if exist P call :loop L P

K:\>if exist Q call :loop L Q

K:\>if exist R call :loop L R

K:\>if exist S call :loop L S

K:\>if exist T call :loop L T

K:\>pause
请按任意键继续. . .