摘要：通过该方法的应用，可以把数据库及有关文件压缩到含有空格的文件夹中，并且解决了由于Windows的并行性处理而引发的一系列问题。关键字：Winrar路径空格
Winrar是目前比较流行的高压缩率的压缩软件，有关它的使用报道文章也比较多，但他们都没能解决如‘压缩文件的路径名含有空格的等难题。本人在开发《军械管理系统》课题期间，因为前台是VisualBasic、后台采用的是Access数据库，要求把数据库随时备份到硬盘的‘c:\ProgramFiles文件夹下，这样用通常的办法就不能进行恢复。经过分析，已经研究出解决的办法，下面作一介绍，以便同行借鉴。

1.解决空格的问题

在上面的表单中，如果按所选择的路径进行备份操作，将出现找不到文件的错误信息。解决方法是必须在未压缩之前用MkDir在硬盘的根目录中建立一个临时的文件夹，把要操作的数据库用FileCopy函数拷贝到临时的文件夹中，在这里进行文件的压缩工作，之后再拷贝到"c:\ProgramFiles"的文件夹中，具体程序如下：
1．1备份操作
tdir="c:\temppath"临时路径名
MkDir(tdir)创建临时路径
FileCopyApp.Path&"\jxgl.mdb",tdir&"\jxgl.mdb"把文件从默认路径中拷到所创建的临时文件夹里
Rarexe=App.Path&"\winrar.exe"
src=tdir&"\jxgl.mdb"
des=tdir&"\jxgl.rar"
FileString=Rarexe&"a-ep"&des&""&src
Result=Shell(FileString,vbHide)在临时的文件夹中完成压缩的任务
IfErr.Number<>0Then
MsgBox"无法压缩数据库："&Err.Description,vbCritical
ExitSub
FileCopytdir&"\jxgl.rar","c:\ProgramFiles\jxgl.rar"从临时文件夹中再拷到所填写的"c:\ProgramFiles"里
1．2恢复操作
tdir="c:\temppath"临时路径名
MkDir(tdir)创建临时路径
FileCopy"c:\ProgramFiles\jxgl.rar",tdir&"\jxgl.rar"从"c:\ProgramFiles"中把要恢复的压缩文件拷贝到临时文件夹中

Rarexe=App.Path&"\winrar.exe"
des=tdir
src=tdir&"\jxgl.rar"
FileString=Rarexe&"x-ep"&src&""&"jxgl.mdb"&""&des
Result=Shell(FileString,vbHide)在临时的文件夹中完成解包的任务
IfErr.Number<>0Then
MsgBox"无法解开数据库："&Err.Description,vbCritical
ExitSub
FileCopytdir&"\jxgl.mdb","c:\ProgramFiles\mdb.rar"从临时文件夹中再拷到所填写的"c:\ProgramFiles"里

2.解决数据库恢复出错的问题
Windows操作系统的一大特点就是进程的并行性，也就是在前一个任务未执行完之前，下一个任务已经开始执行，这有益于提高计算机的执行速度，但也存在着隐患。我们在数据库恢复时就遇到了此类问题。
例如：Winrarxa:\jxgl.rarjxgl.mdbc:\jxgl
FileCopy"c:\jxgl\jxgl.mdb","c:\ProgramFiles\jxgl.mdb"
上面这两条命令行在PII/766计算机上执行没有任何问题，但在C/366计算机上执行就出现了找不到"c:\jxgl\jxgl.mdb"的错误，经过大家的仔细分析，问题出在"进程的并行性"上。为了保障第二条命令的正常进行，必须使第一条命令执行完，由此我们通过增加预留时间解决了该问题，方法如下：
Winrarxa:\jxgl.rarjxgl.mdbc:\jxgl
tt=Timer取得机器的当前时间
DoWhilett>Timer-0.5延迟0.5秒
Loop
FileCopy"c:\jxgl\jxgl.mdb","c:\ProgramFiles\jxgl.mdb"
3．结束语
以上两种问题的解决办法未曾见到有关的报道，希望本文能对同行在软件设计时，在数据库的压缩过程中有所帮助。
参考文献：
谢东主编．VisualBasic开发多媒体应用程序．北京：清华大学出版社

作者姓名：李伟春
职称：高级工程师
工作单位：公安海警高等专科学校计算机教研室
通信地址：浙江省宁波市北仑区公安海警高等专科学校计算机教研室
邮政编码：315801

作者姓名：金梅
职称：主治医师
工作单位：宁波市第六人民医院内科
通信地址：浙江省宁波市第六人民医院内科
邮政编码：315040