تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
عمل شي في النظام من خلال الفيجول .net
#1
السلام عليكم ورحمة الله وبركاته


اخوتي الاعزاء

لطالما تمنيت ان اصل لمرحة استطيع ان اجعل برنامج يتحكم في جهازي بشكل كامل

ارجو الدخول لرابط التالي وهل استطيع ان اعمل برنامج يقوم بالخطوات التي في الرابط

هـــــــــــــــــــــــــــــنــــــــــــــــــــــــــــــــا
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم ورحمة الله وبركاته

في الرابط اللي وضعته تريد تغير طريقة إظهار امتدادات الملفات ببرنامجك

يتم ذلك عن طريق الريجستري في المفتاح التالي :
كود :
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced

في المفتاح أعلاه توجد قيمة بالاسم HideFileExt

تأخذ هذه القيمة قيمتين وهي إما 0 أو 1 :
0 تعني إظهار امتدادات الملفات
1 تعني إخفاء امتدادات الملفات

وقد وجدت مثال بالنت للتحقق من وجود ذلك المفتاح عدلت عليه ليمكنك من إخفاء وإظهار امتدادات الملفات :
PHP كود :
Private Sub ExtensionShown(ByVal HideExtFile As Boolean)
Dim strKey As String "Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced" ' مسار قيمة تغيير إظهار أو إخفاء امتدادات الملفات في الريجستري
Dim reg As Microsoft.Win32.RegistryKey = Nothing ' 
إنشاء مفتاح ريجستري
Dim NewValue 
As Integer   ' القيمة التي ستحفظ بملف الريجستري
Try
reg = Microsoft.Win32.Registry.CurrentUser.OpenSubKey(strKey, True) ' 
فتح مسار الريجستري 
If Not (reg Is NothingThen  ' إذا لم يكن مفتاح الريجستري خالي
If HideExtFile = True Then
NewValue = 0 ' 
إذا كانت القيمة (ترويتم إظهار إمتداد الملفات 
Else
NewValue ' إذا كانت القيمة (فولص) يتم إخفاء امتداد الملفات
End If
reg.SetValue("HideFileExt", NewValue) ' 
حفظ القيمة الجديدة المختارة في ملف الريجستري 
End 
If
Catch 
ex As Exception
MessageBox
.Show(ex.ToString' إظهار رسالة إذا حدث خطأ ما
Finally
If Not reg Is Nothing Then reg.Close() ' 
إغلاق مفتاح الريسجتري عند الانتهاء 
End 
Try
End Sub 

طريقة تنفيذ الكود أعلاه كالتالي :
PHP كود :
Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandles Button1.Click
ExtensionShown
(True)
End Sub 
إذا أردت إظهار امتدادات الملفات ضع True ، ولإخفاءها ضع False .


* ملحوظة: التعديل علي الريجستري يتطلب أن تمكن برنامج من العمل بصلاحيات مسئول النظام . إذا كنت لا تعرف ذلك ابحث بالمنتدى عن تشغيل البرنامج كمسئول بالنظام .

****
***
**
*
(وَقُل رَّبِّ زِدْنِي عِلْمًا)

الرد }}}}
تم الشكر بواسطة:
#3
جـــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــزاكــــــــــــــــــــــ الله الــــــــــــــــــــــــف خير يا غالي


ما قصرت وجعله الله في موازين حسناتك
الرد }}}}
تم الشكر بواسطة:
#4
جزاك الله خيرا
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] برنامج الفيجول بيسيك لا يقبل الاتصال بقاعدة بيانات اكسس من نوع accdb abdalla89 6 163 20-10-16, 01:06 AM
آخر رد: جوري
  الادخال والتعديل من خلال الليست بوكس makky 2 122 19-09-16, 07:57 PM
آخر رد: أبو عمر
  سؤال : ملأ TreeView من خلال الاداة Background Worker ابراهيم النعيمي 2 129 03-09-16, 09:11 PM
آخر رد: ابراهيم النعيمي
  [VB.NET] كيف يتم البحث في الويندوز من خلال البرنامج jassim316 8 228 30-08-16, 09:09 PM
آخر رد: jassim316
  [سؤال] كيف يتم استبدال إشارة مرجعية موجودة في ملف وورد من خلال برنامجي ؟ السندبااد 2 127 17-08-16, 10:56 AM
آخر رد: السندبااد
Sad سؤال عن الفيجول بيسك 1991sarah 1 109 15-08-16, 03:54 AM
آخر رد: اسامة محمود سيد
  [سؤال] كيف اجعل برنامجي يدعم اختصارات كيبورد من خلال ملف نصي zxz5432 1 134 09-08-16, 07:49 AM
آخر رد: zxz5432
Sad البحث في قاعدة البيانات من خلال مدخلين Kian Tech 5 234 06-08-16, 05:01 AM
آخر رد: khodor1985
  [سؤال] هل عدم توفر API من شركة الرسائل النصية يمكن إرسالها من خلال البرنامج ؟ عبد الله 4 360 23-07-16, 02:10 PM
آخر رد: الوادي
  [سؤال] السلام عليكم هل استطيع الحصول على كود في الفيجول بيزك 6 استطيع كتابة الحل المركب للمع hafezshaban 0 95 13-07-16, 02:21 AM
آخر رد: hafezshaban

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم