Printable View
سلام دوستان.
این برنامه شماره سریال هارد رو پیدا میکند و روی صفحه کنسول نمایش می دهد. من این برنامه رو از سایت http://www.codeproject.com گرفتم. البته اصل برنامه به زبان #c بود که من اونو به وب بی دات نت تبدیل کردم.
امیدوارم مورد استفاده دوستان واقع بشه. :sunglass:
از اینکه این برنامه رو گذاشتی خیلی ممنون .
اگه چیزهای دیگه ای هم داشتی حتما بگو
Good Luck :sunglass:
این شماره سریال هارد رو پیدا میکنه یا پارتیشن هارد رو ؟
و در ضمن روی هاردهای ساتا هم کار میکنه ؟
این برنامه سریال واقعی هارد رو پیدا می کند نه سریال پارتیشن رو.نقل قول:
این شماره سریال هارد رو پیدا میکنه یا پارتیشن هارد رو ؟
درباره این مدل هارد هم نمی دونم ولی فکر کنم جواب بده. اگه کسی امتحان کرد بگه که همه بدنن.نقل قول:
و در ضمن روی هاردهای ساتا هم کار میکنه ؟
:موفق:
با سلام
دوستان من هارد ساتا دارم و این برنامه رو دانلود کردم توی ویندوز ایکس پی ولی نمی دونم چه طور اجرا می شه ویژوال استدیو هم کامل نصب کردم ولی نمی دونم ارور می ده به هر حال بگید باید چه طور اجرا بشه می گم سریال هارد ساتا رو می ده یا نه
یا حق
پیمان از شیراز
اگه اون سریالی که با فرمت عوض میشه باشه که خیلی مشکل به هم میزنه
اینطور نیست؟ :sunglass:
چیزی که شما میفرمایید برای وقتی هستش که سریال پارتیشن رو بگیره. ولی این برنامه سریال اصلی خود هارد رو میگیره. برای اینکه مطمئن بشید میتونید از توی SystemInformation قسمت Components>Storage>Drives رو انتخاب کنید، بعد سریال همه پارتیشن ها رو با سریالی که برنامه میده چک کنید. برای من که سریالش فرق داشت با سریال پارتیشن ها.نقل قول:
اگه اون سریالی که با فرمت عوض میشه باشه که خیلی مشکل به هم میزنه
موفق باشید :موفق:
سلام
HO457 من برنامه شما رو دانلود کردم ولی فکر کنم بخاطر ورژن پایین ویژوال استدیوی من اجرا نمی شه .
از کدهاش هم سر در نیاوردم که بتونم خودم سرهمش کنم.
می تونید یه راهنمایی در مورد کدهاش بکنید که بتونم ازش تو یه برنامه استفاده کنم؟
دوستان دیگه هم اگه لطف کنن همین کد یا چیز دیگه ای دارند برام بزارند متشکر می شم .
من به بدست آوردن شماره سریال واقعی هارد تو برنامم نیاز دارم.
این HWInfo.ocx سریال نامبر هارد رو می ده
کسی می دونه این سریال واقعی هارده یا سریال پارتیشن؟
سلام
من هم نتونستم اونو اجرا کنم
من می خوام واسه نرم افزارم قفل بزارم بهترین راه چیه و چطوری این کار رو بکنم؟
:گیج: :flower:
من از همین HWInfo.ocx استفاده میکنم ولی نه فقط از سریال هاردش بلکه از ترکیبی از تمام سریالهایی که بهم میده . چون سریال هادش قابل اغتماد نیست ( تمام مکستورهای 80 رو با یه سریال نشون میده )
خوب میشه یه نمونه کد درست و حسابی به من هم بدین
که بتونم ازش استفاده کنم
کد های بالا رو که من نتونستم استفاده کنم
:flower:
اگه اون ocx رو داری که کدش کاری نداره .
اگه هم نداری پلیز سرچ :mrgreen:
هیچ چیزش قابل اعتماد نیست بارها و بارها در مورد مشکلاتش صحبت شدهنقل قول:
من از همین HWInfo.ocx استفاده میکنم ولی نه فقط از سریال هاردش بلکه از ترکیبی از تمام سریالهایی که بهم میده . چون سریال هادش قابل اغتماد نیست ( تمام مکستورهای 80 رو با یه سریال نشون میده )
با سلام .
از دوستان کسی با GUS SOFTWARE PROTECTER که یک ACTIVEX هست کار کرده؟
سلام عزیزمنقل قول:
نوشته شده توسط HO457
من به اون آدرس رفتم نتونستم چیزی پیدا کنم
مشه بهتر آدرس بدی
و اسم اون برنامه یا بسته یا کد رو هم بدی
دانلود کنم
ممنون میشم
از کجا من دانلود کنمنقل قول:
نوشته شده توسط HO457
با سلام . من مدیتیه این dll رو دارم . شاید باورتون نشه حتی یادم نیست خودم نوشتم یا از جایی پیداش گردم ولی خوب فکر کنم واسه بدست اوردن شماره سریال هارد به دردتون بخوره
یا حق
منهم همینطورنقل قول:
نوشته شده توسط kaveh2006
https://barnamenevis.org/showthread.php?t=14958نقل قول:
نوشته شده توسط rezaei manesh
سلام
کد برای مدل و سریال. دوستان اگر ایرادی میشناسند بفرمایند. با تشکر
نقل قول:
Dim searcher As ManagementObjectSearcher = New ManagementObjectSearcher("SELECT * FROM Win32_DiskDrive")
Dim wmi_HD As ManagementObject
For Each wmi_HD In searcher.Get
MsgBox(wmi_HD("Model").ToString & "---InterfaceType samtime with error:" & wmi_HD("InterfaceType").ToString)
Next
searcher = New ManagementObjectSearcher("SELECT * FROM Win32_PhysicalMedia")
For Each wmi_HD In searcher.Get
If wmi_HD("SerialNumber") Is Nothing Then
MsgBox("None serial")
Else
MsgBox("SerialNumber:" & wmi_HD("SerialNumber").ToString)
End If
Next
من یکی نوشتم exe شو می گذارم اگه درست کار کرد سورسش هم رو می گدازم از دوستان هم خوام تست کنن ببینند درست کار می کنه یا نه
دوستان خیلی ممنون که تست کردید و جواب دادید ها واقعا به حس مسولیت پذیری شما باید آفرین گفت :افسرده: :عصبانی++:
با درایو scsi تست شد جواب می ده
حالا یه نفر با یه هارد sata تست کنه ببینه جواب می ده یا نه ؟؟؟؟؟؟؟؟؟؟
در ضمن سورش هم گذاشتن حالشو ببرید :لبخند:
من با هارد ساتا تست کردم جواب داد
من با هارد ساتا تست کردم جواب نداد
روی هارد Sata1 جواب داد .
Maxtor 250 GB Sata1
اون دوست عزیزی که می گه جواب نداده می شه بگه پیام error اون چیه ؟
هیچ خطایی نمیده فقط مقدار null رو بر می گردونه!نقل قول:
نوشته شده توسط vahidiran
می تونی از داخل SystemInformation مشخصات هارد رو در بیاری و اینجا بگی ؟
مثلا نوع هارد و مدل هارد دقیقا ؟
ممنون
Hitachi - STAT 2نقل قول:
نوشته شده توسط vahidiran
کامپیوتر شما Laptop یا Desktop ؟
شاید sata وزژن جدید Sata باشه !
یا Desktopنقل قول:
نوشته شده توسط vahidiran
جواب نداد
کامپیوتر NoteBook
سلام
رو یه سیستمم با هارد ساتا جواب داد اما اون یکی با هارد SCSI فقط حرف E رو برمیگردونه !
این موضوع رو برای این آوردم بالا که بهش احتیاج پیدا کردم. همچنین مساله اصلی گرفتن سریال هارد روی ویندوز ویستا به قوت خودش باقی هست. سه تا راهی که در Diskid32 هست عبارتند از ... IOCTL_STORAGE_QUERY_PROPERTY و IOCTL_SCSI_MINIPORT_IDENTIFY و DFP_RECEIVE_DRIVE_DATA که اون اولی به همراه IOCTL_STORAGE_GET_MEDIA_SERIAL_NUMBER روی ویستا جواب میدن ، اما روی بعضی از سیستم ها کار نمیکنند. اگر راه حلی برای این مساله بدون استفاده از WMI و روی ویندوز ویستا پیدا کردید ما رو از نصایح خود بهره مند کنید.
لینک دانلود برنامه کجاست من ندیدم
با سلام
چرا از شماره سریال Mainboard استفاده نمیکنی
اینم برنامش :
PrivateFunction Get_Mainboard_Info() AsString
Dim search AsNew ManagementObjectSearcher("SELECT * FROM Win32_ComputerSystem")
Dim info As ManagementObject
ForEach info In search.Get()
Get_Mainboard_Info = info("manufacturer").ToString()
Get_Mainboard_Info += info("model").ToString()
Next
EndFunction
کد سریال مادربورد Unknown بر میگردونه!؟
با این کد می تونید شماره سریال هارد رو بدست بیارید
فراموش نکنید که باید از نوار ابزار بالای visual studio
project/add refrence/system manegement رو
انجام بدید.
Imports System.Management
Dim physicalMedia As New Management.ManagementClass("Win32_PhysicalMedia")
For Each physicalMedium As Management.ManagementObject In physicalMedia.GetInstances()
MessageBox.Show("Serial Number: " & CStr(physicalMedium("SerialNumber")))
Next physicalMedium
در ضمن یه سوال دارم؟
چرا اکثر دوستان از شماره سریال هارد واسه قفل استفاده می کنند؟
چرا سخت افزار دیگه ای مثلا cpu رو چک نمی کنند؟
آیا دلیل خا صی داره؟ امنیت بیشتره؟ به چه دلیل؟
تشکر
کد بالا را رو 4 تا دستگاه امتحان کردم رو دوتا جواب داد رو دوتای دیگه جواب نداد.دوتای اول از نوع IDE , SATA2 و دوتای دیگه هم Sata2 هستند همشونم دسک تاب.
بهترین راه استفاده از hashcode ستش با تاریخ سیستم و چندتا dll تو system32
كمك كنيد من هم برنامه نويس شوم!!!!
سلام، برادر عزيز، مجنون زن بود يا مرد؟ حقير به اين برنامهتون خيلي نياز دارم ولي چيزي براي دانلود كردن نيافتم. «علي اي حال» ميدونم كه ي برنامه كابرديه. خواهش ميكنم براي دانلود راهنمايي بفرمائيد.
کد شما کار کرد ممنوننقل قول:
نوشته شده توسط omidreza812
چه جوری می تونم برنامه ای را که نوشتم براش تعیین کنم فقط با شماره سریالی که از کد بالا میگیره اجرا بشه و در صورت تغییر شماره سریال برنامه دیگه اجرا نشه و پیغام خطا بده
2- وقتی شماره سریال بالا رو گرفت اول رجیستر بشه و بعد برنامه برای همیشه روی آن سیستم کار کنه