比如:
Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long具体的请查一些关于API的书。
http://www.helpwork.net/book/html/user/index.asp
Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long具体的请查一些关于API的书。
http://www.helpwork.net/book/html/user/index.asp
用 C:\Windows\System\Regsvr32.exe FileName.dll /u 卸载.
ActiveX DLL才需要,方法用Sun_Jianhua(铁拳)的.
用API
先定义ShellExecute函数
再用
ShellExecute Me.Hwnd,"regsvr32.exe","c:\xxx.dll /s","",1
如果是调用api则: zyl910(910:分儿,我来了!) 说的对
REGEDIT4
[HKEY_CLASSES_ROOT\.ocx]
@="ocxfile"
[HKEY_CLASSES_ROOT\ocxfile]
@=”OCX”
[HKEY_CLASSES_ROOT\ocxfile\shell\Register\command]
@="RegSvr32 \"%1\""
[HKEY_CLASSES_ROOT\ocxfile\shell\Unregister\command]
@="RegSvr32 /u \"%1\""
REGEDIT4
[HKEY_CLASSES_ROOT\.dll]
@="dllfile"
[HKEY_CLASSES_ROOT\dllfile]
@=”DLL”
[HKEY_CLASSES_ROOT\dllfile\shell\Register\command]
@="RegSvr32 \"%1\""
[HKEY_CLASSES_ROOT\dllfile\shell\Unregister\command]
@="RegSvr32 /u \"%1\""