下载的 .ocx 控件如何安装到 windows 注册使用?

解决方案 »

  1.   


    注册:regsvr32   *.ocx
    这里的文件名要使用全局路径注销:regsvr32 /u *.ocx
      

  2.   

    上面思维老兄说的没错
      相应的文件在windows\system 下
      

  3.   

    VB编程动态注册ActiveX控件
        在使用VB和其它一些Win9X下的编程软件,就要同ActiveX控件打交道,注册
    和反注册控件是一件令人很头疼的事情。有时从网上下载了一个控件,但是在使用
    时VB总是提示控件没有注册。又或者想删除一个控件却无法从注册中抹去。
        实际上,每一个ActiveX控件都有两个输出函数:DllRegisterServer和
    DllUnRegisterServer。顾名思义,通过这两个函数就可以注册和反注册控件了,
    下面通过程序说明如何通过编程来注册。
        首先在Form中加入两个CommandButton,不要改变它们的属性。然后在Form中
    加入如下代码:
    Private Declare Function RegComCtl32 Lib "ComCtl32.OCX" _
            Alias "DllRegisterServer" () As Long
    Private Declare Function UnRegComCtl32 Lib "ComCtl32.OCX" _
            Alias "DllUnregisterServer" () As Long
    Private Declare Function FormatMessage Lib "kernel32" _
            Alias "FormatMessageA" (ByVal dwFlags As Long, _
            lpSource As Any, ByVal dwMessageId As Long, _
            ByVal dwLanguageId As Long, ByVal lpBuffer _
            As String, ByVal nSize As Long, Arguments As _
            Long) As Long
    Private Declare Function GetLastError Lib "kernel32" () As LongConst ERROR_SUCCESS = &H0Private Sub Command1_Click()
        Dim astr As String
        
        '反注册ComCtl32.Ocx
        If RegComCtl32 = ERROR_SUCCESS Then
            MsgBox "注册成功"
        Else
            astr = String$(256, 20)
            FormatMessage FORMAT_MESSAGE_FROM_SYSTEM Or _
                FORMAT_MESSAGE_IGNORE_INSERTS, 0&, GetLastError, _
                0&, astr, Len(astr), ByVal 0
            MsgBox astr
        End If
    End Sub