الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كود لإظهار خصائص متعددة في الوندوز من لوحة التحكم

مغلق
بدأه ابوحمود في 14 سبتمبر 2001 · 2 رد · 934 مشاهدة · في مراجعة المواضيع
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

أوامر لإظهار خصائص متعددة في الوندوز

لقد تم التعديل وإضافة أكثر من طريقة وإضافة خصائص أخرى لم أذكرها قبل :

 مربع حوار خصائص أجهزة المودوم

Dim dblReturn As Double

dblReturn = Shell("rundll32.exe shell32.dll,Control_RunDLL modem.cpl", 5)

طريقة أخرى

Shell "C:Windowscontrol.exe" & " MODEM.CPL", 1

 مربع حوار خصائص النظام

Dim dblReturn As Double

dblReturn = Shell("rundll32.exe shell32.dll,Control_RunDLL sysdm.cpl,,0", 5)

طريقة أخرى

Shell "C:Windowscontrol.exe" & " SYSDM.CPL", 1

 مربع حوار خصائص الأصوات والوسائط المتعددة

Dim dblReturn As Double

dblReturn = Shell("rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl @1", 5)

أو

Dim dblReturn As Double

dblReturn = Shell("rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,,0", 5)

طريقة أخرى

Shell "C:Windowscontrol.exe" & " MMSYS.CPL", 1

 مربع حوار خصائص إعدادات إقليمية

Dim dblReturn As Double

dblReturn = Shell("rundll32.exe shell32.dll,Control_RunDLL intl.cpl,,0", 5)

طريقة أخرى

Shell "C:Windowscontrol.exe" & " INTL.CPL", 1

 مربع حوار خصائص كلمات المرور

Dim dblReturn As Double

dblReturn = Shell("rundll32.exe shell32.dll,Control_RunDLL password.cpl", 5)

طريقة أخرى

Shell "C:Windowscontrol.exe" & " Password.cpl", 1

 مربع حوار شبكة الاتصال

Dim dblReturn As Double

dblReturn = Shell("rundll32.exe shell32.dll,Control_RunDLL netcpl.cpl", 5)

طريقة أخرى

Shell "C:Windowscontrol.exe" & " NETCPL.CPL", 1

 مربع حوار خصائص الماوس

Dim dblReturn As Double

dblReturn = Shell("rundll32.exe shell32.dll,Control_RunDLL main.cpl @0", 5)

طريقة أخرى

Shell "C:Windowscontrol.exe" & " MAIN.CPL", 1

 مربع حوار إضافة وإزالة البرامج

Dim dblReturn As Double

dblReturn = Shell("rundll32.exe shell32.dll,Control_RunDLL appwiz.cpl,,1", 5)

طريقة أخرى

Shell "C:Windowscontrol.exe" & " APPWIZ.CPL", 1

 مربع حوار معالج إضافة أجهزة جديدة

Dim dblReturn As Double

dblReturn = Shell("rundll32.exe shell32.dll,Control_RunDLL sysdm.cpl @1", 5)

 مربع حوار خصائص العرض

Shell "C:Windowscontrol.exe" & " desk.cpl", 1

 مربع حوار خصائص انترنت

Shell "C:Windowscontrol.exe" & " Inetcpl.cpl", 1

 مربع حوار TEXT Services

Shell "C:Windowscontrol.exe" & " INPUT98.CPL", 1

 مربع حوار تحديثات تلقائية

Shell "C:Windowscontrol.exe" & " WUAUCPL.CPL", 1

 مربع حوار خصائص الطلب

' Shell "C:Windowscontrol.exe" & " TELEPHON.CPL", 1

 مربع حوار خصائص النظام

' Shell "C:Windowscontrol.exe" & " SYSDM.CPL", 1

 مربع حوار خصائص التشغيل

Shell "C:Windowscontrol.exe" & " ACCESS.CPL", 1

 مربع حوار خصائص خيارات الطاقة

Shell "C:Windowscontrol.exe" & " POWERCFG.CPL", 1

 مربع حوار مسؤال مصدر بيانات ODBC

Shell "C:Windowscontrol.exe" & " ODBCCP32.CPL", 1

 مربع حوار خصائص التاريخ والوقت

Shell "C:Windowscontrol.exe" & " TIMEDATE.CPL", 1

 مربع حوار خيارات تسالي

Shell "C:Windowscontrol.exe" & " JOY.CPL", 1

وللجميع تحياتي

#2

شكراً لك الأخ أبو حمود على هذه الفوائد

والشكر موصول إلى جميع من يشارك في هذا المنتدى الجميل وإلى القائمين عليه

------------------وما توفيقي إلا بالله--------------------

إذا كنت بالله مستعصما---------فماذا يضيرك كيد العبيد

#3

كفؤ والله يا ابوحمود ولك منا جزيل الشكر والامتنان

ولكل الاخوة القائمين على هذا المنتدى المفيد(g)

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…