Table Of Content،ةيضاير ةقلاعب ضعبلا اهضعب عم ةطبترملا ةيقطنملا تانايبلا رِ صانع نم ةعومجم يه: تانايبلا دعاوق
نوكتيو رثكأ وأ (database) لجس نم لودجلا نوكتيو .رثكأ وأ دحاو لودج نم تانايبلا ةدعاق نوكتتو
مقر لثم لوقح ةدع نم نوكتي نيعم فظومب صاخلا لجسلا هيلع لاثمو .رثكأ وأ (field) لقح نم لجسلا
تانايب نم كلذ ريغو ،هل عباتلا مسقلاو - بتارلا - نييعتلا خيرات - فظوملا ةجرد - فظوملا مسا - فظوملا
ثحبلاو تانايبلا عم لماعتلا بوساحلا انل لهسي ثيح،مظّ نم وحن ىلعَ بوساحلا زاهج يف نزخت فظوملا
.ليدعتلاو ةفاضلإا نم نيكمتلاو ،تانايبلا هذه نمض
تانايبلا دعاوق تازيمم
ةلوهس لكب اهيلإ لوصولاو تامولعملا ظفح ماظنلا اذه لهسي ثيح ،تانايبلل عاجرتسلااو لوصولا ةعرس
لماكت .فيشرلأا بتاكم اهّلتحت يتلا ةلئاهلا تاحاسملا ريفوت .همسا وأ ،همقر :لثم ،ليمعلاب قّلعتي اميف
ءاشنلإ ليمعلاب ةلص تاذ تانايب ىلع لصحنل ،يّ ندملا لجسلا عم يّ كنبلا ماظنلا طبر اننكمي ثيح ،تانايبلا
يف ةلوهسلا .ةقوثوم ةهج نم تانايبلا ىلع لصحنل ينطولا هلجسب ًاطبترم باسحلا نوكيس يلاتلابو ،باسحلا
يتلا بيلاسلأا نم يهف ،تانايبلا ظفح يف ناملأاو ةّيرسلا .ةّيقرولا تانايبلاب ةنراقم ةّيمقرلا تانايبلا ةكراشم
،يقرولا ماظنلاب ةنراقم فرظ يأ يف تانايبلا نادقف مدع نامضو ،تانايبلل ةيطايتحا خسن ظفح نم نكّ مت
ىلع ريراقتلا لهست ثيح ،ريراقتلا كلاتما .ً اسلفم ليمعلا وأ كنبلا لعجي قارولأا نزخمب ريغصلا قيرحلاف
فلتخم ىلع ءادلأا ريوطت نم نكمتتل ،ةسسؤملا لمع يف ةوقلاو فعضلا بناوج ةسارد تاسسؤملا
دّيجلا يحبرلا دئاعلا قيقحتو ،ةّيجاتنلإا وأ ،ةّيرادلإا وأ ،ةّيبساحملا تايوتسملا
تانايبلا دعاوق بيكرت
ىلع دمتعت رصنع ةميق نوكت نأ لثم ،تانايبلا رصانع نيب ةدّدحم ةقلاع ىلع دمتعي :يقئلاعلا بيكرتلا
هئاطعإ ببسب ؛ةّيتامولعملا تانايبلا دعاوق ملاع يف ةقبطملا بيكارتلا حجنأ وهو ،نيرصنع عمج لصاح
.رخآ بيكرت يأ نم ربكأ هيف تاقلاعلا ذيفنت نّ لأ ؛تانايبلا نيب ةقلاعلا عون يف ًاعوّ نت
.هل نيعبات وأ دحاو رصنع تحت نيفنصمو نيكرتشم نيرصنع ىلع يوتحي :يلكيهلا بيكرتلا
.رثكأ سيلو طقف دحاو رصنع نع ًلاوؤسم رصنع لّ ك نوكي نأ يأ :يمرهلا بيكرتلا
تانايبلا دعاوق عاونأ
ىلع دمتعي ذإ ،تامولعملا قيسنت لجأ نم ًامادختسا عاونلأا رثكأ نم عونلا اذه ّدعي :ةّيقئلاعلا تانايبلا دعاوق
.ةبولطملا تامولعملا ىلإ لوصولا ةعرس لجأ نم ةلهس ةقيرطب تامولعملاو لوادجلا طبر
.ةدحاو ةقرو يف اهنأكو ،تانايبلا عيمج ىلع يوتحي ريبك لودج ءاشنإ مّ تي :ةّيقئلاعلا ريغ تانايبلا دعاوق
ىلع عرّ فتلا يف ماظنلا اذه أدبيو ،رذجلا وأ ،لصلأا نم لسلستلا لمع مّ تي : يّ مرهلا لكشلا تاذ تانايبلا دعاوق
1
ىلإ ىلعلأا نم نوكت دقو ،ةعرفتمو ةسلستم ةقيرطب تانايبلا ىلإ لوصولا ىلع هلمع أدبم موقيو ،ماسقأ لكش
.ءانبلأا نم ةدع هلو ًاديحو بلأا نوكي نأ ،لثم ،ىلعلأا ىلإ لفسلأا نم وأ لفسلأا
لكشلا تاذ تانايبلا دعاوق ترهتشا نأ دعب تانايبلا دعاوق نم عونلا اذه رهظ :ةّيكبشلا تانايبلا دعاوق
.حيحص سكعلاو ءابآ ةدع عم ءانبأ ةدع ةقيرطب تانايبلا طبترت نأ ةيلامتحا كانه نكل ،يمرهلا
ــلا ةبتكم ىلا قرطتن فوسو تانايبلا دعاوق طبرل مدختست ةادا نم رثكا كسيب لاوجيفلا ةغل يف دجوي -
. كسيب لاوجيفلا عم access تانايبلا دعاوق طبرلADO
اضياو كسيب لاوجيف ةئيب تحت لمعت هبتكم ىه ADO <Active X Data Object>ةبتكم فيرعت :لاوا
تانايبلا دعاوق نيب طبرلا اهنكمي ثيح ، صاوخ هدع ىلع ىوتحتو ىرخلاا هجمربلا تاغل نم ديدعلا
لاوجيفلا هئيب تحت لمعت لا همخضلا تانايبلا دعاوق لامتحلا ىفاكلا ردقلاب ىهف ةلوهسب كسيب لاوجيفلاو
لاثملا ليبس ىلع هفلتخملا تاقيبطتلا جماربو هجمربلا تاغل نم ديدعلا تحت لمعلا اهنكمي امناو ، طقف كسيب
اضياوMicrosoft power point * نم للاخ... Visual basic * Visual basic.net * رصحلا سيلو
: ORACLE * SQL SERVER * ACCESS لثم همخضلا تانايبلا دعاوق عاونا نم ديدعلا عم لمعت
*
: Microsoft Data GRID 6.0(OLEDB)اهمها نم هقحلم تاودا هدع ىلع ىوتحت اضياو
Microsoft DB LIST GRID 6.0(OLEDB)
Microsoft hieratical flex grid Control 6.0(OLEDB)
ADO ةبتكم تازيمم
.تانايبلا نم هلئاه هيمك ظفح ىف هوقلا لاوا -1
. ةبتكملا هذهل ةبسنلاب اهعون نم هديرف هزيم ىهو تانايبلا دعاوق نم ديدعلا عم لماعتلا -2
. اهمادختسا دارملا تانايبلا هدعاق عون نع مدختسملا لاؤس -3
.لا ما تانايبلا هدعاقل هرفش كانه ناك اذا نع مدختسملا لاؤس -4
. ةلوهس لكب اهعم لماعتلاوSERVER ىلع هلجسم تانايب عم اهمادختسا نكمي -5
.ACCESS-تارادصا عيمج عم لماعتت اهنا ىف ةيديلقتلا data control ةبتكم نع زيمتت -6
ىا ، انفلسا امك ةمدختسملا تانايبلا هدعاق عون نع مدختسملا لأست اهنا ىف data control نع زيمتت -7
(DAO.ةبتكم ىف لاحلا امك ACCESS تانايب دعاوق ىلع هرصاق تسيل اهنا
2
ado ةبتكم ةفاضا ةقيرط **
تارادصلأا دادتمأب اهظفح بجي نكل( رادصا يا يف access قيبطت يف تانايبلا ةدعاق ءاشنا دعب -1
.اهلبقامو 2003-2002 مدقلأا
. ةبولطملا لوادجلا نيوكت -2
:ةيلاتلا تاوطخلا يف امك ado ـلا ةبتكم ةفاضاو كسيب لاوجيفلا ةئيب حتف -3
3
4
5
6
7
نيعم ديق نع ثحبلا ,فذحلا , ثيدحتلاو نزخلا , ةفاضلأا ,دويقلا نيب لقنتلا( نم لكل يجمربلا دوكلا
)مسلأا بسح
Adodc1.Recordset.MoveNext :يلاتلا ديقلا -1
ديقلا لقن نامضل اهعيمج فاضت ado ةبتكمب طبترم لودج لكو لودج نم رثكا انيدل ناك اذا : ةظحلام
.ديقلا فذحو نزخو ثيدحت وا ةفاضا وا هليصافت لكب
Adodc1.Recordset.MoveNext :لاثم
Adodc2.Recordset.MoveNext
Adodc1.Recordset.MovePrevious :قباسلا ديقلا -2
Adodc1.Recordset.MoveFirst :لولأا ديقلا -3
8
Adodc1.Recordset.MoveLast :ريخلأا ديقلا -4
Adodc1.Recordset.AddNew :ديق ةفاضا -5
Adodc1.Recordset.Update :ثيدحت وا نزخ -6
:ديق فذح -7
x = MsgBox("are you sure to delete this record", vbYesNo + vbCritical, "delete
record)"
If x = 6 Then
Adodc1.Recordset.Delete
End If
:مسلأا بسح ديق نع ثحبلا -8
Adodc1.Recordset.MoveFirst
x = InputBox("enter the name", "search")
For i = 1 To Adodc1.Recordset.RecordCount
y = Adodc1.Recordset.Fields("name").Value
If Trim(y) <> Trim(x) Then
Adodc1.Recordset.MoveNext
Else
MsgBox ("this record is found")
Text2.Text = Adodc1.Recordset.Fields("name").Value
Exit For
End If
Next i
If Adodc1.Recordset.EOF Then
MsgBox ("this record is not found")
9
Exit Sub
End If
10
Description:حاصل جمع عنصرين، وهو أنجح التراكيب المطبقة في عالم قواعد البيانات يوجد في لغة الفيجوال بيسك اكثر من اداة تستخدم لربط قواعد البيانات وسوف نتطرق
