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

مجموعة أكواد لتشغيل بنود في الويندوز

مغلق
بدأه ramos في 6 يوليو 2006 · 14 رد · 1,519 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

تفضلوا هديتي مجموعة أكواد تعمل علي vb و vb.net تقوم بتشغيل بنود في الويندوز :P

و هذا هو الكود الأول

يقوم هذا الكود بفتح لوحة التحكم : :lol: 

 Call Shell("rundll32.exe shell32.dll,Control_RunDLL", vbNormalFocus)

لتشغيل بند accessibility options

أكتب الكود التالي

Call Shell("rundll32.exe shell32.dll,Control_RunDLL access.cpl", vbNormalFocus)

*-) و هذا لتشغيل بند إضافة و إزالة البرنامج 

Call Shell("rundll32.exe shell32.dll,Control_RunDLL appwiz.cpl", vbNormalFocus)

و هذا لتشغيل بند خصائص الانترنيت 

Call Shell("rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl", vbNormalFocus)

تم تعديل هذه المشاركة بواسطة الغملاسي في 7 يوليو 2006 في 05:15

1.GIF
#2

شكرا

#3

مرحباااااا

مشكور أخى

هل لنا بمجموعة أخرى من هذه الاكواد

وجزاك الله عنا كل خير

تحياتى

قال رسول الله صلى الله عليه وسلم

يكبر بن أدام ويكبر معه شيئان كثرة المال وطول العمر

صدق رسول الله صلى الله عليه وسلم

قال عمر بن الخطاب رضي الله عنه

نحن قوم أعزنا الله بالإسلام فإذا إبتغينا العزة فى غيره أذلنا الله

#4

هاهي مجموعة أخرى

لتشغيل بند العرض 

Call Shell("rundll32.exe shell32.dll,Control_RunDLL desk.cpl,,0", vbNormalFocus)

لتشغيل بند خصائص التاريخ و الوقت

Call Shell("rundll32.exe shell32.dll,Control_RunDLL timedate.cpl", vbNormalFocus)

لتشغيل بند لوحة المفاتيح 

Call Shell("rundll32.exe shell32.dll,Control_RunDLL main.cpl @1", vbNormalFocus)

:P

هاهي مجموعة أخرى

لتشغيل بند سمات سطح المكتب :o 

Call Shell("rundll32.exe shell32.dll,Control_RunDLL themes.cpl", vbNormalFocus)

لتشغيل بند إضافة طابعة جديدة 

Call Shell("rundll32.exe shell32.dll,SHHelpShortcuts_RunDLL AddPrinter", vbNormalFocus)

لتشغيل بند إضافة أجهزة جديدة 

Call Shell("rundll32.exe shell32.dll,Control_RunDLL sysdm.cpl @1", vbNormalFocus)
1.GIF
#5

لتشغيل بند الطابعات 

Call Shell("rundll32.exe shell32.dll,Control_RunDLL main.cpl @2", vbNormalFocus)

لتشغيل بند وسائط متعددة 

Call Shell("rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl", vbNormalFocus)

لتشغيل بند إعدادات إقليمية 

Call Shell("rundll32.exe shell32.dll,Control_RunDLL intl.cpl", vbNormalFocus)

:lol:

1.GIF
#6

مية مية

Practice makes perfect 2007*

البرمجة بلا انطباعات

#7

:)

>> تجارب برمجية <<

[/وسط][/وسط][/وسط]

#8

يا لها من مجموعة رائعة

أشكرك اخى فى الله

تحياتى

قال رسول الله صلى الله عليه وسلم

يكبر بن أدام ويكبر معه شيئان كثرة المال وطول العمر

صدق رسول الله صلى الله عليه وسلم

قال عمر بن الخطاب رضي الله عنه

نحن قوم أعزنا الله بالإسلام فإذا إبتغينا العزة فى غيره أذلنا الله

#9

موضوع مميز فعلا جزاك الله خيرا

#11

شكرا على الردود :P

و لكن هل يملك أحد المبرمجين مجموعة أخرى ;)

لقد أفرغت ما في جعبتي وأتمنى أن يشارك أخرون بأكواد أخرى (h)

1.GIF
#12

هل لي بكود يشغل بند defragmat disk dur :P

1.GIF
#13

هل لي بكود يقوم بتشغيل بند propriétés système

أرجو أن تساعدنا في الكودين السابقين فأنا في حاجة شديدة إليهما

أما عني فقد وجدت أربع أكواد لتشغيل أربعة بنود أخرى و ٍأقدم هذه الأكواد قريبا :P

1.GIF
#14

رائع رائع رائع جزاكم الله خير ويسر لك امورك ورزقك بكل ما هو طيب ان شاء الله هذه بعض الاكواد الرائعه جارى تنفيز الباقى منها

لن تبلغ المجد حتى تلعق الصبرااااااااا

#15

السلام عليكم

في السابق كنت قد قدمت إليكم أكواد لتشغيل مجموعة بنود في النظام إلا أني أخطأت في بعضها فبعضها للا يعمل إلا على sp2

أما الأن فسأقدم لكم أكواد إضافية كثيرة ثم سأريكم كيفية إنتاج أكواد مشابهة لنستغل جميعا القدرات الكاملة للنظام و نستعملها من خلال برامجنا

فما رأيكم

أرجو أن يستمر هذا الموضوع لأطول فترة ممكنة و أن يساهم أعضاء أخرون فيه لنتعمق في النظام

و نستغل خصائصه كما قدمت

أولا كل ما قدمته حتى الأن هو عبارة عن أكواد تشغل ملفات بإمتداد cpl :D

و هو إمتداد الملفات البرامج التي تشغل من خلال لوحة التحكم

ثانيا هذه أكواد لتشغيل بنود إضافية (h)

كود لتشغيل معالج تثبيت شبكة الإتصال 

Call Shell("rundll32.exe shell32.dll,Control_RunDLL netsetup.cpl @1", vbNormalFocus)

كود لتشغيل خيارات الطاقة 

Call Shell("rundll32.exe shell32.dll,Control_RunDLL powercfg.cpl @1", vbNormalFocus)

كود لتشغيل مركز الأمان وهو يعمل على sp2 فقط 

Call Shell("rundll32.exe shell32.dll,Control_RunDLL wscui.cpl @1", vbNormalFocus)

كود لتشغيل بند التحديثات و لا أعلم إن كان يعمل على sp1 أم لا 

Call Shell("rundll32.exe shell32.dll,Control_RunDLL wuaucpl.cpl @1", vbNormalFocus)

أما الأن فطريقة صنع هذه الأكواد هي كالتالي :P

Callshell متبوعة بقوس ثم "rundll32.exe shell32.dll, Control_RunDLLمتبوعة بإسم البند

مثلا sysdm.cpl ثم تكتب بعدها @1", متبوعة بطريقة التشغيل vbNormalFocus

ثم يغلق القوس وأظن أن الطريقة توضحت الآن

أرجو أن يستمر الموضوع

بإنتظار الردود :P

تم تعديل هذه المشاركة بواسطة ramos في 27 يوليو 2006 في 19:11

1.GIF

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

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