为什么我使用GUID获取网卡地址，每次得到的结果都不一样？

Question

procedure TForm1.Button3Click(Sender: TObject);
  var
    GUID:TGUID;
    WCLID:array[0..127] of WideChar;
    Start:integer;
begin
    coCreateGUID(GUID);
    StringFromGuid2(GUID,WCLID,SizeOf(WCLID) div 2);    edit1.Text:=WideCharToString(WCLID);
    start:=Length(edit1.Text)-12;
    edit2.Text:=copy(edit1.text,start,12);end;

Answer 1

以下为本人猜想,无从验证:GUID只是把网卡作为生成随机数的因子,这个生成过程应该是不可逆的吧,所以应该是得不到你要的结果的.

Answer 2

每次生成的GUID 都肯定是不一样的啊，你真以为GUID 就是网卡地址啊？GUID 的生成算法本身就是设计来生成全局唯一标识的，也就是说，它的设计目的就是让地球上任何两个程序员在任意时候生成的GUID 都不同，这正是它被当成COM接口的标识的原因。生成GUID 的因子包括网卡序列号，也包括当时的时间。

Answer 3

可是书上说可以通过GUID，来得到网卡的MAC地址？
难道网卡的MAC地址也会变？？
所以我想应该是一样的值呀：）

Answer 4

网卡的MAC 不会变，但是用CoCreateGUID 取得的GUID 是一定会变的啊！你那本书上是怎么说的哦？你理解错了吧？

Answer 5

书上说GUID最后的12位就是网卡的MAC地址：（

Answer 6

取得系统中网卡MAC地址的三种方法 
     
 
做好的程序员一如做人。多看多想或许他山之石可以攻玉，但永远不要成为代码的奴隶。 CKER 
原著：Borland 
Translated by CKER 第一种方法使用Microsoft的Netbios API。 这是一套通过Winsock提供底层网络支持的命令。使用Netbios的最大缺点是您必须在系统中安装了Netbios服务(如果您在windows网络中启用了文件共享的话，这就不是问题了)。除此此外，这种方法又快又准确。 Netbios API只包括了一个函数，就叫做Netbios。这个函数使用网络控制块(network control block)结构作为参数，这个结构告诉函数要做什么。结构的定义如下： 
typedef struct _NCB { 
UCHAR ncb_command; 
UCHAR ncb_retcode; 
UCHAR ncb_lsn; 
UCHAR ncb_num; 
PUCHAR ncb_buffer; 
WORD ncb_length; 
UCHAR ncb_callname[NCBNAMSZ]; 
UCHAR ncb_name[NCBNAMSZ]; 
UCHAR ncb_rto; 
UCHAR ncb_sto; 
void (CALLBACK *ncb_post) (struct _NCB *); 
UCHAR ncb_lana_num; 
UCHAR ncb_cmd_cplt; 
#ifdef _WIN64 
UCHAR ncb_reserve[18]; 
#else 
UCHAR ncb_reserve[10]; 
#endif 
HANDLE ncb_event; 
} NCB, *PNCB; 重点在于ncb_command 成员。这个成员告诉Netbios该作什么。我们使用三个命令来探测MAC地址。他们在MSDN的定义如下： 
命令描述： 
NCBENUM Windows NT/2000: 列举系统中网卡的数量。使用此命令后，ncb_buffer成员指向由LANA_ENUM结构填充的缓冲区。 
NCBENUM 不是标准的 NetBIOS 3.0 命令。 NCBRESET 重置网卡。网卡在接受新的NCB命令之前必须重置。 
NCBASTAT 接受本地或远程接口卡的状态。使用此命令后，ncb_buffer成员指向由ADAPTER_STATUS结构填充的缓冲区，随后是NAME_BUFFER结构的数组。 下面就是取得您系统MAC地址的步骤： 
1》列举所有的接口卡。 
2》重置每块卡以取得它的正确信息。 
3》查询接口卡，取得MAC地址并生成标准的冒号分隔格式。 下面就是实例源程序。 
netbios.cpp #include <windows.h> 
#include <stdlib.h> 
#include <stdio.h> 
#include <iostream> 
#include <string> using namespace std; 
#define bzero(thing,sz) memset(thing,0,sz) bool GetAdapterInfo(int adapter_num, string &mac_addr) 
{ 
// 重置网卡，以便我们可以查询 
NCB Ncb; 
memset(&Ncb, 0, sizeof(Ncb)); 
Ncb.ncb_command = NCBRESET; 
Ncb.ncb_lana_num = adapter_num; 
if (Netbios(&Ncb) != NRC_GOODRET) { 
mac_addr = "bad (NCBRESET): "; 
mac_addr += string(Ncb.ncb_retcode); 
return false; 
} // 准备取得接口卡的状态块 
bzero(&Ncb,sizeof(Ncb); 
Ncb.ncb_command = NCBASTAT; 
Ncb.ncb_lana_num = adapter_num; 
strcpy((char *) Ncb.ncb_callname, "*"); 
struct ASTAT 
{ 
ADAPTER_STATUS adapt; 
NAME_BUFFER NameBuff[30]; 
} Adapter; 
bzero(&Adapter,sizeof(Adapter)); 
Ncb.ncb_buffer = (unsigned char *)&Adapter; 
Ncb.ncb_length = sizeof(Adapter); // 取得网卡的信息，并且如果网卡正常工作的话，返回标准的冒号分隔格式。 
if (Netbios(&Ncb) == 0) 
{ 
char acMAC[18]; 
sprintf(acMAC, "%02X:%02X:%02X:%02X:%02X:%02X", 
int (Adapter.adapt.adapter_address[0]), 
int (Adapter.adapt.adapter_address[1]), 
int (Adapter.adapt.adapter_address[2]), 
int (Adapter.adapt.adapter_address[3]), 
int (Adapter.adapt.adapter_address[4]), 
int (Adapter.adapt.adapter_address[5])); 
mac_addr = acMAC; 
return true; 
} 
else 
{ 
mac_addr = "bad (NCBASTAT): "; 
mac_addr += string(Ncb.ncb_retcode); 
return false; 
} 
} int main() 
{ 
// 取得网卡列表 
LANA_ENUM AdapterList; 
NCB Ncb; 
memset(&Ncb, 0, sizeof(NCB)); 
Ncb.ncb_command = NCBENUM; 
Ncb.ncb_buffer = (unsigned char *)&AdapterList; 
Ncb.ncb_length = sizeof(AdapterList); 
Netbios(&Ncb); // 取得本地以太网卡的地址 
string mac_addr; 
for (int i = 0; i < AdapterList.length - 1; ++i) 
{ 
if (GetAdapterInfo(AdapterList.lana[i], mac_addr)) 
{ 
cout << "Adapter " << int (AdapterList.lana[i]) << 
"“s MAC is " << mac_addr << endl; 
} 
else 
{ 
cerr << "Failed to get MAC address! Do you" << endl; 
cerr << "have the NetBIOS protocol installed?" << endl; 
break; 
} 
} return 0; 
} 
file://---------------------------------------------------------------------------

Answer 7

var
  NCB:TNCB;
  ADAPTER:TADAPTERSTATUS;
  LANAENUM:TLANAENUM;
  intIdx:integer;
  re:char;
  buf:string;
begin
  try
    //Reset adapter
    zeromemory(@NCB,SizeOf(NCB));
    ncb.ncb_command:=CHR(ncbreset);
    NCB.ncb_lana_num :=LANAENUM.lana[0];
    re:=NetBios(@NCB);
    IF Ord(re)<>0 then
      exit;    //Get adapter address
    ZeroMemory(@NCB,SizeOf(NCB));
    NCB.ncb_command:=chr(NCBASTAT);
    NCB.ncb_lana_num :=LANAENUM.lana[0];
    strPCopy(NCB.ncb_callname,'*');
    NCB.ncb_buffer :=@adapter;
    NCB.ncb_length :=SizeOf(ADAPTER);
    re:=NetBios(@NCB);
    IF Ord(re)<>0 then
      exit;    buf:='';
    for intIdx:=0 to 5 do
      buf:=buf+InttoHex(integer(ADAPTER.adapter_address[intIdx]),2)+'-';
    edit1.Text :=copy(buf,0,length(buf)-1);
  finally
  end;
end;
我发现用这样取得的才是跟用IPConfig/all命令查到的MAC一致，这是用NetBios来取得的，别忘了引用nb30单元哦

Answer 8

好家伙，总算有新的回贴了。且让我把那篇文章贴完^_^第二种方法－使用COM GUID API 
这种方法使用COM API创建一个GUID(全局唯一标识符)并从那里继承MAC地址。GUID通常用来标识COM组件以及系统中的其他对象。它们是由MAC地址(结合其他东西)计算得来的，表面上MAC地址就包含在其中。我说表面上是因为事实上并没有包含。 
我提供这种方法更多的是为了作为反面教材。您也许用这种方法能够得到MAC地址，但有时候您只会得到随机的十六进制数值。 
下面的例子十分简单，无需多讲。我们使用CoCreateGuid创建GUID，并将最后六个字节放入字符串中。它们可能是MAC地址，但并不是必然的。 uuid.cpp 
#include <windows.h> 
#include <iostream> 
#include <conio.h> using namespace std; int main() 
{ 
cout << "MAC address is: "; // 向COM要求一个UUID。如果机器中有以太网卡， 
// UUID最后的六个字节(Data4的2－7字节)应该是本地以太网卡的MAC地址。 
GUID uuid; 
CoCreateGuid(&uuid); 
// Spit the address out 
char mac_addr[18]; 
sprintf(mac_addr,"%02X:%02X:%02X:%02X:%02X:%02X", 
uuid.Data4[2],uuid.Data4[3],uuid.Data4[4], 
uuid.Data4[5],uuid.Data4[6],uuid.Data4[7]); 
cout << mac_addr << endl; 
getch(); 
return 0; 
} 

Answer 9

第三种方法－ 使用SNMP扩展API 
我要讨论的第三种方法是使用Windows的SNMP(简单网络管理协议)扩展来取得MAC地址。在我的经验里，这个协议很简单。代码也是直勾勾的向前的。基本步骤和Netbios相同： 
1》取得网卡列表 
2》查询每块卡的类型和MAC地址 
3》保存当前网卡 
我个人对SNMP了解不多，但如我刚刚所言，代码十分清楚。 snmp.cpp 
#include <snmp.h> 
#include <conio.h> 
#include <stdio.h> typedef bool(WINAPI * pSnmpExtensionInit) ( 
IN DWORD dwTimeZeroReference, 
OUT HANDLE * hPollForTrapEvent, 
OUT AsnObjectIdentifier * supportedView); typedef bool(WINAPI * pSnmpExtensionTrap) ( 
OUT AsnObjectIdentifier * enterprise, 
OUT AsnInteger * genericTrap, 
OUT AsnInteger * specificTrap, 
OUT AsnTimeticks * timeStamp, 
OUT RFC1157VarBindList * variableBindings); typedef bool(WINAPI * pSnmpExtensionQuery) ( 
IN BYTE requestType, 
IN OUT RFC1157VarBindList * variableBindings, 
OUT AsnInteger * errorStatus, 
OUT AsnInteger * errorIndex); typedef bool(WINAPI * pSnmpExtensionInitEx) ( 
OUT AsnObjectIdentifier * supportedView); void main() 
{ 
HINSTANCE m_hInst; 
pSnmpExtensionInit m_Init; 
pSnmpExtensionInitEx m_InitEx; 
pSnmpExtensionQuery m_Query; 
pSnmpExtensionTrap m_Trap; 
HANDLE PollForTrapEvent; 
AsnObjectIdentifier SupportedView; 
UINT OID_ifEntryType[] = {1, 3, 6, 1, 2, 1, 2, 2, 1, 3}; 
UINT OID_ifEntryNum[] = {1, 3, 6, 1, 2, 1, 2, 1}; 
UINT OID_ipMACEntAddr[] = {1, 3, 6, 1, 2, 1, 2, 2, 1, 6}; 
AsnObjectIdentifier MIB_ifMACEntAddr = 
{ sizeof(OID_ipMACEntAddr) sizeof(UINT), OID_ipMACEntAddr }; 
AsnObjectIdentifier MIB_ifEntryType = 
{sizeof(OID_ifEntryType) sizeof(UINT), OID_ifEntryType}; 
AsnObjectIdentifier MIB_ifEntryNum = 
{sizeof(OID_ifEntryNum) sizeof(UINT), OID_ifEntryNum}; 
RFC1157VarBindList varBindList; 
RFC1157VarBind varBind[2]; 
AsnInteger errorStatus; 
AsnInteger errorIndex; 
AsnObjectIdentifier MIB_NULL = {0, 0}; 
int ret; 
int dtmp; 
int i = 0, j = 0; 
bool found = false; 
char TempEthernet[13]; 
m_Init = NULL; 
m_InitEx = NULL; 
m_Query = NULL; 
m_Trap = NULL; /* 载入SNMP DLL并取得实例句柄 */ 
m_hInst = LoadLibrary("inetmib1.dll"); 
if (m_hInst < (HINSTANCE) HINSTANCE_ERROR) 
{ 
m_hInst = NULL; 
return; 
} 
m_Init = 
(pSnmpExtensionInit) GetProcAddress(m_hInst, "SnmpExtensionInit"); 
m_InitEx = 
(pSnmpExtensionInitEx) GetProcAddress(m_hInst, 
"SnmpExtensionInitEx"); 
m_Query = 
(pSnmpExtensionQuery) GetProcAddress(m_hInst, 
"SnmpExtensionQuery"); 
m_Trap = 
(pSnmpExtensionTrap) GetProcAddress(m_hInst, "SnmpExtensionTrap"); 
m_Init(GetTickCount(), &PollForTrapEvent, &SupportedView); /* 初始化用来接收m_Query查询结果的变量列表 */ 
varBindList.list = varBind; 
varBind[0].name = MIB_NULL; 
varBind[1].name = MIB_NULL; /* 在OID中拷贝并查找接口表中的入口数量 */ 
varBindList.len = 1; /* Only retrieving one item */ 
SNMP_oidcpy(&varBind[0].name, &MIB_ifEntryNum); 
ret = 
m_Query(ASN_RFC1157_GETNEXTREQUEST, &varBindList, &errorStatus, 
&errorIndex); 
printf("# of adapters in this system : %in", 
varBind[0].value.asnValue.number); 
varBindList.len = 2; /* 拷贝OID的ifType－接口类型 */ 
SNMP_oidcpy(&varBind[0].name, &MIB_ifEntryType); /* 拷贝OID的ifPhysAddress－物理地址 */ 
SNMP_oidcpy(&varBind[1].name, &MIB_ifMACEntAddr); do 
{ /* 提交查询，结果将载入 varBindList。 
可以预料这个循环调用的次数和系统中的接口卡数量相等 */ 
ret = 
m_Query(ASN_RFC1157_GETNEXTREQUEST, &varBindList, &errorStatus, 
&errorIndex); 
if (!ret) 
ret = 1; 
else 
/* 确认正确的返回类型 */ 
ret = 
SNMP_oidncmp(&varBind[0].name, &MIB_ifEntryType, 
MIB_ifEntryType.idLength); if (!ret) { 
j++; 
dtmp = varBind[0].value.asnValue.number; 
printf("Interface #%i type : %in", j, dtmp); /* Type 6 describes ethernet interfaces */ 
if (dtmp == 6) 
{ /* 确认我们已经在此取得地址 */ 
ret = 
SNMP_oidncmp(&varBind[1].name, &MIB_ifMACEntAddr, 
MIB_ifMACEntAddr.idLength); 
if ((!ret) && (varBind[1].value.asnValue.address.stream != NULL)) 
{ 
if((varBind[1].value.asnValue.address.stream[0] == 0x44) 
&& (varBind[1].value.asnValue.address.stream[1] == 0x45) 
&& (varBind[1].value.asnValue.address.stream[2] == 0x53) 
&& (varBind[1].value.asnValue.address.stream[3] == 0x54) 
&& (varBind[1].value.asnValue.address.stream[4] == 0x00)) 
{ 
/* 忽略所有的拨号网络接口卡 */ 
printf("Interface #%i is a DUN adaptern", j); 
continue; 
} 
if ((varBind[1].value.asnValue.address.stream[0] == 0x00) 
&& (varBind[1].value.asnValue.address.stream[1] == 0x00) 
&& (varBind[1].value.asnValue.address.stream[2] == 0x00) 
&& (varBind[1].value.asnValue.address.stream[3] == 0x00) 
&& (varBind[1].value.asnValue.address.stream[4] == 0x00) 
&& (varBind[1].value.asnValue.address.stream[5] == 0x00)) 
{ 
/* 忽略由其他的网络接口卡返回的NULL地址 */ 
printf("Interface #%i is a NULL addressn", j); 
continue; 
} 
sprintf(TempEthernet, "%02x%02x%02x%02x%02x%02x", 
varBind[1].value.asnValue.address.stream[0], 
varBind[1].value.asnValue.address.stream[1], 
varBind[1].value.asnValue.address.stream[2], 
varBind[1].value.asnValue.address.stream[3], 
varBind[1].value.asnValue.address.stream[4], 
varBind[1].value.asnValue.address.stream[5]); 
printf("MAC Address of interface #%i: %sn", j, 
TempEthernet);} 
} 
} 
} while (!ret); /* 发生错误终止。 */ 
getch(); FreeLibrary(m_hInst); 
/* 解除绑定 */ 
SNMP_FreeVarBind(&varBind[0]); 
SNMP_FreeVarBind(&varBind[1]); 
} 

Answer 10

GUID是全球唯一标识，不是网卡的地址，网卡的地址是MAC地址，源码如下：
unit Mac;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls，NB30; //添加NB30type
  TForm1 = class(TForm)
    Button1: TButton;
    Edit1: TEdit;
    Label1: TLabel;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;
  
function  Getmac:string;
implementation{$R *.dfm}
type
PASTAT = ^TASTAT;
  TASTAT = record
    adapter : TAdapterStatus;
    name_buf : TNameBuffer;
end;//获取MAC地址
function  Getmac:string;
var
  ncb : TNCB;
  s:string;
  adapt : TASTAT;
  lanaEnum : TLanaEnum;
  i, j, m : integer;
  strPart, strMac : string;
begin
  result:='';
  FillChar(ncb, SizeOf(TNCB), 0);
  ncb.ncb_command := Char(NCBEnum);
  ncb.ncb_buffer := PChar(@lanaEnum);
  ncb.ncb_length := SizeOf(TLanaEnum);
  s:=Netbios(@ncb);
  m:=1;
  if (Win32Platform = VER_PLATFORM_WIN32_WINDOWS) then
  m:=0;
  for i := 0 to integer(lanaEnum.length)-1 do
  begin
    FillChar(ncb, SizeOf(TNCB), 0);
    ncb.ncb_command := Char(NCBReset);
    ncb.ncb_lana_num := lanaEnum.lana[i];
    Netbios(@ncb);
    Netbios(@ncb);
    FillChar(ncb, SizeOf(TNCB), 0);
    ncb.ncb_command := Chr(NCBAstat);
    ncb.ncb_lana_num := lanaEnum.lana[i];
    ncb.ncb_callname := '*               ';
    ncb.ncb_buffer := PChar(@adapt);
    ncb.ncb_length := SizeOf(TASTAT);   if m=1 then
    begin
      if Netbios(@ncb) = Chr(0) then
      strMac := '';
      for j := 0 to 5 do
      begin
        strPart := IntToHex(integer(adapt.adapter.adapter_address[j]), 2);
        strMac := strMac + strPart ;
      end;
      SetLength(strMac, Length(strMac));
    end;
  if m=0 then
    if Netbios(@ncb) <> Chr(0) then
    begin
      strMac := '';
      for j := 0 to 5 do
      begin
        strPart := IntToHex(integer(adapt.adapter.adapter_address[j]), 2);
        strMac := strMac + strPart ;
      end;
      SetLength(strMac, Length(strMac));
    end;
  end;
  result:=trim(strmac);
end;procedure TForm1.Button1Click(Sender: TObject);
begin
   Edit1.Text := Getmac;
end;end.

Answer 11

function GetLanaEnum(LanaEnum: PLanaEnum): Byte;
var
  LanaEnumNCB: PNCB;
begin
  New(LanaEnumNCB);
  ZeroMemory(LanaEnumNCB, SizeOf(TNCB));
  try
    with LanaEnumNCB^ do
    begin
      ncb_buffer := PChar(LanaEnum);
      ncb_length := SizeOf(TLanaEnum);
      ncb_command  := Char(NCBENUM);
      NetBios(LanaEnumNCB);
      Result := Byte(ncb_cmd_cplt);
    end;
  finally
    Dispose(LanaEnumNCB);
  end;
end;NetBios调用获得MAC地址，网上抄的改了一下，有点乱，不过很好用，Win98,W2k,xp全兼容function ResetLana(LanaNum, ReqSessions, ReqNames: Byte;
  LanaRes: TNBLanaResources): Byte;
var
  ResetNCB: PNCB;begin
  New(ResetNCB);
  ZeroMemory(ResetNCB, SizeOf(TNCB));
  try
    with ResetNCB^ do
    begin
      ncb_lana_num := Char(LanaNum);        // Set Lana_Num
      ncb_lsn := Char(LanaRes);             // Allocation of new resources
      ncb_callname[0] := Char(ReqSessions); // Query of max sessions
      ncb_callname[1] := #0;                // Query of max NCBs (default)
      ncb_callname[2] := Char(ReqNames);    // Query of max names
      ncb_callname[3] := #0;                // Query of use NAME_NUMBER_1
      ncb_command  := Char(NCBRESET);
      NetBios(ResetNCB);
      Result := Byte(ncb_cmd_cplt);
    end;
  finally
    Dispose(ResetNCB);
  end;
end;
function GetLanaEnum(LanaEnum: PLanaEnum): Byte;
var
  LanaEnumNCB: PNCB;
begin
  New(LanaEnumNCB);
  ZeroMemory(LanaEnumNCB, SizeOf(TNCB));
  try
    with LanaEnumNCB^ do
    begin
      ncb_buffer := PChar(LanaEnum);
      ncb_length := SizeOf(TLanaEnum);
      ncb_command  := Char(NCBENUM);
      NetBios(LanaEnumNCB);
      Result := Byte(ncb_cmd_cplt);
    end;
  finally
    Dispose(LanaEnumNCB);
  end;
end;function GetMACAdress_netbios(id:integer):string;
var
ts:Tstringlist;
LanaEnum: PLanaEnum;
I: Integer;
AdapterStatus: PAdapterStatus;
StatNCB: PNCB;
MACAddress: PMACAddress;
begin
ts:=Tstringlist.create;
  New(LanaEnum);
  New(StatNCB);
  New(MACAddress);
  
  ZeroMemory(StatNCB, SizeOf(TNCB));
  StatNCB.ncb_length := SizeOf(TAdapterStatus) +  255 * SizeOf(TNameBuffer);
  GetMem(AdapterStatus, StatNCB.ncb_length);  ZeroMemory(LanaEnum, SizeOf(TLanaEnum));
  ZeroMemory(MACAddress, SizeOf(TMACAddress));  try
    if GetLanaEnum(LanaEnum) = NRC_GOODRET then
    begin
        for I := 0 to Byte(LanaEnum.length) - 1 do
          ts.Add(IntToStr(Byte(LanaEnum.lana[I])));
          with StatNCB^ do
          begin
           ResetLana(strtoint(Ts[0]), 0, 0, lrAlloc);
          ncb_buffer := PChar(AdapterStatus);
          ncb_callname := '*              ' + #0;
//          ncb_lana_num := Char(LanaNum);
          ncb_lana_num := Char(strtoint(Ts[0]));
          ncb_command  := Char(NCBASTAT);
          NetBios(StatNCB);
//          Result := Byte(ncb_cmd_cplt);
         if Byte(ncb_cmd_cplt) = NRC_GOODRET then
             MoveMemory(MACAddress, AdapterStatus, SizeOf(TMACAddress));
         result:=Format('%2.2x-%2.2x-%2.2x-%2.2x-%2.2x-%2.2x',
        [MACAddress[0], MACAddress[1], MACAddress[2],
         MACAddress[3], MACAddress[4], MACAddress[5]])+#13;
    end;
       
        
    end;
 finally
ts.free;
Dispose(LanaEnum);
    FreeMem(AdapterStatus);
    Dispose(StatNCB);
    freemem(MACAddress);
end;end;

Answer 12

GUID是根据网卡地址计算得到的,并不是网卡地址呀