ahmed es

اليك ملف ال Manifist وما عليك الا تسمية المشروع اى الملف التنفيزى به وهناك ايضا موضوع للاخ Msayed لا اتذكر الراببط لكن بقليل من البحث ستجده manifest.rar

يمكنك من خلال اداه الربط ole وهى موجودة ضمن ال Common controls الخاصة بالفيجوال بيسيك بالتول بوكس

ستجد فى توقيعى مشروع برنامج لنسخ الملفات مهما بلغ حجمها مع تحديد سرعة انسخ وفى وجوود بروجريس بار يحدد تقدم العملية

يا سيدى انت اعلى واحد فينا :lol: هتهمك الكام درجة دول -_- طب ادهوملى :( انا نفسى اعرف انت بتجيب الوقت للتحضير للدروس دى كلها من فين ربنا يوفقك

لم تختاراخى المكان المناس ب لوضع سؤالك

اوك run time error 75 path file acces error تمت تكملة الموضوع بواسطة محمد سيد HnHn : السهم 50 نقطة ازاى اضع 350 تكست بوكس على فورم واحد HnHn : السهم 100 نقطة والان وحش النقاط عندى شرح بروتوكول نقل الملفات HnHn : السهم 300 نقطة ------------------------ HnHn : ر…

مرسييييييى بوكو انا فعلا كنت محتاجلها

مش كل الناس تعرف تستخدم ال API وتصنيع الكنترولز هدى نفسك وبلاش السرير ممكن الكنبة :lol:

شكرا جدا لك اخى هانى فانت تبزل مجهود جبار فى احياء المنتدى وبث روح التحاون بين الاعضاء لنتعامل كفريق ليكو اسم المنتدى اسم على مسمى لكن كل ما اريده من هذا المنتدى الرائع هو العلم وليس النقاط لكن لا باس فتلك المسابقات شئ جديد من نوعه (بورصة النقاط البرمجية) لكى …

داله ubound تقوم بارجاع اخر index فى المصفوفة مع احترامى للاخ msayed يجب عليك اضافه 1 الى الناتج الخارج من الدالة لان الترقيم يبدا من 0 فاذا عادت الداله ب 9 فان هذا الرقم هو اعلى فهرس ويكون عدد عناصر المصفوفة 10

يا سلام على المرح طب افرد عمل on error resume next هيعدى مهارة اخونا المزمجر كدة لازم نعمل Depugging للفيجوال بيسيك نفسه

Api function to get the short name والله شئ جميل :lol: :rolleyes:

رغم انى بتخنق من برمجة قواعد البيانات لكن اليك احد الطرق ادخل الى مربع الادوات توول بوكس واضغط كلبك بمين واختر combonents ثم اضف microsoft data bound grid Add a data activex control, set the database name of the data control to the database that you want, then…

اذا كان الملف شغال او يستخدمه برنامج اخر او مفتوح اذا كان تنفيزى فسيظهر هذا الكود جرب البرنامج على ملفات اخرى وهناك عيب اخر واذا حاولت اللعب فى ملف على Cd او flopy write protected نفس النظام حاول تغيير المسار وجرب

يا اخى 350 تكست حرام عليك كدة البرنامج تقل منك ولو شغلته على جهاز غير الجهاز بتاعك يكون اضعف فى الاككانيات !!!!!!!!!!!!!!!!!!!!!!!!!!! استعمل الادوات التى تعرض البيانات بطريقة جدولية مثل ل Grid ;Data bound list ,data bound grid افضل من 350 تكست قابلين للزيادة

للاسف انا لا املك ادوات Osen ولا الادوات الاخرى التى استعملتها فى مشروعك ارجو ان ترف الكود الخاص بالخطا لاستطيع تحديده

اضافة كلمة المرور بتلك الساطة يسهل كسرها

لحذف الرقم العشرى استخدم دالة FIX Private Sub Command1_Click() Dim num As Double num = Val(Text2) Text1 = Fix(num) End Sub اما لحذف الرقم الصحيح فيمكنك طرح الرقم الاصلى من الرقم الناتج من العملية السابقة

انت تتكلم عن الهندسة العكسية فهذا نوع اخر من البرمجة ولا يتم بلغة الفيجوال بيسيك ولا اى لغة من لغات المستوى العالى وانما يتم بلغة التجميع واذا اردت ان تعرف فيمكنك تعلم تلك اللغة هى صعبة قليلا لكن ستفيدك فى كثير من الاشياء مثل حماية برامجك بطريقة فعالة والتحكم …

اظن ان الى فى بالك الاخ اسامة :rolleyes: هو فعلا يستاهل لانه مشاركاته متميزة وردوده على الاعضاء جميلة جدا مبروك يا عم خدت 8 اصوات لوحدك اظاهر ان الناس هنا بتحبك كتير :lol: لكن اريد من بقية الاعضاء ان تنتظر الثواب من الله -waf