- 论坛徽章:
- 0
|
现在有一个VB写的com组件,已经编译成dll(hh.dll),用VB调用了dll中的函数已经成功,现在我需要用C语言调用该dll中的函数,但是,由于这是第一次这么做,我试着去做,没有成功,特来请教。用VB调用dll中函数如下:
Dim objUMU
Dim strHash
Dim strURL
Set objUMU = CreateObject("UMU.UrlGenerator")
strHash = InputBox("请输入散列值:", "输入 Hash(40个字节) 值", "444f50950256e66f128d528d0773fdefbc298cce")
If Len(strHash) <> 40 Then
WScript.Quit
End If
strURL = "info_hash=" & strHash & "&key=" & objUMU.GenBitCometTorrentKey(strHash)
Set objUMU = Nothing
If Not IsEmpty(InputBox("生成的结果如下:", "结果", strURL)) Then
Dim objWSH
Set objWSH = CreateObject("Wscript.Shell")
objWSH.Run strURL
Set objWSH = Nothing
End If
请帮帮忙,谢谢。。。。
|
|