GHOST2010

تستطيع تصميم الادوات باختيار مشروع من نوع ActiveX Control سيفتح لك مشروع تصميم الاداة قم بكتابة اكواد الاداة ثم بعد ذلك من قائمة Project اختر Make ControlName.Ocx :rolleyes:

السلام عليكم ورحمة الله وبركاته هذا اسهل كود لحذف مجلد Dim Obj As Object Set Obj = CreateObject("scripting.filesystemobject") Obj.DeleteFolder "C:\Test"

هو انت هاتحكى فيلم رعب ياعم احكى اصل انا باحب اسمع الحاجات دى جداً :lol: :lol:

السلام عليكم ورحمة الله وبركاته هذا الرقم يعبر عن رقم الملف والذى يتم استخدامه للاشارة الى الملف عند القراءة منه او الكتابة فيه والقاعدة الوحيدة عند كتابة الرقم هى عدم وجود ملف مفتوح بنفس الرقم لذلك يفضل استخدام الدالة FreeFile ليكون الكود كالتالى Dim N As Int…

السلام عليكم ورحمة الله وبركاته هذه الاداة تغنيك عن كتابة الكثير من الاكواد فهى تخبرك بمساحة الدرايف والمساحة الخالية واسم المستخدم واسم الكمبيوتر و........ Fullsysi.rar

الموضوع الموجود فى الرابط عن كيفية عمل سيت اب اما المطلوب عمل برنامج يحول مشروع الفيجوال بيسيك الى ملف تنفيذى >>>>>>>COMPILER

ممكن اعرف حلم المشرحة ده ؟ :rolleyes:

اظن انه يقصد عمل Compiler لمشروع فيبى :wacko:

السلام عليكم ورحمة الله وبركاته انا اعرف الطريقة المثالية فى الدوت نت واعرف طريقة هنا لكن لااعرف ان كان يوجد غيرها ام لا اضف اداة DriveListBox ثم اكتب هذا الكود Private Sub Form_Load() On Error GoTo Handle Drive1.Visible = False Drive1.Drive = "a:" Exit Sub Ha…

مبروك ياريكا واضح انهم عرفوا انك اترقيت فقالوا نضيع عليه الفرحة بدل ماينسى اللى اتعلمه :rolleyes:

فى اعتقادى انه طالما ان الامتداد SWF فان الفيبى لن يمانع وسيتعامل معه بدون اخطاء لكن لابد من التجربة وبالنسبة للباور بوينت فيمكن اضافته للفيجوال بيسيك عن طريق اداة كائن الربط والتضمين OLE

توضيحات ممتازة اخى crazy-man فعلاً لايوجد مجال للمقارنة بين الفيبى6 والفيبى دوت نت ولا السى بلس والفيبى فكما قلت فرق شاسع ريح دماغك وخش على الدوت نت ومش هاتندم وكما اقول دائماً لامانع من اتقان اللغتين معاً :rolleyes:

البرنامج اسمه ResHack

كما هو موضح فى الكود فهو خاص بحدث انهاء الفورم Form_Unload

اخى الكريم neo اعرف كيفية فتح الملف بدوال الـ API لكن ما الدالة البديلة للامر Lock فى الدوال السابقة ?

اذا كان المشروع يحتوى اكثر من نافذة فاستخدم هذا الكود Private Sub Form_Unload(Cancel As Integer) Dim F As Form For Each F In Forms Unload F Set F=Nothing Next End End Sub

كان يجب عليك تعديل الخاصية Visible الى False عند تصميم الاداة انا لم اجرب الاداة لكن اذا كانت الخاصية OneVer تعتمد على الاكر App.PrevInstance فعليك تغييرها لان البرنامج اذا تم نسخه او تغيير اسمه سيعمل دون اى مشاكل :rolleyes: لى كل الشرف ان اكون صديقك :rolleyes…

يوجد العديد من البرامج لن تستطيع عملها الا بالدوت نت طبعاً لانى لست خبيراً فلن استطيع اخبارك بها لكن انتظر معرفتها من خبراء الدوت نت وخصوصاً العزيز crazy-man

مثال بسيط , هل تستطيع ان تصمم برنامج مراقب للنظام بالفيجوال بيسيك ؟ لن استطيع انا عن نفسى تصميمه اما فى الدوت نت لديك الاداة FileSystemWatcher التى تحدد لها المسار المطلوب مراقبته وتخبرك اذا تم حذف ملف او اضافة ملف او مجلد اى تخبرك بالتعديلات التى حدثت فى هذا …

اخى crazy-man هذا البرنامج صممته منذ فترة والقصور تم معالجته فى الاصدار الجديد فعند خروج المستخدم من البرنامج يتم فك تشفير ملفاته فقط اما باقى الملفات فتظل مشفرة وطريقة تشفير النص داخل الملفات النصية اعرفها تماماً لكنها تحمى الملف من القراءة فقط وليس من الكتاب…