计算机二级VB编程应用：用Winrar压缩文件[1]

有些数据库文件(如access文件)在远程传输时，由于文件较大，可能会影响传输效果。如果压缩后再传输，会减少传输时间，避免事故，保证传输效果。我们压缩文件时，最常用的压缩工具是winrar和winzip。在vb编程中，作者使用winrar工具压缩数据库文件，完成远程传输，非常方便。下面简单介绍一下。winzip的方法类似。

首先，外壳函数

shell函数是vb中的一个内部函数。它负责执行一个可执行文件，并返回一个variant(double)。如果成功，则表示该程序的进程id。如果不成功，它将返回0。

shell的语法:shell(路径名[，windowstyle])。

Pathname是必需的参数。类型字符串，它指示要执行的程序的名称，以及任何必需的参数或命令行变量，包括路径名。

Windowstyle是可选参数。整数类型，指定程序运行时窗口的样式。Windowstyle具有以下值。

常量值描述

vbhide 0窗口被隐藏，焦点移到隐式窗口。

vbalfocus1窗口具有焦点，并将恢复到其原始大小和位置。

vbminimizedfocus 2窗口将显示一个带有焦点的图标(默认值)。

vbizedfocus3窗口是一个焦点窗口。

vbnormalnofocus 4窗口将恢复到最近使用的大小和位置，而当前活动窗口将保持活动状态。

vbminimizednofocus 6窗口将显示一个图标，而当前活动窗口将保持活动状态。

二、关于winrar的用法

本文主要介绍如何在winrar中用命令行压缩和解压缩文件。

压缩:winrar a[-switches][files][@ filelists]

比如想把try.mdb压缩到c盘，可以winrar a c:/try.rar c:/try.mdb。

解压:如果你用目录解压

winrar x[-开关] [文件][@文件列表][目标文件夹/]

如果当前目录被解压缩，即在解压缩过程中不写入目录名

winrar e[-开关] [文件][@文件列表][目标文件夹/]

比如想把try.rar解压到c盘，可以winrar x C:/try . rar C:/try . MDB