网络编程 | 站长之家 | 网页制作 | 图形图象 | 操作系统 | 冲浪宝典 | 软件教学 | 网络办公 | 邮件系统 | 网络安全 | 认证考试 | 系统进程
Firefox | IE | Maxthon | 迅雷 | 电驴 | BitComet | FlashGet | QQ | QQ空间 | Vista | 输入法 | Ghost | Word | Excel | wps | Powerpoint
asp | .net | php | jsp | Sql | c# | Ajax | xml | Dreamweaver | FrontPages | Javascript | css | photoshop | fireworks | Flash | Cad | Discuz!
当前位置 > 网站建设学院 > 网络编程 > Visual Basic
Tag:注入,存储过程,分页,安全,优化,xmlhttp,fso,jmail,application,session,防盗链,stream,无组件,组件,md5,乱码,缓存,加密,验证码,算法,cookies,ubb,正则表达式,水印,索引,日志,压缩,base64,url重写,上传,控件,Web.config,JDBC,函数,内存,PDF,迁移,结构,破解,编译,配置,进程,分词,IIS,Apache,Tomcat,phpmyadmin,Gzip,触发器,socket
网络编程:ASP教程,ASP.NET教程,PHP教程,JSP教程,C#教程,数据库,XML教程,Ajax,Java,Perl,Shell,VB教程,Delphi,C/C++教程,软件工程,J2EE/J2ME,移动开发
本月文章推荐
.用VB设计聚焦框程序.
.呼叫子程序(Subroutine).
.VisualBasic安装程序的制作.
..NET和VB编程创建SQLServer.
.巧用CLIPBOARD建立图像数据库.
.VisualBasic工具栏、对话框二.
.利用VB产生屏幕变暗的效果.
.利用Api函数计算Windows从启动后.
.在VB中用API实现多媒体.
.如何调用chm格式的帮助文件.
.VB图像处理之图像的色彩纠正.
.用VB实现浮动按钮.
.VB调用IMAGE控件实现图像缩放的一.
.VisualBasic工程管理二.
.利用VB设计聊天室.
.VisualBasicCOM基础讲座之事件.
.读取和修改Windows注册表.
.统计VB程序的运行.
.在VB5.0中编辑数据库和电子表格.
.VB开发技巧三则.

如何备份(恢复)存储路径含有空格的压缩文件

发表日期:2006-2-27


摘要:通过该方法的应用,可以把数据库及有关文件压缩到含有空格的文件夹中,并且解决了由于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

->

上一篇:用VB作浮动式图标提示按钮 人气:3894
下一篇:比较两个文件 人气:4338
浏览全部Visual Basic的内容 Dreamweaver插件下载 网页广告代码 祝你圣诞节快乐 2009年新年快乐