Visual Basic 6.0 translation

Friday, January 14, 2011

VB 6.0 Crystal Report With MS-Access 2003 - PassWord Problem

بسم الله الرحمن الرحيم
المشكلة : 
قاعدة البيانات بها باسورد لا تسمح بطياعة التقرير

حل المشكله :
بسيط جدا و موجود فى موقع الكريستال نفسه لو انت بتقرا .
عندنا قاعدة بيانات اكسس 2003 و فيجوال بيزك 6 مثلا و تقرير كريستال 4.6 مثلا مش لازم الاصدارات دى بالذات يعنى , المهم قاعدة البيانات عليها باسوورد مثلا (ahmed) و لما بنييجى ننفذ كود الطباعه من الفيجوال بيزك بيدى Error ...

تجرية :
قبل كود الطباعه crystalreport1.action = 1
هنكتب
 CrystalReport1.PassWord = chr(10) & "ahmed" and thanx problem solved
و شكرا تم حل المشكلة


لمزيد من الاخبار المثيرة جدا
و دروس الدوت نت مع قاعدة البيانات أكسس

Tuesday, January 11, 2011

The details of working with MS-Access 2003 Database through a network on windows XP

بسم الله الرحمن الرحيم
الموضوع عن : العمل على قاعدة بيانات من نوع اكسس 2003 من خلال شبكه على ويندوز اكس بى

الموضوع منقول عن الموقع الرسمى لقواعد بيانات ميكروسوفت اكسس و لكن بعد تجربتة و ترجمتة للعربية و تطبيقه مع الفيجوال بيزك 6 للاستفاده من من خلال البرمجة باستخدام قاعدة بيانات اكسس 2003 , و لكن ايضا يمكن تجاهل الجزء الخاص بالبرمجه .

لاحظ ان الشرح الاتى ينطبق فقط على قاعدة البيانات من نوع ms-access 2003 .
اذا كنت تعمل على شبكة داخلية فتستطيع أنت و من معك على الشبكة العمل على قاعدة بيانات من نوع اكسس فى نفس الوقت.

1) طريقة مشاركة البيانات Share Data :

شكل رقم (1)

هناك العديد العديد من الطرق لمشاركة البيانات فى بيئة متعددة المستخدمين .....
- طريقة مشاركة كل قاعدة البيانات و ذلك عن طريق وضع قاعدة البيانات على جهاز سيفر أو على جهاز عادى فى فولدر و تمكين المشاركة عليه كما بالصورة .... شكل رقم (1) عن طريق الدخول على My Computer مثلا و اختيار هذا الفولدر لمشاركة البيانات من خلاله حيث يتم وضع قاعدة البيانات داخلة ( اذا كنت مبرمجا فعند عمل Package للبرنامج الخاص بك تذكر ان تجعل امتداد قاعدة البيانات هو امتداد الفولد على السيرفر مثلا : Data Source = "//Server1/MyApp/db.Mdb على ان تكون قاعدة البيانات فى المسار المباشر مع الفورم حيث انك ستقوم بعمل SetUp للـــ Package فى الدرايف C عادة و التالى ستستبدل Server1 باسم الجهاز الذى يحتوى على قاعدة البيانات و الفولدر MyApp باسم الفولدر الذى سيحتوى على البرنامج بعد تسطيبه على الدرايف C مثلا و اسم قاعدة البيانات db.Mdb باسم قاعدة البيانات الخاصه بك. و تاكد  ايضا ان الاجهزة ترى بعضها تماما و انك يمكنك الدخول على قاعدة البيانات يدويا)
 و هذه الطريقه هى اسهل طريقه لتطبيق الموضوع فجميع المستخدمين يتشاركون الجداول و التقارير و الماكرو و جميع محتويات قاعدة البيانات .
استخدم هذه الطريقه اذا كنت لا تستطيع ان تجعل المستخدمين يقوموا بانشاء الكائنات الخاصة بهم (الجداول و الكويرى و غيرها من محتويات قاعدة البيانات) أو اذا كنت ستجعل كل المستخدمين يعملون على قاعدة البيانات بنفس الطريقة .
- طريقة مشاركة الجداول فقط عن طريق وضع الجداول على شبكة السيرفر و باقى كائنات Objects قاعدة البيانات على اجهزة المستخدمين و هذه الطريقه اسرع حيث سيتم نقل البيانات فقط عن طريق الشبكة .... و لا أظن ان المبرمج يستخدم هذه الطريقة حيث أن هذه الطريقه تجعل قاعدة البيانات مقسمه الى أجزاء و لا يؤثر المستخدمين فى بعض من ناحية العمل و بالتالى ستكون الجداول مستقله عن بعضها البعض .
- طريقة المشاركة عن طريق الانترنت و ذلك عن طريق استخدام مخرجات بيانات قاعدة البيانات فى صفحات html او Shtml ثم عرض المخرجات فى صفحات الويب .
- طريقة عمل نسخ عديده من قاعدة البيانات و اعطائها للمستخدمين فى حين الاحتفاظ بنسخة على جهاز يستقبل البيانات فى BriefCase و كل مستخدم يعمل على نسخته و يقوم فى النهايه بعمل تحديث للنسخه التى بالــ BriefCase عن طريق استخدام الـــ Dial Up Connection للاتصال بالشبكه .
- طريقة Server/Client اذا كنت تعمل فى مثل هذه البيئة يكون برنامج الاكسس هو الـــ Client و برنامج مثل Sql Server هو الـــ Server و تقوم بتخزين البيانات الموجوده بقاعدة البيانات اكسس فى جداول السيرفر الموجوده بــــ Sql Server و يتم تحديث قاعدة البيانات Access من خلال Sql Server .

ملحوظة : تعديل البيانات التى تمت مشاركتها (Shared Data)
اذا كنت تعمل على حقل و معك اخرين يعملون على نفس الحقل فقد يقوم البعض فمسحه أو تعديله فى الوقت الذى تقوم انت فيه بالتعديل عليه فان ميكروسوفت قدمت ميرزه و هى شكل المحرك الذى يشير الى الجداول و الحقول الى يتم العمل عليها (انظر الجدول)
و هذه العلامه تعنى المؤشر و هذا الشكل يبين ان الحقل لم يتم تعديله
و هذه العلامه تشير الى ان الجدول جارى التعديل عليه أو تم التعديل فيه و لكن لم يحفظ التعديل بعد و بالتالى يستطيع المستخدمين الاخرين مشاهدة اخر تحديث على الحقل و لكن دون ان يستطيع اي منهم العمل على الحقل و لكى تسمح لهم بذلك فعليك اما الحفظ أو الرجوع فى التعديل Undo
و هذه العلامه تشير الى ان الحقل المراد مغلق عن طريق مستخدم اذا اردت ان تفتحه فلن تستطيع و ستسمع Beep

أتمنى ان يكون الموضوع مفيد
اذا كان لديك اى استفسار ... ضع تعليقا
مع العلم انه تمت تجربة الطريقة الاولى فى مشاركة قاعدة البيانات كاملة على ويندوز اكس بى و نجحت جدا ....

Greetings
Evry1falls,

Monday, January 3, 2011

VB 0.6 Copy, Paste, Cut and Create Folders

بسم الله الرحمن الرحيم
درس اليوم هو فى التعامل مع المجلدات و الملفات باستخدام الفيجوال بيزك 6 بالنسخ و القطع و اللصق
    أولا : للتعامل مع FSO او File System Objects يجب اضافة الـــ Reference الخاص به الى المشروع ... كما بالصورة :
        ثانيا :  تعريف المتغير المسؤل عن التعامل مع مكتبة الـــ FSO و ليكن FsoBj و يكون  الكود معرف على مستوى المشروع فى منطقة الـــ General Declaration و ذلك  حتى يكون لنا مطلق الحرية فى التعامل معه فى أى مكان بالكود .
          Dim FsoBj as New FileSyaytemObject





            تتكون المكتبة من الكائنات (Objects) الاتية :
              Object
              Description
              FileSystemObject
              (FSO)
               و هو اعلى الكائنات فى مكتبة الــ FSO و هو يسمح للمبرمج التعامل مع الملفات و المجلدات و الدرايفات كما يشاء و ينشىء مجلدات و يتأكد من وجود درايف من عدمه و ينقل الملفات الى مكان
              Drive
              و هو الكائن المسؤل عن اختبارات البيانات التى تتعلق بالدرايفات سواء كانت على نفس الكمبيوتر او على الشبكة و ايضا التعامل مع الـــ CD ROM/RAM
              File object
              و هو الكائن المسؤل عن التعامل مع الملفات و التى تمثل الكيان المادى لما هو بالفولدرات
              Folder object
               و هو الكائن المسؤل عن التعامل مع المجلدات و ما تحتوية من مجلدات فرعية.
              TextStream object
               و هو الكائن المسؤل عن قراءة و كتاية الملفات النصية txt.*
                خصائص الكائن F S O :
                    اولا : DRIVE : يعود بقيمة مجموعة الدرايف المشار اليها .
                        طرق التعامل مع الـــ FSO :
                          Object
                          Description
                          BuildPath
                          اضافة امتداد ملف الى امتداد ملف موجود بالفعل
                          CopyFile
                          نسخ ملف من مكانه الى مكان اخر
                          CopyFolder
                          نسخ مجلد من مكانه الى مكان أخر.
                          CreateFolder
                          انشاء مجلد
                          CreateTextFile
                          انشاء ملف نصى *.txt و تخزين قميتة (محتواه)
                          DeleteFile
                          حذف ملف
                          DeleteFolder
                          حذف مجلد
                          DriveExists
                          التأكد من وجود درايف من عدمة
                          FileExists
                          التأكد من وجود ملف من عدمة
                          FolderExists









                          التأكد من وجود المجلد من عدمة
                          GetAbsolutePathName
                          يعود بقيمة مسار الملف أو المجلد كاملا
                          GetBaseName
                          Returns the base name of a file or folder.
                          GetDrive
                          يعود بقيمة الدرايف
                          GetDriveName
                          يعود بأسم الدرايف
                          GetExtensionName
                          يعود بامتداد ملف عن طريق معرفة مساره
                          GetFile
                          تخزين ملف فى متغير كملف
                          GetFileName
                          يعود باسم ملف
                          GetFolder
                          يعود بقيمة المجلد
                          GetParentFolderName
                          يعود بقيمة المجلد الرئيسى للمجلد
                          GetSpecialFolder
                          Returns an object pointer to a special folder.
                          GetTempName
                          Returns a temporary (randomly generated) file or folder name that can be used with CreateTextFile.
                          MoveFile
                          ينقل الملف (قص)
                          MoveFolder
                          ينقل المجلد (قص)
                          OpenTextFile
                          فتح ملف نصى و العودة بقيمة محتواه (النص)
                          • طريقة التعامل مع الدرايف : 
                          Object
                          Description
                          AvailableSpace
                          المساحه المتوفرة
                          DriveLetter
                          الحرف المميز للدرايف مثل (C)
                          DriveType
                          قيمة رقمية لنوع الدرايف و عادة ما تكون كالتالى :
                           0 (Unknown),
                          1 (Removable),
                          2 (Fixed),
                           3 (Remote),
                          4 (CD-ROM)
                           5 (RAM Disk).
                          FileSystem
                          متغير نصى يحدد نوع ملف النظام للدرايف مثل
                           ("FAT", "FAT32", "NTFS", etc.).
                          FreeSpace
                          تماما مثل AvailableSpace
                          IsReady
                          تعود القيمة (True/false) على ما اذا كان الدرايف جاهز أم لا
                          Path
                          متغير نصى يحدد مسار الدرايف مثل (/:C)
                          RootFolder
                          المجلد الرئيسى للدرايف
                          SerialNumber
                          يعود متغير رقمى من نوع Long عارة عن قيمة رقم الدرايف التسلسلى
                          ShareName
                          الاسم الذى يحملة الدرايف على الشبكة المحلية
                          TotalSize
                          حجم الدرايف بالبايت Byt
                          VolumeName
                          حجم الداريف
                          • خصائص الملفات :
                          الخاصية
                          الوصــــف
                          Attributes
                          متغير رقمى يعود بقيمة خصائص الملف و تكون كالتالى
                           0 (Normal),
                           1 (ReadOnly),
                           3 (Hidden),
                           4 (System),
                          8 (Volume),
                           16 (Directory),
                          32 (Archive),
                           64 (Alias),
                           128 (Compressed).
                          DateCreated
                          تاريخ انشاء الملف
                          DateLastAccessed
                          تاريخ اخر مرة تم التعامل مع الملف بالفتح
                          DateLastModified









                          تاريخ اخر مرة تم التعامل مع الملف بالتعديل
                          Drive
                          الحرف المميز للدرايف الذى يوجد به الملف (C)
                          Name
                          اسم الملف
                          ParentFolder
                          المجلد الرئيسى للملف
                          Path
                          مسار الملف
                          ShortName
                          اسم مختصر للملف على طريق الدوس
                          ShortPath
                          وصف مختصر لمسار الملف كما بالدوس
                          Size
                          حجم الملف بالبايت Byt
                          Type
                          نوع الملف (Microsoft Word Document)





                          • طريقة التعامل مع الملفات :
                          الطريقة
                          الوصف
                          Delete
                          حذف الملف
                          Move
                          نقل الملف (قص)

                          Copy
                          نسخ الملف
                          CreateTextFile
                          تعود بقيمة TextStream تدفق للنص كمتغير للتعامل مع ملف تم انشاءه الان
                          OpenAsTextStream
                          فتح ملف موجود بالفعل و تخزين محتواه TextStream









                          • خصائص التدفق النصى TextStream:
                          الخاصية الوصــــف



                          AtEndOfLine
                          متغير (true/false) يوضح ما اذا كان المؤشر وصل لنهاية الملف أم لا و تفضل استخدامها عند قراءة الملف ككل



                          AtEndOfStream



                          متغير (true/false) يوضح ما اذا كان المؤشر وصل لنهاية الملف أم لا و تفضل استخدامها عند قراءة الملف سطر سطر



                          Column
                          رقم العمود الذى يوجد به الحرف فى الـــ TextStream



                          Line



                          رقم السطر الذى يوجد به الحرف فى الـــ TextStream

                          • طريقة التعامل مع التدفق النصى TextStream:
                          الطريقة الوصــــف
                          Close
                          اغلاق تدفق نصى مفتوح
                          Read
                          قراءة عدد من الحروف فى نص معين و تعود القيمة كمتغير نصى
                          ReadAll
                          قراءة جميع (كافة) النص و تعود القيمة كمتغير نصى
                          ReadLine
                          قراءة سطر كامل
                          Skip
                          تجاهل قراءة عدد معين من الحروف عند قراءة النص
                          SkipLine
                          تجاهل قراءة عدد معين من السطور عند قراءة النص
                          Write
                          كتابة نص معين فى النص
                          WriteLine
                          كتابة سطر جديد بعد نهاية النص
                          WriteBlankLines
                          انشاء سطر جديد فارغ









                          و الان مع المثال العملى و الاكواد ...... انتظرونا فى الدرس الثانى بالصور ان شاء الله تعالى

                          Visual Basic Online Course

                          vb6 (63) Application Development (45) Visual Basic Online Course (45) Online Visual Basic Course (44) Visual Basic Help (44) Visual Basic Programming (42) IT Jobs (39) VB6 developer (38) Visual Basic Course (38) Visual Basic 6.0 (26) Microsoft Visual Basic 6.0 (25) VB6.0 (24) Visual Basic Programmers (24) vb 6.0 (24) visual basic programming tutorial (19) Third lesson (16) Source code download for Visual Basic 6.0 (14) Source code for Visual Basic 6.0 (10) visual basic tutorial (9) Visual Basic 6 (5) Visual Basic Courses (5) Lesson 3 (4) VB 0.6 - TreeView control (4) VB 0.6 With TreeView Control (4) VB6 Course (3) Create ActiveX (2) How to automate MS-Access from Visual Basic 6.0 (2) Add controls at runtime (1) Back up your Database (1) Change ActiveX icon (1) Change screen resolution (1) Create FTP (1) Crystal Reports 4.6 (1) Crystl32.ocx could not be loaded (1) DataGrid Columns re-size (1) Date Calculation (1) DateAdd Function (1) DateDiff function (1) FTP (1) Marquee Title Bar (1) Marquee VB 6.0 TitleBar (1) Method 'Action' of object 'CrystalCtrl' Failed (1) Microsoft Access with Visual Basic 6.0 (1) OpenSchema method (1) Save File Using CommonDilog (1) Track Database path (1) VB 0.6 - Registry (1) VB 0.6 With Registry Editor (1) VB 6.0 Access (1) VB 6.0 OOP (1) VB6 Access2003 ADO Like % (1) VB6 Add Date (1) VB6 Add Time (1) VB6 Date calculation (1) VB6 Subtract Date (1) Visual Basic Remote (1) Win7 (1) Windows7 (1) ms access networking details (1) remote Visual Basic DB (1) rounded and transparent forms (1) vb 0.6 style (1) vb 6.0 Remote Database (1)