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

الرجاء مساعده في كود استعراض امتداد exe

مغلق
بدأه قديم الشوق في 10 مايو 2007 · 9 رد · 905 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله وبركاته

الرجاء مساعدة في كود استعراض امتداد exe

الصوره للتوضيح

ابزعجكم بس تحملوني :D

get-5-2007-4nw_net_1wvixs2g.JPG

وشاكر لكم

سلام

get-7-2007-4nw_net_hbj46tna.jpg
#2

تقصد يعمل Browse زى مثلا Run اللى فى الـ Start Menu ؟

#3

السلام عليكم ورحمة الله وبركاته

إن شاء الله المثال المرفق يلبي طلبك ,,,,

وهو يعتمد على استخدام اداة الـ Common Daialog

بالتوفيق ,,,,

A7med_prof

common.zip

تم تعديل هذه المشاركة بواسطة A7med_prof في 10 مايو 2007 في 22:08

اقتباس

آسف الدخول متقطع هذه القتره

اقتباس

[يمين]

.[/يمين]

A7med_prof-4-2007.jpg

اخر مواضيعي 2007

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

.

.

مواضيع مهمه ومطلوبه بكثره VB6

.

بــرامج ومشــاريع عربيه كامــله {HnHn} والمزيد في قسم برامج الاعضاء || ربط قواعد بيانات اكسس مع الفيجوال بيسك, مادة دراسية كاملة {بنت اليمن}|| المرجع الشامل لجمل SQL ا {GENIUS-IT} || كيفية التعامل مع مكتبة الـ DAO, في الوصول إلى قاعدة بيانات {رمضان} || مثال ريط Visaul Basic 6.0 مع SQL SERVER ا || العمليات التي تجرى على قاعدة البيانات, مثال كامل {بنت اليمن} || تصدير البيانات من الاكسل الي الاكسس بالفيجوال بيسك {HnHn} || البحث في قاعدة البيانات {MANSUR} || قواعد البيانات العلائقية وتقنيات الوصول إليها {عبد الله فتحي} || كيفية أظهار بيانات جدولين بواسطة التاريخ ,,,,,,,

.

أخي ربما سؤالك اجابته في أحدى هذه المواضيع فإن لم تجد قم بالبحث وان لم تجد اطرح سؤالك مع وضع عنوان مناسب بحيث ان يكون هذا العنوان دال على محتوى الموضوع فغير ذلك من أكبر الكبائر في المنتدى وسيؤدي الى غلق او حذف موضوعك .

.

</
#4

السلام عليكم

شغلة بسيطة والواضح انك تتكلم عن

VB6

يمكن عمل ذلك من خلال

Project--> Compnents -- > Microsoft common dialog ...

اختار هذه الاداة حيث تظهر في صندوق الادوات اداة جديدة بعد ذلك اضفها الى الفورم وضع الخصائص التالية

CommonDialog1.Filter = "(Application Files)|*.exe"

CommonDialog1.ShowOpen

print CommonDialog1.filename

واذا اردت اكثر من ملف اضف ازواج تفصل بينهم العلامة

pipe | (shift \ )

مثال

CommonDialog1.Filter = "(All Files)|*.*|Exe Files|*.exe|Dll Files|*.dll"

ارجو ان تكون وصلت الفكرة

#5

مرفق مثال لا يعتمد على أى أداه : SelectEXE.rar

#6

يعطيكم العافيه ومشكور على الرد

الله يجزاكم خير تطبيق ولي رجعه

سلام

get-7-2007-4nw_net_hbj46tna.jpg
#7

يعطيكم العافيه ومشكورين

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

بس سؤال بسيط لزم اذا بغيت اعطي البرنامج احد لزم ارفق معه الاداه (Microsoft common dialog )

وشكرا

سلام

get-7-2007-4nw_net_hbj46tna.jpg
#8

لو أستخدمتها يبقى طبعا ايوه لو أستعملت المثال بتاعى يبقى لأ لأنى لا أعتمد عليها و أنما على الـ APIs

#9

msayed2004

يعطيك العافيه لكن حاولت اعدل على الكود

من اجل اسم الزر واسم

واضفت Module1 ونسخة كل الي فيها

لكن يعطيني علامة خطاء

معليش بتعبك معي

علشان مستقبلينا اقدر اعدل عليه

فيليت توضويح بسيط

وشكرا

سلام

get-7-2007-4nw_net_hbj46tna.jpg
#10

بعد شوية مخاطراة تم التعديل

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

الف شكر لكل من رد

واطلع للفائده

سلام

get-7-2007-4nw_net_hbj46tna.jpg

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

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

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

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

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

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