اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

امثلة مفيدة


الردود الموصى بها

السلام عليكم ورحمة الله

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

المثال الاول احضار الحساب الاب والابناء وابناء الابناء الخ دون استخدام الدالة

like

  المثال الثاني سيكون عن استخدامات

Data shaping

والتي تستخدم في انشاء

recordsets within recordsets

ضمن

ADO OBJECT

والتي نستخدم في العرض الشجري للبيانات

 

PARENT.accdb

تم تعديل بواسطه محب العقيدة
  • Like 4
رابط هذا التعليق
شارك

السلام عليكم

المثال الثاني

 المكتبات الممضافة
لعرض الشجري
Microsoft Windows Common Controls 6.0
ADOو
Microsoft ActiveX Data Objects 6.1 Library
الصيغة المبسطة بوجود ابناء فقط
SHAPE {parent-command}
APPEND ({child-command} [[AS] table-alias]
RELATE (parent-column TO child-column)
الصيغة المركبة مع وجودابناء ابناء......
SHAPE {SELECT * FROM Parent}
APPEND ({SELECT * FROM Child1}
RELATE parent-column TO child1-column) AS child1-alias,
({SELECT * FROM Child2}
RELATE parent-column TO child2-column) AS child2-alias
مثال
SHAPE {SELECT CustomerID AS [Cust Id],
CompanyName AS (Company) Customers}
APPEND ({SELECT CustomerId, OrderDate, OrderId,
Freight FROM Orders} AS custOrders
RELATE (CustomerID TO CustomerID)
جدولcustomers وجدولorders
استخدام select الاولى تمثل الاب لمجموعة السجلات
استخدام select الثانية تمثل الابن لمجموعة السجلات
استخدام append  تمثل اضافة الابناء الاىناء
 adChapter يمثل الحقل في مجموعة الاباء  الناتج عن  اضافة الابناء الى الاباء
في المثال السابق  سمي ب Custorders وفي حال لم نسمه يعطى اسما افتراضيا
استخدام relate للربط بين الاباء والابناء دون الحاجة الى ذكر اسماء الجدول فقط الترتيب
مزود خدمة data shaping service  يكون
conn.Provider = "MSDataShape"
الارتباط بالسجلات في اكسيس 2003
Dim conn As ADODB.Connection
strConn = "Data Provider=Microsoft.Jet.OLEDB.4.0;" & _
    "Data Source=" & CurrentProject.Path & _
   "\Northwind.mdb"
    conn.ConnectionString = strConn
الارتباط ب اكسيس 2007 فما فوق
strConn = "Data Provider=Microsoft.ACE.OLEDB.12.0;" & _
    "Data Source=" & CurrentProject.Path & _
   "\Northwind.accdb"
لنظر الى المرفق النموذج

المثال الثالث ان شاء الله
كيفية عرض وفتح التقارير والنماذج في العرض الشجري

 

image.png

image.png

TREEVIEW.zip

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information