Posts

Showing posts from December, 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) ثم نبحث عن السجل المطلوب نقلة الضغط على زر (Find) لعرض نتيج

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. Visual Basic 6.0 - Introd