在程序中自己用函数注册activex dll.txt

VB技巧问答10000例 VB技巧问答10000例

注册ActiveX DLL和ActiveX控件，实际上是调用该DLL中的DllRegisterServer函数。
    由于VB使用Declare语句所调用的DLL的名字必须在设计时确定，所以使用VB，你只能注册事先知道名字的DLL，而无法编写软件来完全替代RegSvr32的。如果要实现类似RegSvr32的功能，有两个办法： 
    1、使用C++，利用API函数LoadLibrary和GetProcAddress来实现调用任意ActiveX DLL中的DllRegisterServer函数。 
    2、调用vb6STKIT.DLL中的DLLSelfRegister函数。该函数定义： 
    Private Declare Function DLLSelfRegister Lib "vb6STKIT.DLL" (ByVal lpDllName As String) As Integer 
    调用时：DLLSelfRegister "Comdlg32.ocx" 
<END>