http://cc.embarcadero.com/ CodeCentral Submissions for Chris Crowe How to get the Hard Disk Serial Number for any drive, including network drives?function GetHDSerialNumber(Drive : String): Longint;Var pdw : pDWord; mc, fl : dword;begin New(pdw); GetVolumeInformation(pchar(Drive),nil,0,pdw,mc,fl,nil,0); Result := pdw^; dispose(pdw);end; http://cc.embarcadero.com/Item/13399 1999-06-03T07:00:00 1999-06-03T07:00:00 http://cc.embarcadero.com/Item/13399