UC知道我用这句话注册VB5STKIT.DLL，为什么提示我没有找到入口
来源：百度知道 编辑：UC知道 时间：2024/06/16 10:17:46
Private Sub Form_Load()
Dim TempFile() As Byte
TempFile = LoadResData(101, "CUSTOM")
Open "C:\Windows\SYSTEM32\VB5STKITT.DLL" For Binary Access Write As #1
Put #1, , TempFile
Close #1
Shell "regsvr32 C:\Windows\SYSTEM32\VB5STKITT.DLL"
End Sub
Dim TempFile() As Byte
TempFile = LoadResData(101, "CUSTOM")
Open "C:\Windows\SYSTEM32\VB5STKITT.DLL" For Binary Access Write As #1
Put #1, , TempFile
Close #1
Shell "regsvr32 C:\Windows\SYSTEM32\VB5STKITT.DLL"
End Sub
VB5STKIT.Dll是标准Dll，而不是ActiveX Dll，不需要注册
我的电脑上没有VB5STKIT.Dll，就去反汇编VB6STKIT.Dll，得到的输出函数清单如下：
_SetTime@8
AbortAction
AddActionNote
ChangeActionKey
CommitAction
DisableLogging
DLLSelfRegister
EnableLogging
ExtractFileFromCab
fCreateShellLink
fRemoveShellLink
fWithinAction
GetClsidFromActXFile
LogConfig
LogError
LogNote
LogWarning
NewAction
RegisterTLB
SyncShell
很明显，这是一个标准Dll
我也遇到这种问题，通常是你调用的动态链接库不存在（也许你路径错了）。