Posts

Showing posts from 2010

VB 6.0 MS-Access 2003 - Make Sure Before You Delete

بسم الله الرحمن الرحيم فى اى مشروع متعلق بقاعدة البيانات من نوع اكسس على وجه الخصوص أو من اى نوع على وجه العموم , يجب ان تتأكد قبل عملية حذف سجل ان : 1) السجل المراد حذفه موجود بالفعل و يتم ذلك عن طريق البحث عن السجل فاذا كانت نتيجة البحث ايجابية : يتم الحذف اما اذا كانت سلبية فلا يتم الحذف 2) جدول قاعدة البيانات غير فارغ و يتم ذلك عن طريق RecordCount اذا كانت = صفر بالتالى الجدول فارغ فلا يتم حذف 3) مؤشر قاعدة البيانات يقف على السجل المطلوب حذفه و يتم ذلك عن طريق AbsolutePosition اذا كانت القيمة -1 فان هذا معناه ان الجدول فارغ والمؤشر لا يقف على أى شىء فى الجدول او ان هناك مشكلة فى محرك قاعدة البيانات اما اذا كانت القيمة -2 فان هذا معناه ان المؤشر يقف قبل بداية اول سجل فى الجدول انا اذا كانت القيمة -3 فان هذا معناه ان المؤشر يقف بعد نهاية اخر سجل بالجدول , و جميع هذه الحالات لا يتم فيها الحذف. و ذلك حتى لا يقابل العميل الذى صممت من أجله البرنامج أى مشاكل عند اجراء عملية الحذف و ايضا حتى يكون البرنامج الذى تصممه لا وجد به اى عيوب (Bugs) . Visual Basic 6...

VB 6.0 - Save/Retrieve Images From Access Database

Image
بسم الله الرحمن الرحيم طريقة حفظ صورة فى قاعدة يانات اكسس و استرجاعهـــــــــــــا مرة أخرى عن طريق vb6 How to Save/Retrieve Pictures To/From Access DB Using VB 0.6 أولا : شكل الفورم النهائى قم بتصميم مشروع عبارة عن Form1 و ضع عليها الادوات (Command1 و Image1 و Command2و Command3) وظيفة الـــ Command1 هى حفظ الصورة و بالتالى تكون وظيفة الـــ Command2 هى استرجاع الصورة من قاعدة البيانات و الـــ Command3 لاختيار صورة من الكمبيوتر لعرضها و الــــ Image1 لعرض الصورة المراد حفظها و التى سيتم استرجاعها. قم بحفظ المشروع انشاء قاعدة البيانات باسم Mydb.mdb و وضعها فى فولدر المشروع (كما هو دائما متبع) انشاء جدول باسم MyTbl عبارة عن عدد (2) حقل الاول باسم Img نوعه OLE و الثانى باسم ImgSz و نوعه Number Integer قم بحفظ قاعدة البيانات و الجدول من المشروع نستدعى مكتبة ADO النسخة 2.8 او اى نسخه المنطقية : ما سنقوم بعمله هو كالاتى ( عمل متغيرين الاول من نوع Long و اسمة ImgLen ووظيفتة هى تخزين قيمة حجم الصورة المراد تخزينها فى قاعدة البيانات , و ال...

VB 6.0 with MS-Access 2003 Copy a record from table to another

Image
VB 6.0 with MS-Access 2003 Copy a record from table to another Copy record from table to another table المثال التطبيقى ( MediaFire Link ) الشــــــــــــــــــــــــــــــــــــــــرح 1) قاعدة البيانات : Database Access 2003 with (4) tables with same records count and properties (3 copies of the original) المشروع به قاعدة بيانات اكسس 2003 و عدد (4) جداول لها نفس عدد السجلات و نفس الاسماء و الخصائص اى انها نسخة من بعضها . 2 ) التصميـــــــــم : عمل خانات  فى فيجوال بيزك TextBoxes بعدد سجلات الجداول (id - name - age - phone) عمل (4) ازرار بعدد و اسماء جداول قاعدة البيانات (ahmed - ali - said - mohammed) عمل الازرار اللازمة (save - find - delete - exit) يمكنك اضافة ايضا (Previous - Next) 3 ) الطريقة (المنطق) : اذا اردنا نقل سطر "سجل" من الجدول (Ahmed) الى الجدول (Ali) نقوم بالاتى : a) الضغط على زر (Ahmed) و باالتالى يتم فتح الجدول Ahmed b) نقوم بكتابة البيانات المطلوب نقلها c) نقوم بعمل حفظ (Save) d) ثم نبحث عن السجل المطلوب نقلة الضغط على زر (F...

Visual Basic Online Course Date Calculation

Image
Visual Basic 6 Date Calculation   Visual Basic 6 - Date Calculation 1- How to Add Date (Days) Or (Months) Or (Years) To a another Date. 2- How to Calculate the Date (Day) Or (Months) Or (Years) or get the Difference Between Two Dates. The Answer Is Simple .....  1- Using The VB6 built-in Function  Syntax DateDiff(Interval,Date1,Date2) 2- Using The VB6 built -in Function  Syntax DateAdd(Interval,Number,Date2) See Example in 4shared.com ♥ V isual B asic 6.0 Course Online : Automate MS-Access Database in Visual Basic 6.0 though a net work Visual Basic 6.0 Analog Clock Vi sual Basic 6.0 Temperature Convertor Visual Basic 6.0 , MS-Access 2003 and Crystal Reports - Phone book Visual Basic 6.0 , MS-Access 2003 Database and DataGridView Visual Basic 6 .0  FTP full application source code Visual Basic 6.0 Color Picker tool source code Visual Basic 6.0 TreeView Control lesson ( Part1 - Part 2 - Part3 - Part4 - Part5 ) Arabic. V...

Visual Basic Online Course Make Sure All TextBoxes Empty

Image
Visual Basic Online Course Learn how to Make sure all Text boxes are clear first Step by step guide Say ......... you have 10 TextBox Controls and 10 ComboBox Controls on a VB6 form and you are taking their contents into a database tables , I guess you have to make sure that all the TextBox Controls and the ComboBox Controls are not empty ... So, you can do something like this .... 'Visual Basic Online Course 'Visual Basic 6 'Make Sure all Text Boxes are Empty / Clear first Private Sub CMDSAVE_CLICK() 'The button that transfer contents to tables 'if textbox1.text And Textbox2.text and ..... etc then MsgBox "Leave No Blanks" exit sub end if 'Some Codes ............ 'Some Codes ............ rs.update 'Or however you connect End Sub Github Gist Or, you may use something Like this :- I will try here to tell the VB project that TxtBx variable represents all the TextBox Controls on a form (Form1) and Cbos variable represents ...

Visual Basic Online Course Clear All TextBox controls

Image
Visual Basic Online Course vb6 clear all textbox Text controls on a form TextBoxes  are just like any other Objects on a form, could be cleared or we can say " Make it empty " . S o if we have : Textbox1 and Textbox2 and Textbox3 on a vb6 form and we have a button called "CmdNew" and its function is to clear all the writings in all of the 3 TextBoxes .... we can do something like that :- Or ......... Now ........ What if we have ComboBoxes too ? Or ......... What if we have various objects that we wanna set thier values to anything .... ?? - if you understood the previous example i think you already knew the answer .... Good Luck Evry1falls Visual Basic 6.0 Lessons, Tricks, Tutorials and help links :

VB6 Learn how to remote MS Access2003

Image
بسم الله الرحمن الرحيم MS Visual Basic 6.0 Remote MS Access Database الموضـــــــــــوع   هذه المرة يتحدث عن كيفية التعامل مع Access من خلال الــــ VB6.0 فى حالة وجود قاعدة البيانــــــــــــــات  MS Access Database (mdb.*) على جهاز اخر يصل الى الجهاز الى يحتوى البرنامج عن طريق شبكة Network . و فى البداية يجب أن نتأكد من أن الجهازين على اتصال ببعضهم البعض بمعنى : Ip Address اســـــم الشبكة نفرض ان لدينا جهازين (PC1 - PC2) و الجهاز PC1 هو السيرفر (هو الذى يستضيف قاعدة البيانات ) و ليكون اسمها ( ahmed.mdb ) فى فولدر اسمـــــــة ( MyProject ) فى داخل الفولدر ( Shared Documents ) الذى يوجد فــــــــــى ( My Computer ) ...... كما بالشكل . و يجب ان لا ننسى ان نقوم بعمل Share للفولدر الذى سيحتوى على قاعدة البيانات أو ممكن ايضا تقاريـــــر .  و سنقوم بعمل  قاعدة البيانات  الان ... '' طبعا اذا كنت غير قادر على فهم أو تطبيق اى جزء فأنت غير ملم بالموضوع و يلزمك ان تدرس أكثر '' الان انتهى العمل تماما على الجهاز PC1 و الان سنقوم بتصميم البرنامج طبعا ال...

Visual Basic Online Course Lesson 3

Image
Visual Basic 6 - Part3 فيجوال بيزك 6 - الدرس الثالث CRUD و هي تُجرى على البيانات. تُعد هذه العمليات أساسية في إدارة قواعد البيانات وتطوير التطبيقات. فهي تُمثل الإجراءات الأساسية اللازمة لإدارة المعلومات داخل النظام، بدءًا من الإدخال الأولي وحتى الاسترجاع والتعديل والحذف. يُعد فهم عمليات CRUD أمرًا بالغ الأهمية لأي شخص يعمل مع تطبيقات تعتمد على البيانات. سنتعلم فى هذا الدرس طريقة انشاء جداول قواعد البيانات MS Access Database و طريقة التعامل معها (اضافة - بحث - حذف) عن طريق الاكواد بدون اللجوء لقاعدة البيانات تماما . VB6 CRUD [Create - Read - Update - Delete] قم بتحميل الملف و ستجد شرح مبسط و رابط المشروع ... و اذا لديك اى استفسار ضع تعليق على الموضوع و سأقوم بالرد ان شاء الله .... فى المثال السابق تركنا نقطتان 4 و 5 و هما البحث و التعديل و الحذف Read/Update/Delete  و بعد هذا المشروع المطلوب منك تطبيق النقطتين حيث تم شرحهما هنا . و يوجد مفتاحان لم يتم برمجتهما هما ( Next - Previous ) و سيتم برمجتهما و شرحهما بالتفصيل ان شاء الله . مع تحيات \\ Evry1falls انظر ملف PD...

Visual Basic Online Course Lesson 2

Image
بسم الله الرحمن الرحيم Visual Basic 6 - Part2 الان و بعد ان تعلمنا بعض المصطلحات  قم بتحميل الدرس الثانى من هنا   هذا الدرس يتكلم عن : ربط الفيجوال بيزك 6 بقاعدة بيانات MS Access 2003 عمل حفظ للبيانات فى قاعدة البيانات مشروع تسجيل بيانات طالب و معرفة التقدير . عمل تعديل - حذف - بحث التنقل بين السجلات (الاول - التالى - السابق - الاخير) و لكن فى هذه المحاضرة اكتفينا بشرح أول 3 نقاط فقط فى ملف PDF كما فى الرابط على MediaFire و سيتم شرح باقى البرنامج . 🔥 Explore More Tutorials 🔥 🏢 Office Microsoft Visual Basic Help ⏲️ VB6 Analog Clock Project 💥 Part1, learn Microsoft Excel with Visual Basic 6 📱 VB6 Phonebook 📞 VB6 Phonebook Design 💾 Download VB6 & Access Source Code 🚀 Free Visual Basic 6 Download 📊 VB6 Crystal Reports Fix ⚙️ Fix VB6 Slow Controls on Win7 🌐 VB6 FTP Project Source Code 🔍 Crystal Report & Access DB Integration 🚀 Stay updated with the latest **VB6 and MS Access** tutorials!

Visual Basic Online Course Lesson 1 VB6 Terms

Image
بسم الله الرحمن الرحيم أولا  بداية  يجب على من يقرأ و يطبق مشاريع الدروس أن يكون على دراية بأساسيات الفيجوال بيزك 6 و قاعدة بيانات اكسيس ثانيا يجب تحديث الفيجوال بيزك 6 الى اس بى 6 من هنا و ذلك وظيفته : تمكين الفيجوال من الاتصال بقاعدة بيانات اكسيس 2003 و برنامج التقارير كريستال ريبورت ثالثا يجب ان تعرف ان الاكسيس 2003 ما هو الا برنامج مساعد يمكنك كمبرمج من اصدار برنامج قوى و انه ليست وظيفتك كمبرمج ان تكون خبير به , و ستكون دراستك فى ظل انشاء قواعد البيانات و الجداول و الكويرى فقط و ليس ابعد من ذلك رابعا هناك بعض المصطلحات الى يجب عليك معرفتها   IDE  و هى واجهة التصميم اى كل امكانيات و شاشات الفيجوال بيزك فى مرحلة ما قبل التنفيذ اى فى مرحلة الرسم ووضع الاكواد و الرسومات للمشروع التى تعمل علية Integrated Design Environment Visual basic 6 tutorial 1 MDB  و هو امتداد قاعدة بيانات الاكسيس 2003 PATH  و هو المسار مثل  C:/PROJECTS/MYPROJECTS/FORLDER1/AHMED/S.MDB  كل الكلمات التى هى قبل S.MDB هى عبار ع...

VB6 Popular Posts

Visual Basic Online Course - Excel 2003 Part 1

VB 6.0 - Save/Retrieve Images From Access Database

Visual Basic Online Course - ProgressBar Colors

VB 6.0 with MS-Access 2003 Copy a record from table to another

Free download Visual Basic 6 Documentation MSDN

Visual Basic Online Course - Run-time error '3021' : Either BOF or EOF is True, or the current record has been deleted.

Visual Basic Online Course - Create a Phone Book

VB6 Crystal Reports 4.6 Error : Method 'Action' of object 'CrystalCtrl' Failed

Visual Basic Online Course - Excel 2003 Part 2