Office中国论坛/Access中国论坛

标题: 请教大虾如何能让上面获取硬盘序列号的代码可用 [打印本页]

作者: dhwx    时间: 2003-7-4 06:19
标题: 请教大虾如何能让上面获取硬盘序列号的代码可用

'**************************** 获取硬盘序列号
'1
'Dim sa As String
   ' sa = CurrentProject.Path & HDSerialNumRead.dll
'Private Declare Function HDSerialNumRead Lib "sa" () As String

'2
'Private Declare Function HDSerialNumRead Lib "CurrentProject.Path & \HDSerialNumRead.dll" () As String


'请教大虾如何能让上面获取硬盘序列号的代码可用,只须把HDSerialNumRead.dll要放在数据库的相同目录就行。谢谢!!!!

'1
'HDSerialNumRead.dll要指定放在E:\注册\FFF\ 目录里。
'Private Declare Function HDSerialNumRead Lib "E:\注册\FFF\HDSerialNumRead.dll" () As String

'2
' HDSerialNumRead.dll要放在c:\windows\ 系统目录里。
Private Declare Function HDSerialNumRead Lib "HDSerialNumRead.dll" () As String




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3