
char buff[1024]
typedef int (WINAPI ICEPUB_MACHINEGETINFO)(int typeFlag,char *strInfo)
ICEPUB_MACHINEGETINFO *icePub_machineGetInfo = 0
HINSTANCE hDLLDrv = LoadLibrary("icePubDll.dll")
if(hDLLDrv)
{
icePub_machineGetInfo = (ICEPUB_MACHINEGETINFO *)GetProcAddress(hDLLDrv, "icePub_machineGetInfo")
}
UpdateData(TRUE)
icePub_machineGetInfo(1,buff)
str1=buff//mac
icePub_machineGetInfo(2,buff)
str1=str1+buff//cpu
icePub_machineGetInfo(3,buff)
str1=str1+buff//harddisk
icePub_machineGetInfo(4,buff)
str1=str1+buff//memery
icePub_machineGetInfo(5,buff)
str1=str1+buff//boarddate
AfxMessageBox(str1)
//md5到处是坦孙搭代码,搜一下即可
VB版凯迹调用:
Private Declare Function icePub_machineGetInfo Lib "icePubDll.dll"让拿 (ByVal typeFlag As Integer, ByVal strInfo As String) As Integer
Dim str1 As String
Dim a2 As Integer
str1 = Space(1024*10)
a2 = icePub_machineGetInfo(1, str1)
MsgBox "mac:" + str1
a2 = icePub_machineGetInfo(2, str1)
MsgBox "cpu:" + str1
a2 = icePub_machineGetInfo(3, str1)
MsgBox "harddisk:" + str1
a2 = icePub_machineGetInfo(4, str1)
MsgBox "memery:" + str1
a2 = icePub_machineGetInfo(5, str1)
MsgBox "boarddate:" + str1
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)