الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

ماذا تعرف عن ال ADOX

بدأه kindy_ibrahim في 15 مايو 2007 · 11 رد · 6,241 مشاهدة · في قسم الدروس والمواضيع الهامة
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بعد حكم الكثير من كبار مبرمجينا عن وفاة ADOX قررت اعادة احياء ذكراها

كثيراً ما نستخدم مكتبة ADO العادية ونعرف استخدامتها بل أي فرد لا يعرف البرمجة عمتا ممكن تلاقيه بيقولك ما تيجي نبرمج بلادو

طيب احنا كلنا عارفين مكتبة DAO ممكن بكل سهولة انشاء جدول او جدول استعلام او تنفيذ امر SQL طيب و الادو ؟؟؟؟؟؟

هقولك متقدرش تنفذ ده كله ........................

متفرحشي فيها اوي كده لسة في كلام كتيييييير

عندنا مكتبة ملحقة مع مكتبة الادو اسمها ADO Ext او ADOX

طيب ايه الفرق ما بين الـ ADO و ADOX

هقولك حال

اً

الـ ADO يمكن من خلالها عمل ما يسمي بـ DML

(DML) Data Manipulation Language

عمليه معالجه البيانات في قاعدة البيانات

SELECT

INSERT

DELETE

UPDATE

طيب و الـ DDL

(DDL) Data Definition Language

عمليه تعريف البيانات في قاعدة البيانات

CREATE

ALTER

DROP

RENAME

GRANT

فتلك العمليات السابقة خاصة بمكتبة الـ ADOX

معني كده ان الادو اكس خاصة بأنشاء قواعد البيانات وجداول و جداول الاستعلام واعطاء صلاحيات وعمل باسورد عليها

ملحوظة لو لم تسنطيع التعامل مع جمل SQL بأحتراف اذهب الي

تعلم SQl بإحتراف خطوة بخطوة--Learn SQL From Beganing To Profissional Steb By Step

يتبع في الردود القادمة عم طريقة استخدامتها وكيفينها بالامثلة

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

#2

بدايه موفقه اخ كندي ,, والتميز في المحاوره والاسلوب اللين !!

اتمنى لك التوفيق ,,,,

A7med_prof

اقتباس

آسف الدخول متقطع هذه القتره

اقتباس

[يمين]

.[/يمين]

A7med_prof-4-2007.jpg

اخر مواضيعي 2007

االمثال مطبق على موقع بورصه سعودي

.

.

مواضيع مهمه ومطلوبه بكثره VB6

.

بــرامج ومشــاريع عربيه كامــله {HnHn} والمزيد في قسم برامج الاعضاء || ربط قواعد بيانات اكسس مع الفيجوال بيسك, مادة دراسية كاملة {بنت اليمن}|| المرجع الشامل لجمل SQL ا {GENIUS-IT} || كيفية التعامل مع مكتبة الـ DAO, في الوصول إلى قاعدة بيانات {رمضان} || مثال ريط Visaul Basic 6.0 مع SQL SERVER ا || العمليات التي تجرى على قاعدة البيانات, مثال كامل {بنت اليمن} || تصدير البيانات من الاكسل الي الاكسس بالفيجوال بيسك {HnHn} || البحث في قاعدة البيانات {MANSUR} || قواعد البيانات العلائقية وتقنيات الوصول إليها {عبد الله فتحي} || كيفية أظهار بيانات جدولين بواسطة التاريخ ,,,,,,,

.

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

.

</
#3
اقتباس
بدايه موفقه اخ كندي ,, والتميز في المحاوره والاسلوب اللين !!

اتمنى لك التوفيق ,,,,

A7med_prof

حبيب قلبي احمد طول عمرك بترفع من معنوياتي

لو انا تميزت في المحاورة و الاسلوب اللين فأنا خريج مدرسة

A7med_prof

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

#4

دلوقتي هنعرف ازاي ننشأ قاعدة بيانات بالكود بأستخدام الادو اكس

طبعاً مكتبة الادو اكس زيها زي كل المكتبات لازم ندرجها من الـ Reference

Image13.jpg

Image23.jpg

بعد كده نحط الكود ده تحت أي زر الكود التالي

Dim catalog As New ADOX.catalog

Dim tb As New ADOX.Table

Dim col As New ADOX.Column


catalog.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source = works.mdb"

tb.Name = "kindy"

tb.Columns.Append "no", adInteger


catalog.Tables.Append tb

الشرح

بدأت الكود بالتعريفات بتاعتي كتالي

Dim catalog As New ADOX.catalog

Dim tb As New ADOX.Table

Dim col As New ADOX.Column

ADOX.catalog = ADODB.Connection

بس طبعاً كل واحدة في مكتبة معينة

وبالتالي الكود ده

catalog.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source = works.mdb"

خاص بفتح قاعدة البيانات والاسترينج واحد بالظبط

tb.Name = "kindy"

اسم الجدول المراد انشائه

tb.Columns.Append "no", adInteger

اسم الخقل المراد انشائه في الجدول ونوعه Integer

catalog.Tables.Append tb

امر للبرنامج بإنشاء قاعدة البيانات

علي ما اظن الكود بسيط و الشرح أبسط

فاصل و نواصل

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

#5

المرة اللي فاتت شوفنا ازاي نعمل جدول جوه قاعدة بيانات موجودة

طيب انا لو عايز انشئ جدول بالكود يبقي الحل بسيط والكود ابسط ومش محتاج شرح

Dim cat As New ADOX.Catalog

cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=kindy.mdb"

Set cat = Nothing

الشرح

Dim cat As New ADOX.Catalog

حجز نسخة جديدة من الكلاس بتاع الادو اكس في الذاكرة

cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=kindy.mdb"

ده كود انشاء الجدول شكله باين زيه زي كود الاتصال بالظبط بس غيرنا من ActiveConnection الي Create

Set cat = Nothing

الكود السابق يفرغ الذاكرة من المحتويات المتغير cat

مازال للحديث بقية

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

#6

جداول الاستعلام

هي جداول فرعية يمكنك انشائها

فهي تعتبر الاستعلامات هي الجزء الأساسي في قاعدة البيانات، حيث يمكنها القيام بعدة وظائف. غير أن وظيفتها الأساسية هي استرداد بيانات معيّنة من الجداول. غالبًا ما تكون البيانات التي ترغب في رؤيتها منتشرة في عدة جداول، فتمكنك الاستعلامات من عرضها في ورقة بيانات واحدة. وكذلك، بما أنك لا ترغب دائمًا في رؤية كافة السجلات مرة واحدة، تسمح لك الاستعلامات بإضافة معايير لـ "تصفية" البيانات لتقتصر على السجلات التي تريدها فقط

يعني ايه الرغي اللي انت بتقوله ده كله

يعني مثلاً عندك بتاع 10 جداول وانت اردت تجمع حبة بيانات من كل جدول علي اساس شرط معين وجمعهم في جدول واحد يبقي مش قدامك حل غير جداول الاستعلامات

ومن مميزات جداول الاستعلامات انه بتحدث معلوماتها ذاتيا يعني ايه

يعني انت لو ضفت اي معلومة في اي جدول وبينطبق عليها شرط جدول الاستعلامات هتتضاف اتوماتيكياً لجدول الاستعلامات

الكود التالي يوضح انشاء جدول الاستعلامات

Dim cat As New ADOX.catalog
 Dim com As New ADODB.Command
 cat.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source = works.mdb"
 com.CommandText = "select * from kindy"
 cat.Views.Append "quary1", com

الصورة من قاعدة البيانات بعد الانشاء

Image14.jpg

الشرح

Dim cat As New ADOX.catalog
 Dim com As New ADODB.Command

طبعاً كلنا حفظناه بس لاقيت دخيل علينا :angry:

هقولك مكتبة الادو لازم تزور اختها في الوقت ده ليه :huh:

علشان عندنا لازم نستقبل جملة SQL و الـ ADOX مفهاش الكلاس اللي يتعامل مع الـ SQL فالـADO مش هتسيب اختها محتارة فهي اللي هتستقبل جملة الاستعلام بدل من اختها ونشتغل عادي :lol: 

cat.ActiveConnection = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source = works.mdb"

طبعاً كود الاتصال بقاعدة البيانات الموجودة في نفس فولدر المشروع و اللي اسمها works.mdb

com.CommandText = "select * from kindy"

ده كود الاستعلام مين اللي بيستقبله نسخة كلاس الـ Command الموجود بمكتبة الـ ADO

cat.Views.Append "quary1", com

انشاء جدول استعلام بأسم quary1 بالشرط الموجود داخل com

لحظات و نعود

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

#7

لم يتبقي لنا سوي معرفة حذف الجداول او حذف جداول الاستعلام

فالكود التالي يعمل علي حذف جداول الاستعلام بعد طبعاً تعريف المتغيرات بتعتنا وفتح قاعدة البيانات بالكود كما اوضحت سابقاً

cat.Views.Delete "quary1"

فالكود التالي يعمل علي حذف الجداول بعد طبعاً تعريف المتغيرات بتعتنا وفتح قاعدة البيانات بالكود كما اوضحت سابقاً

cat.Tables.Delete "kindy"

وبكده يكون انتهينا و الحمد لله من شرح اهم حاجات ممكن تستخدمها في الـ ADOX

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

اخوكم المخلص

KINDY

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

#8

شكرا اخي كيندي ابراهيم علي الشرح الجبار

  1. سبحان الله وبحمده سبحان الله العظيم


    متى نحكم العالم زى زمان ايام اجددنا

    صلى الله على محمد صلى الله عليه وسلم



#9

يارب تكون استفدت

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

#10

حقيقي موضوعك يستحق المتابعة

جزاك الله الف خير

#11

موضوعك جامد بجد اخ كنديولكن لي طلب اتمني ان تاخذه بعين الاعتبار وهو ان تشرح الكود ذات نفسه ما معناه بالتفصيل

وتوضيح اجزاؤه بسهوله لمعرفه ما هو غرضه

التوقيع

الصقر الجارح

‏** الناس صنفان‏..‏ صنف يتوهم أنه يعرف نفسه‏..‏ وصنف يتوهم أن الناس يعرفونه‏!‏

#12

مشكوررررررررررررر علي كل هذا

مواضيع مشابهة