如何调用 DLL文件？
有一个bd.dll文件，是获取硬盘物理系列号的动态连接库
VB6.0是这样调用的：
'先引用bd.dll (HardDiskID)
Private Sub Command1_Click()
dim h as bd
dim hd_sn as string
set h=new bd
hd_sn=h.GetID(0)
text1.text="硬盘物理系列号是:" & hd_sn
End Sub
PB如何调用这个BD.DLL呢?(获取硬盘系列号,以便加密)
问题点数：20、回复次数：5Top
1 楼xiao_bai（小白）回复于 2005-04-03 15:31:28 得分 0
你给的是VB中一个按钮的代码,估计GETID函数是获得序列号的。你应该先知道函数是怎么定义的Top
2 楼jxgzam（jxgzam）回复于 2005-04-03 15:55:18 得分 0
bd.dll是下载的，获取硬盘物理系列号（而不是API 的 GetVolumeInformation,物理系列号是不被格式化檫写的）
我不知道怎样定义的。但我想在PB中得到硬盘物理系列号。
当然我可以先用VB编写一个EXE程序，将系列号写进数据表中，用RUN 运行，再用VB读表的值。
但我想PB直接得到。
Top
3 楼tmxkdldw（tmxkdldw）回复于 2005-04-03 18:13:11 得分 0
upTop
4 楼jxgzam（jxgzam）回复于 2005-04-03 19:46:52 得分 0
通过网上搜索，已经解决了。可以用PB获取硬盘物理系列号！
bd.dll不能在PB下使用，下载了另一个 diskser.dll
http://www.kejx.com/bbs/printpage.asp?BoardID=2&ID=15624
声明方法：
FUNCTION string GetDiskSER() LIBRARY "diskser.dll"
示例：
MessageBox('',GetDiskSER())
Top
5 楼jxgzay（jxgzay）回复于 2005-04-21 07:20:35 得分 20
自己解决Top
