vb 控件开发笔记
项目需要使用一些本地控件，所以这几天又折腾把以前的vb拿出来，做一个空间的例子。vb制作控件很简单，这里也不再多说，我开发的控件名称叫做test.ocx发布好，会生成相应的test.cab和test.hmtl测试页面。
?
我要把这个控件发布的web工程中
?
1，首先复制cab到web目录下，然后再页面中添加控件信息，如下图，
<!--如果这页上的任何控件需要授权，您必须创建一个授权包文件。 运行 LPK_TOOL.EXE 来创建要求的 LPK 文件。 LPK_TOOL.EXE 将从 ActiveX SDK 中找到，http://www.microsoft.com/intdev/sdk/sdk.htm. 如果您有 VisualBasic 6.0 CD, 您可以在\Tools\LPK_TOOL 目录下找到它。下面是对象标记的例子：<OBJECT CLASSID="clsid:5220cb21-c88d-11cf-b347-00aa00a28331"><PARAM NAME="LPKPath" VALUE="LPKfilename.LPK"></OBJECT>--><OBJECT ID="test"CLASSID="CLSID:7E0ED402-E1D4-4E40-95C2-FEA17B4FA60E"CODEBASE="test.CAB#version=1,0,0,1"></OBJECT>
?其中上面注释掉的lpk这段根据他的描述生成了相应的lpk文件，将代码放到jsp页面中，部署。
?
2，部署后查看测试效果，但是效果不尽如人意，提示“非安全控件”而且也无法安装，这是由于控件没有认证，认证还是需要花钱的，自然不行。
?
3，只能通过本地注册控件的方式，这样就不需要ie的认证，但是控件提示的信息也是“无法识别的控件”。
4，使用installshield9来制作客户端注册包，具体的不说了只要注意一个个问题。注册控件的脚步
?
function OnEnd() string szDLL, szReg, szCmd; begin szReg = WINSYSDIR ^ "regsvr32.exe"; szDLL = TARGETDIR ^ "test.ocx"; //如果是MSI工程，可以用INSTALLDIR代替TARGETDIR szCmd = "/s "" + szDLL + """; //增加静默参数s, 增加 \” 防止目录路径含空格的情况。 if (!REMOVEONLY) then LaunchAppAndWait(szReg, szCmd, WAIT); endif; end;
?
这样注册后，客户端使用就不会有提示，我上面提到了，我自己生成了lpk文件，我也加到页面中了。
<OBJECT CLASSID="clsid:5220cb21-c88d-11cf-b347-00aa00a28331"><PARAM NAME="LPKPath" VALUE="LPKfilename.LPK"></OBJECT>
?
但是如果加这句虽然控件可以使用，但是总会有安全提示，很影响使用效果。所以暂时把它去掉了。
?
