أخواني الأفاضل
لو تكرمتم أحتاج إلى أكواد لتسجيل مفتاح ريجستري يسجل تاريخ اليوم الأول لفتح البرنامج وكذلك التأكد من وجوده وقراءته ومن ثم القيام بحذفه
حيث اجد صعوبة في تطبيق ما قرأته عن الريجستري ولم يسبق لي التعامل معه كما أني أخاف من ارتكاب أي خطأ يتسبب بمشكلة في الجهاز
فهل لي بذلك جزاكم الله ألف خير
تقبلوا جميعاً تحياتي
{ اللهم علمنا ما ينفعنا وانفعنا بما علمتنا إنك أنت العليم الخبير }
دالة إنشاء المفتاح الذي سيحوى التاريخ مع إضافة تاريخ اليوم مع الوقت كقيمة للمفتاح المنشأ :
كود :
Private Sub CreateMyRegistryValue()
Try
Application.CommonAppDataRegistry.SetValue("abuzzouz", Now)
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Create Value")
End Try
End Sub
في حدث تحميل النموذح FormLoad نتحقق من عدم خلو المفتاح السابق من أي قيمة ، إذا كان خالي سيتم تعيين تاريخ اليوم له بالدالة السابقة :
كود :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim MyValue As String = Nothing
MyValue = Application.CommonAppDataRegistry.GetValue("abuzzouz")
If MyValue = Nothing Then
MsgBox("هذه أول مرة تشغل البرنامج سيتم حفظ تاريخ اليوم")
CreateMyRegistryValue()
End If
End Sub
حسناً إذا أردت حذف المفتاح استخدم هذه الدالة :
كود :
Private Sub DeleteMyRegisrtyValue()
Try
Application.CommonAppDataRegistry.DeleteValue("abuzzouz")
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Delete Value")
End Try
End Sub
30-05-13, 12:03 AM (آخر تعديل لهذه المشاركة : 30-05-13, 12:05 AM {2} بواسطة Medhat48.)
لكما مني جزيل الشكر أخواني الأعزاء kslawy و sajad هذا ما أبحث عنه مع أن المثال المرفق غير مكتوب بالـ vb.net لكن لا مشكلة أخي sajad جزاكما الله خيراً
لكن سامحوني لدي أيضا استفسار يتعلق بتحديد hot key عن طريق الريجستري وذلك ليتمكن المستخدم من فتح البرنامج بالضغط عليه وليكن على سبيل المثال (Ctrl+F8)
فكيف يتم ذلك بالكود أيضاً
عذراً مرة أخرى لكن خبرتي متواضعة وأسعى لتطويرها بمساعدة أمثالكم بارك الله فيكم
تقبلوا تحياتي
{ اللهم علمنا ما ينفعنا وانفعنا بما علمتنا إنك أنت العليم الخبير }