Форум: "Основная";
Текущий архив: 2002.10.31;
Скачать: [xml.tar.bz2];
ВнизМастера как можно определить КЕМ СДЕЛАН винчестер и ID Найти похожие ветки
← →
Dimich1978 (2002-10-21 11:59) [0]Вот и все.
← →
REA (2002-10-21 12:00) [1]Видел вроде такую шнягу: под W98 залезть в порты. Под NT написать драйвер и залезть в порты.
← →
REA (2002-10-21 12:06) [2]Наврал наверно. Вот кусок который MBR читает. Может пригодится.
NTSTATUS MSJReadDriveZeroMasterBootRecord(PUCHAR pBuffer)
{
NTSTATUS ntStatus;
UNICODE_STRING uszDeviceName;
PFILE_OBJECT fileObject;
PDEVICE_OBJECT pDriveDeviceObject;
// Initialize unicode string
RtlInitUnicodeString(&uszDeviceName, L"\\DosDevices\\PhysicalDrive0");
// Get a pointer to PhysicalDrive0
ntStatus = IoGetDeviceObjectPointer(&uszDeviceName,
FILE_READ_ATTRIBUTES,
&fileObject,
&pDriveDeviceObject);
// If the device object pointer is valid...
if(NT_SUCCESS(ntStatus))
{
IO_STATUS_BLOCK ioStatus;
KEVENT event;
PIRP pIrp;
LARGE_INTEGER sectorNum;
KeInitializeEvent(&event, NotificationEvent, FALSE);
sectorNum.LowPart = sectorNum.HighPart = 0;
pIrp = IoBuildSynchronousFsdRequest(IRP_MJ_READ,
pDriveDeviceObject,
pBuffer,
512,
§orNum,
&event,
&ioStatus);
if(!pIrp)
return FALSE;
ntStatus = IoCallDriver(pDriveDeviceObject, pIrp);
if(ntStatus == STATUS_PENDING)
{
KeWaitForSingleObject(&event, Suspended, KernelMode, FALSE, NULL);
ntStatus = ioStatus.Status;
}
if(!NT_SUCCESS(ntStatus))
return ntStatus;
// Ditch the fileObject pointer created earlier
ObDereferenceObject(fileObject);
}
return ntStatus;
}
← →
iNew (2002-10-21 12:12) [3]Попробуй поискать в реестре.
← →
Игорь Шевченко (2002-10-21 12:14) [4]REA © (21.10.02 12:06)
В переводе на Delphi это особенно рулезно смотрится.
← →
REA (2002-10-21 12:17) [5]Да это из драйвера какого-то кусок. Оно вообще на Delphi не смотрится.
← →
Ученик (2002-10-21 12:19) [6]http://www.sources.ru/cpp/system/devid.shtml
← →
Dimich1978 (2002-10-21 12:25) [7]Да на С++ есть, а вот под Делфи...толком ничего. Попробовать перевести тока с С++, но его еще знать надо...а с этим у меня проблема. Так общий смысл
← →
Dimich1978 (2002-10-21 13:19) [8]Если кому интересно, под Паскаль есть такая фича как определение ID винчестера....нашел в инете
http://www.osp.ru/pcworld/1999/04/105lis14.htm
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.10.31;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.008 c