用VB将第三方控件打成CAB包（在WEB页面上使用）

本文链接：https://blog.csdn.net/yugui/article/details/649571

用VB将第三方控件打成CAB包（在WEB页面上使用）
由于工作的需要，笔者需要在WEB页面上显示CAD文件（在客户机器上不装CAD）。由于时间紧迫，现写控件根本来不及，没办法在网上搜寻了一圈。找到了一个软件，大小大概有8兆左右。可以用来浏览DWG类型的文件。用了一下，发现其用的是一个DLL类型的控件，并带有两个附属的DLL文件。

如果要在WEB页面上使用控件，则控件需要打成CAB类型的包。上网找了一个打CAB包的工具，名字叫IExpress。不过如果用这个工具打包需要手工编写INF文件，INF文件的结构比较复杂，手工编写容易出现错误。想了一下，觉得VB自带的打包工具可以制作CAB文件包。不过VB的打包工具开始必须选择一个VB的工程。所以用VB建了一个跟控件名称一样的工程，编译了一下，然后用VB自带的工具进行打包，打包的类型选择Internet类型的安装包。到选择文件这一步的时候，要将多余的文件去掉，因为这个第三方控件不是VB编写的，所以根本不用带VB的运行库。将第三方控件的主控件DLL和两个附属的DLL都加到包中，然后开始打包。

包打完之后写了个测试页，在本机上试了一下没有问题（因为本机已经安装了控件），所以在其他的机器上测试了一下，不能正常安装控件，页面上显示一个红叉。查看IE临时文件夹下的控件安装日志文件，内容显示控件不能正常注册。到网上查找了一些资料，没有找到原因。后来用VC自带的Dependency Walker工具查看了一下控件的DLL，发现里边还包含了另外三个DLL，分别为：msvcr71.dll、msvcp71.dll、mfc71.dll。将这三个文件也加进了包里，测试之后，一切正常。

在WEB页面上使用控件的脚本如下：

<HTML>

<HEAD>

<TITLE>BravaACX.CAB</TITLE>

</HEAD>

<BODY>



<OBJECT ID="ctlBravaACXView" CLASSID="CLSID:1BE73243-A85F-4385-939D-14D4845A286A"

CODEBASE="BravaACX.CAB#version=5,1,0,5" width="60%" height="60%">

<param name="Filename" value="db_samp.dwg">

</OBJECT>

</BODY>

</HTML>

打包CAB控件的INF文件内容为：

;BravaACX.OCX 的 INF 文件

;DestDir 可以为 10 则在 Windows 目录，为 11 则在 Windows/System(32) 目录，或为空则在 Occache 目录。

[version]

signature="$CHICAGO$"

AdvancedINF=2.0

[DefaultInstall]

CopyFiles=install.files

RegisterOCXs=RegisterFiles

[RInstallApplicationFiles]

CopyFiles=install.files

RegisterOCXs=RegisterFiles

[DestinationDirs]

install.files=11

[SourceDisksNames]

1=%DiskName%,BravaACX.CAB,1

[Add.Code]

BravaACX.dll=BravaACX.dll

Autorec.dll=Autorec.dll

BACXView.ini=BACXView.ini

Dwg2DL.dll=Dwg2DL.dll

myrdrv.ini=myrdrv.ini

MFC71.dll=MFC71.dll

msvcr71.dll=msvcr71.dll

msvcp71.dll=msvcp71.dll

[install.files]

BravaACX.dll=BravaACX.dll

Autorec.dll=Autorec.dll

BACXView.ini=BACXView.ini

Dwg2DL.dll=Dwg2DL.dll

myrdrv.ini=myrdrv.ini

MFC71.dll=MFC71.dll

msvcr71.dll=msvcr71.dll

msvcp71.dll=msvcp71.dll

[SourceDisksFiles]

BravaACX.dll=1

Autorec.dll=1

BACXView.ini=1

Dwg2DL.dll=1

myrdrv.ini=1

MFC71.dll=1

msvcr71.dll=1

msvcp71.dll=1

[BravaACX.dll]

file-win32-x86=thiscab

RegisterServer=yes

clsid={1BE73243-A85F-4385-939D-14D4845A286A}

DestDir=11

FileVersion=5,1,0,5

[Autorec.dll]

file-win32-x86=thiscab

RegisterServer=no

DestDir=11

FileVersion=1,3,0,43

[BACXView.ini]

file-win32-x86=thiscab

RegisterServer=no

DestDir=11

FileVersion=0,0,0,0

[Dwg2DL.dll]

file-win32-x86=thiscab

RegisterServer=no

DestDir=11

FileVersion=1,3,0,47

[myrdrv.ini]

file-win32-x86=thiscab

RegisterServer=no

DestDir=11

FileVersion=0,0,0,0

[MFC71.dll]

file-win32-x86=thiscab

RegisterServer=no

DestDir=11

FileVersion=7,10,3077,0

[msvcr71.dll]

file-win32-x86=thiscab

RegisterServer=no

DestDir=11

FileVersion=7,10,3052,4

[msvcp71.dll]

file-win32-x86=thiscab

RegisterServer=no

DestDir=11

FileVersion=7,10,3077,0

[RegisterFiles]

%11%/BravaACX.dll