獲得系統資訊—使用者名稱稱.電腦名稱,作業系統名稱
來源:互聯網
上載者:User
//獲得使用者名稱稱
UpdateData();
char username[MAX_PATH];
CString strusername;
DWORD Size=MAX_PATH;
::GetUserName(username,&Size);
strusername.Format("%s",username);
m_username=strusername;
UpdateData(false);
//----------------------------------------------------------------
//獲得電腦名稱
UpdateData();
char computername[MAX_PATH];
CString strcomputerusername;
DWORD Size1=MAX_PATH;
::GetComputerName(computername,&Size1);
strcomputerusername.Format("%s",computername);
m_computername=strcomputerusername;
UpdateData(false);
//----------------------------------------------------------------
//獲得電腦作業系統名稱
UpdateData();
HKEY hKey;
LPCTSTR StrKey="Software\\Microsoft\\Windows NT\\CurrentVersion";
if(ERROR_SUCCESS==::RegOpenKeyEx(HKEY_LOCAL_MACHINE,StrKey,NULL,KEY_ALL_ACCESS,&hKey))
{
DWORD dwsize=225,dwType=REG_SZ;
char String[50];//電腦作業系統名稱
char String1[20];//電腦作業系統版本號碼
//char String2[256];//電腦作業系統版本名稱
LPCSTR KeyValue="ProductName";//電腦作業系統名稱
LPCSTR KeyValue1="CurrentVersion";//電腦作業系統版本號碼
//LPCSTR KeyValue2="CurrentBuildName";//電腦作業系統版本名稱
if((ERROR_SUCCESS==::RegQueryValueEx(hKey,KeyValue,0,&dwType,(BYTE *)String,&dwsize))&&(ERROR_SUCCESS==::RegQueryValueEx(hKey,KeyValue1,0,&dwType,(BYTE *)String1,&dwsize))/*||(ERROR_SUCCESS==::RegQueryValueEx(hKey,KeyValue2,0,&dwType,(BYTE *)String2,&dwsize))*/)
{
CString strdata=String;//電腦作業系統名稱
CString strdata1=String1;//電腦作業系統版本號碼
//CString strdata2=String2;//電腦作業系統版本名稱
m_winsysname=strdata+" "+strdata1;//+" "+strdata2;
}
::RegCloseKey(hKey);
}
UpdateData(false);