VB注册组件
比如我想注册D:\Program Files\ietool\abc.ocx
用vb怎么写呢?让他在注册的时候虽然成功注册,但不提示成功注册的对话框,
怎么能做到呢?
用以下方法中
如何把路径改为D:\Program Files\ietool\
Dim AA$,WinSys$
'winsys 是system32的路径,自己先赋值
'注册
AA = "Regsvr32.exe /s " & WinSys & "abc.ocx"
Call Shell(AA, vbHide)
'解除注册
AA = "regsvr32 -u /s " & WinSys & "abc.ocx"
Call Shell(AA, vbHide)
请高手给出源码。谢谢
/s 参数就是关闭提示,你要成功提示关闭此参数就是了.
先看完regsvr32 的命令参数再问吧.
每个导出COM对象的dll,ocx等实际上也是一个标准的dll,它们都导出了两个函数:DllRegisterServer ,DllUnregisterServer。一个用于注册,一个用于反注册.Regsvr32实际上就是调用的这些函数。所以在程序只需自已调用就行了
你的方法是正确的,不知道你还问什么?
保险的做法给路径加上引号。AA = "Regsvr32.exe /s " & chr(34) & WinSys & "abc.ocx" & chr(34)
相关问答:
在下是vb的新手,想写段程序,在vb中,使用wscript调用一些外部的命令,但是程序执行一直有错误,请各位高手帮忙解答下,谢谢。
代码如下:
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
帮我改改 我总觉得有问题
Type ID
number As Single
score As Integer
name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
i = 0
&nbs ......
为什么我用form.show和form.hide多次连接了两个窗口只能互换链接两次啊?
代码看看
照道理form.show 没次数限定的吧
我也快疯了。
楼主知道怎么发贴么?
引用
我也快疯了。
楼主知道怎么发贴么?
楼主也 ......
Private Sub btnPrint_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnPrint.Click
MouseWait()
Dim ClearTempTabelSQL As String
'If Not ......
我想把word另存为xml之后,用vb读取这个xml的内容,请问如何实现?
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......