بسم الله الرحمن الرحيم
أحبائي أعضاء المنتدي الجميل الفريق العربي للبرمجة
السلام عليكم و رحمة الله و بركاته
لطالما امنت بكلمة جميلة قيلت في البرمجة و التي أعتبرها من ضمن مباديء البرمجة
وهي أن : ( البرمجة لا تعرف المستحيل)
و من ذلك أستنتجت لنفسي قاعدة أخري و هي أبحث عن أسهل و أفضل الطرق لعمل ما تريد و لعلكم تتذكرون في فيلم matrix الجملة التي قالها مورفيوس لنيو عندما أراده ان يقفز بين ناطحتي سحاب و سأله كيف يستطيع عمل ذلك فقال له بكل بساطة free your mind و بالفعل فعلها لأنه حرر عقله من محدداته التي كان يسجنه داخلها أستطاع أن يفعلها بعد ذلك و لا يهم كم مرة حاول لكنه نجح، و لذلك عندما تقابلني مشكلة من مشاكل البرمجة التي تجعلك تحطم ال keyboard فوق رأس ال cpu :lol: :lol: فانني أتذكر هذه الكلمة free your mind و كما أعتقدت دائما فعقولنا تمتلك طاقة أكبر مما نظن و علينا تحرير هذه الطاقة و أولي الناس بذلك المبرمجون الذين أعتبرهم أصحاب أذكي المهن.
علي العموم أحسست أنني أريد أن أقول هذه الكلمات خاصة في هذا المنتدي لأنني أحس بمدي قوته و تفوقه، و أتمني أن أتأثر به و يتغير مستواي العلمي بعد تشرفي بانضمامي اليكم :)
عذرا علي المقدمة و عودة الي موضوعنا الأصلي <_<
طبعا كلنا نعلم أن مايكروسوفت لا تقدم أكوادها للأفراد علي الاقل بالمجان و ما أقصده هنا هو أكواد نظم تشغيلها و فكرت في أن نقوم باضافة وظائف جديدة الي متصفح الانترنت internet explorer و ذلك عن طريق العملاق vb.net الذي لم يترك مجالا الا و دخله بقوة و ها هو يتوج اتصاراته بال windbey 2005 (علي فكرة من فترة لم أجد اي من مبرمجي الديلفي هنا( :D :D
علي العموم الفكرة تتمثل في برمجة الوظيفة بال vb.net ثم استدعائها (استدعاء البرنامج نفسه و لا يشترط أن يكون مكتوبا بال vb.net أو غيره فأي ملف تنفيذ يؤدي الغرض( و نستدعي الوظيفة من ال internet explorer عن طريق شريط الأدوات ... عرفنا الفكرة ؟ يللا بينا ننفذها:
سوف أعرض لك الان مثال بسيط لما يمكن عمله و عليك أنت أن تطور أكثر فيما بعد ، و الوظيفة التي سنبرمجها هي مسح الكوكيز:
ابدأ مشروع جديد و اختر console application
من solution explorer اضغط بالزر الايمن للفأرة و اختار add reference
ثم تبويب com ثم ابحث عن الاداة Microsoft scritpting runtime ثم double click عليها ثم اضغط ok.
بعد ذلك اكتب الكود التالي
' هنا قمنا باستيراد فضاء الاسماء اللازم للتعرف علي مسار مجلد الكوكيز في جهازك
Imports System.Environment
Module Module1
Sub Main()
' الكلام الذي سيظهر امام المستخدم
Console.WriteLine(" ____________________________________")
Console.WriteLine(" welcome to ahmed shalaby program for")
Console.WriteLine(" cleaning your internet explorer®")
Console.WriteLine(" ____________________________________")
Console.WriteLine()
Console.WriteLine()
Console.WriteLine("dear ahmed cookies on your system will be blown up!")
Console.WriteLine(" so now i'm going to clean ie® cookiesfor you")
Console.WriteLine()
Console.WriteLine()
Console.WriteLine()
'متغير نصي نخزن به مسار مجلد الكوكيز في جهازك
Dim path As String
path = GetFolderPath(Environment.SpecialFolder.Cookies).ToString
' في حالة حدوث خطأ يذهب الي الجزء الخاص بمعالجة الخطأ
On Error GoTo ahmed
'حذف جميع الملفات التي تنتهي بامتداد .txt
'و الموجودة في مسار الكوكيز
Dim fs As New Scripting.FileSystemObject()
fs.DeleteFile(path & "\*.txt", True)
'عند نجاح العملية يخبرك البرنامج بذلك
Console.WriteLine("cookies have been removed from your system")
Console.ReadLine()
Exit Sub
'في حالة حدوث خطأ
ahmed:
'أظهر الخطأ
Console.WriteLine("there is no cookies files or may be some pf them in use")
Console.ReadLine()
End Sub
End Moduleبعد ذلك قم بترجمة مشروعك
ثم انتقل الي الجزء السهل:
* افتح قائمة run و اكتب الاتي gpedit.msc
ستظهر لك نافذة كهذه
image 1
* قم بفتح التبويب windows settings ثم internet explorer maintenance ثم double click علي browser user interface
* من الناحية اليمني من النافذةdouble click علي browser toolbar customizations و من ثم سيظهر لك شيء مشابه للأتي
image 2
اضغط علي الزر add و نحن هنا نحاول أن نضيف زر جديد الي ال toolbar لنقوم من خلال النقر عليه باستدعاء البرنامج الذي سيؤدي لنا الوظيفة التي نحتاجها و هي هنا مسح ال cookies
و سيظهر لنا الشكل التالي
image 3
بعد ذلك اضغط علي Ok
Ok
مبروك المفروض أن يكون لديك علي ال toolbar ما يشبه ذلك:
image 4
أرجوا المعذرة بالنسبة للصور فأنا لا أملك موقع علي أي حال ملف الشرح به الصور و الشرح كاملا كذلك سأرفق الصور في ملف خاص بنفس ترتيبها
ملحوظة هذه المقالة ليست مترجمة من أي منتديات أجنبية لذلك أتوقع علي الأقل الاحتفاظ بحقوقي الادبية و عدم ازالة اسمي من علي المقال و شكرا
أخوكم المبتديء : أحمد شلبي
