rem 强制删除共享,确保对库独占
net share XX库1 /delete /y
net share XX库2 /delete /y
rem SsPath 指定了SourceSafe安装目录下ssarc.exe和ssrestor.exe所在路径
set SsPath="C:\Program Files\Microsoft Visual SourceSafe\"
rem BakPath指定了备份文件存放的路径
set BakPath=I:\VssSrcBak\
rem 备份某库中某项目,特别注意ssa文件不能超过2GB
rem ssarc [-C][-D][-I-][-O][-S][-V][-X][-Y] <archive file to create> <files/projects to archive> 参见VSS联机帮助和Dos批处理
%SsPath%ssarc.exe -D- -SG:\VSS2\XX库1,data -I- -Yadmin,XXXXXX -O@"%BakPath%Backup_output(%DATE:~,10%).log" "%BakPath%Backup_Database(%DATE:~,10%).ssa" $/XX项目
rem 还原项目到另一个库
rem ssrestor [-C][-I-][-L][-O][-P<project>][-S][-T][-X][-Y]<archive file to restore>[files/projects]
%SsPath%ssrestor.exe -sG:\VSS2\XX库2,data -i- -yadmin,XXXXXX -o@"%BakPath%Restore_output(%DATE:~,10%).log" "%BakPath%Backup_Database(%DATE:~,10%).ssa" $/XX项目
rem 重命名库名
cd G:\VSS2
G:
rename XX库1 XX库1_old
rename XX库2 XX库1
rem 启用共享
net share XX库1=G:\VSS2\XX库1 /grant:everyone,change