محمدvb

وعليكم السلام ورحمة الله وبركاته شهر مبارك على الجميع وكل عام والأمة الإسلامة والعربية بخير الحل للمشكلة الأولى وبصراحة أنا لا أعتبرها مشكلة = يوجد ملفات ضرورية لكي يعمل البرنامج على أي جهاز يجب إرفاقها مع ملفات المشروع عند عمل بكج سواءاً بالسيتب فاكتوري أو غي…

تفضل اخي .. تحياتي TextAll.rar

أخي المطلوب منك معرفة أسم الإختصار الذي تريد حذفه فقط وهذا الكود يوصلك لسطح المكتب أياً كان المستخدم كل ما عليك فعله هو إضافة إسم الإختصار بالإمتداد الخاص به فقط ومن ثم المقارنة لو كان موجود يتم حذفه وإلا إمكانية عمله مره أخرى Environ("homedrive") & Environ("H…

لي ملاحظة بسيطة لو كانت الصورة ثابتة يعني شعار الشركة أو شي من هذا القبيل يمكنك وضعها في التقرير مباشرة دون الكود ودون أي شي ثاني بإستخدامك أداة إمج في صفحة التقرير ومن ثم تحدد عليها وتختار الخاصية Picture وتحدد الصورة المطلوبة عرضها .. وبكذا ستطبع في جميع الف…

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

العفو بس المثال المرفق يوجد به فورم1 فقط وناقص الملفات الأخرى والمثال ما أشتغل .. ؟

تفضل المثال new.rar

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

أخي حل المشكلة هذه الملف المرفق فك الضغط عنه وأنقله إلى مجلد system32 فقط وشوف شغلك عادي حيعمل معاك إن شاء الله .. تحياتي msvbvm50.rar

مرحبا أخي السديم ولا هانو جميع الأخوة مرفق لك مثال به مطلوبك أخوي ملاحظة زائده :: لو أردت أن تنشئ مجلد باسم متغير أنته تحدده كل ماعليك هو أن تدرج أداة تكست ولنفرض أن مسماها Text1 وفي كود إنشاء المجلد نستبدل ("MyProjects") يتم إستبدالها بـ Text1 لا يتم كتابة Te…

هناك أداة جميلة أسمها osensite فهي بدون أكواد وتقوم بعمل المطلوب .. تحياتي

وعليكم السلام Private Sub Command1_Click() Open App.Path & "\m.txt" For Append As #1 Print #1, Text1.Text Close End Sub إستبدال كلمة output بــ Append فقط والمثال المرفق يوضح الفكرة ملاحظة m.txt ملف نصي ضمن مجلد المشروع text1.text أداة التكست التي تقوم بإضافة …

وخليته بيقرأ السيريال بتاع الهارد علشان منع النسخ الا بالرجوع الي طالما انته اللي عامل البرنامج أعمله حركة لو ضغطت مثلاً أف 4 يطلبك كلمة مرور بدونها ما يعمل البرنامج .. وكل يوم غير كلمة المرور هذا أسهل حل أنا اشوفة لعلي أكون أفدتك .. تحياتي

أخي مرحبا الموضوع ببساطة جداً يكون بهذه الطريقة في الجنرال تضع الكود هذا dim cn as new adodb.connection Private Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long هذا الكود لجلب أسم الكمبي…

اضبط الخاصية Tabindex لجميع التكستات إبتداء من 0 يعني إذا اردت الموشر في البداية في تكست 1 ضع الخاصية السابقة = 0 ومن ثم التكست التالي 1 والتالي 2 إلى آخر تكست .. تحياتي

جزاك الله كل خير اخي الكريم على الجهد وأتمنى لك التوفيق.. تحياتي

الحقيقة اخي ميدو666 ماني مستب الكريستال ولا أعلم أي اصدار للكريستال المستخدم في مشروعك في إنتظارك اخي وتقبل تحياتي ..

جزاك الله كل خير اخي الكريم .. تحياتي

الداتا ريبورت datareport1.show السطر هذا لعرض التقرير مع مربع الحوار الخاص بالطباعة datareport1.printreport السطر هذا يحل محل السطر السابق وهو لطباعة التقرير بدون عرضه ولا عرض مربع الحوار إذا كان هذا طلبك الحمدلله وإلا أذكر نوع التقارير التي تتعامل معها .. تحي…

أهلاً وسهلاً بعودتك ياأخت زهرة ألف ألف مبروك حصولك على درجة الماجستير وإن شاء الله لك التوفيق دائماً وأبداً في حياتك جميعها .. تحياتي