标题: [在线求助]FOR语句中如何保存以变量名为文件名的文件 [打印本页]
作者: HUNRYBECKY 时间: 2007-3-16 02:08 标题: [在线求助]FOR语句中如何保存以变量名为文件名的文件
我设置了很多变量,在导出注册表时想以变量名为文件名来备份文件,如何实现,见下面的代码中的红色部分:
@ECHO OFF
SET PATH=%CD%\TOOLS;%PATH%
SET PPATH=D:\USERDATA
SET SF="HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders"
SET USF="HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders"
SET DSF="HKEY_USERS\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders"
SET DUSF="HKEY_USERS\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders"
SET UT="HKEY_CURRENT_USER\Environment"
SET DT="HKEY_USERS\.DEFAULT\Environment"
SET OEAB="HKEY_CURRENT_USER\Software\Microsoft\WAB\WAB4\Wab File Name"
SET OEMAIL="HKEY_CURRENT_USER\Identities\%OEUSERID%\Software\Microsoft\Outlook Express\5.0"
SET ST="HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment"
SET PF="HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Memory Management"
SET WP="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion"
IF NOT EXIST "%PPATH%\BACKUP\REGBAK\*.SVR" (FOR /D %%X IN (%SF% %USF% %DSF% %DUSF% %UT% %DT% %OEAB% %OEMAIL%) DO (ECHO REG EXPORT %%X 变量名.SVR && PAUSE)) && ECHO OK)
PAUSE
[ Last edited by HUNRYBECKY on 2007-3-16 at 02:09 AM ]
作者: HUNRYBECKY 时间: 2007-3-16 02:16
在先等待,希望高手出现...............
作者: lxmxn 时间: 2007-3-16 02:19
Try this batch script:
@ECHO OFF&SETLOCAL ENABLEDELAYEDEXPANSION
SET PATH=%CD%\TOOLS;%PATH%
SET PPATH=D:\USERDATA
SET SF="HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders"
SET USF="HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders"
SET DSF="HKEY_USERS\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders"
SET DUSF="HKEY_USERS\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders"
SET UT="HKEY_CURRENT_USER\Environment"
SET DT="HKEY_USERS\.DEFAULT\Environment"
SET OEAB="HKEY_CURRENT_USER\Software\Microsoft\WAB\WAB4\Wab File Name"
SET OEMAIL="HKEY_CURRENT_USER\Identities\%OEUSERID%\Software\Microsoft\Outlook Express\5.0"
SET ST="HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment"
SET PF="HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Memory Management"
SET WP="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion"
IF NOT EXIST "%PPATH%\BACKUP\REGBAK\*.SVR" (
FOR %%X IN (SF USF DSF DUSF UT DT OEAB OEMAIL) DO (
ECHO REG EXPORT !%%X! %%X.SVR && PAUSE)) && ECHO OK)
PAUSE
SET PATH=%CD%\TOOLS;%PATH%
SET PPATH=D:\USERDATA
SET SF="HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders"
SET USF="HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders"
SET DSF="HKEY_USERS\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders"
SET DUSF="HKEY_USERS\.DEFAULT\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders"
SET UT="HKEY_CURRENT_USER\Environment"
SET DT="HKEY_USERS\.DEFAULT\Environment"
SET OEAB="HKEY_CURRENT_USER\Software\Microsoft\WAB\WAB4\Wab File Name"
SET OEMAIL="HKEY_CURRENT_USER\Identities\%OEUSERID%\Software\Microsoft\Outlook Express\5.0"
SET ST="HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment"
SET PF="HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Memory Management"
SET WP="HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion"
IF NOT EXIST "%PPATH%\BACKUP\REGBAK\*.SVR" (
FOR %%X IN (SF USF DSF DUSF UT DT OEAB OEMAIL) DO (
ECHO REG EXPORT !%%X! %%X.SVR && PAUSE)) && ECHO OK)
PAUSE
作者: HUNRYBECKY 时间: 2007-3-16 02:22
谢谢lxmxn兄的回答,OK了，又是延迟变量的问题,我老是在这个上面犯错误.该长记性了.