批处理转移文 之errorlevel

@echo  off
@set mod=

:next
@echo ————————————————————————————————————————
@set fileName=
@set /p fileName=请输入转移文件名
@set src_dir="C:\Documents and Settings\Administrator\桌面\%fileName%"
@set des_dir="D:\程序打包\打包程序备份\%date:~0,4%%date:~5,2%%date:~8,2%\%fileName%\"
echo %src_dir%
if exist %src_dir% xcopy /E %src_dir% %des_dir%
echo errorlevel=%errorlevel%
if  ERRORLEVEL 1 goto err 
echo %fileName%已转移成功，是否删除源文件
RD /s %src_dir%
@echo 是否继续转移，0：退出，其它：继续
@set /p mod=请选择:
if %mod%==0 (goto exit ) ELSE (goto next)

:err
@echo 没有该文件，请重试 
goto next

:exit

第一次选择桌面有或没有的文件都能正确执行，但是第一次正确转移文件后进入next时不管输入的文件存不存在errorlevel都是0，请问各位大虾这是怎么回事喽？？？
--------------------编程问答-------------------- 搜“RoboCopy” --------------------编程问答-------------------- 我只是想知道errorlevel一直是0的原因，再说robocopy还得另外配置robocopy.exe

补充：VB ,  基础类