كتاب انشاء صلاحيات 2008 واكسس بصيغة PDF مجانا
مقالنا اليوم عن كتاب انشاء صلاحيات 2008 واكسس بصيغة PDF وهو كتاب تعليمي شرح بأسلوب تربوي بسيط كيفية لتصميم برنامج يتعامل مع قاعدة بيانات اکسس خطوة خطوة.
عنوان الكتاب
انشاء صلاحيات 2008 واكسس
عدد الصفحات :
23
صيغة الكتاب:
تصنيف الكتاب:
![كتاب انشاء صلاحيات 2008 واكسس بصيغة PDF مجانا 1 اكسس](http://elprimo.net/wp-content/uploads/2022/07/292598695_1068019310522605_7110940165928925731_n.jpg)
مقدمة كتاب انشاء صلاحيات 2008 واكسس:
السلام عليكم ورحمة الله وبركاته.
منذ تسجيلي بهذا المنتدى الطيب وانا اقوم بجمع المعلومات وكان أكثر شيء يشدني مسألة الربط بقاعدة البيانات و الاكثر شدا للانتباه هو مسالة الصلاحيات وجمعت معلومات لاباس بها فاحببت ان نبدا سوية خطوة بخطوة لتصميم برنامج يتعامل مع قاعدة بيانات اکسس ۲۰۰۷ باستخدام فيجوال بيسك ۲۰۰۸.
فمن لديه هذه البرامج فهو جاهز للبدء معنا خطوة بخطوة.
لنبدأ على بركة الله افتح برنامج
Microsoft Visual Studio 2008
اختر مشروع جديد
WindowsApplication1
اضف عدد 6 نماذج = forms 6
الاول وليكن اسمه = form1
اضف له الادوات اللازمة
استعرض الصور بشكل منفصل عن البرنامج لرؤيتها بشكل اوضح
الان بقي علينا الربط لاننا عرفنا اسم قاعدة البيانات وهو dh1.accdh
هذا باستخدام اكسس ۲۰۰۷ اما ۲۰۰۳ فهو
Db1.mdb
الآن فنقل بشكل متاخر فكرة برنامجنا وهي
صورة شبيهه بدفتر العناوين واسمينا هذا الجدول المخصص باسم wanted
أي المطلوبين .
نريد الآن الربط بهذا الجدول
نضيف موديول جديد وسمه constr ونضيف به الجملة التالية
اعلى اطار الشيفرة كتب
Imports System.Data.OleDb
ثم داخل الموديول بين جملتي
Module constr
و جملة
Me, birthdate.DataBindings.Add(“text”, ds1,
“wanted.birthdate”)
Me.txtrecordno.DataBindings.Add(“text”, ds1, “wanted. txtrecordno”)
Me.txtnoteno.DataBindings.Add(“text”, ds1,
“wanted. txtnoteno”)
Me.txtnotesource.DataBindings.Add(“text”, ds1,
“wanted. txtnotesource”)
Me.txtnotedate.DataBindings.Add(“text”, ds1,
“wanted, txtnotedate”)
Catch ex As Exception MsgBox(Err.Description, MsgBoxStyle.Critical)
End Try
الآن قم بتشغيل البرنامج لتجربته اذا كان عملك صحيحا فستظهر محتويات القاعدة ضمن الفورم الأول اسماء مربعات النص مثل اسماء حقول القاعدة
لاحظها بنفسك
مثلا اردنا ربط مربع نص بحقل اسم نسمي مربع النص اسم txtname يجب أن يكون اسم الحقل بالقاعدة مثل هذا ليعمل الكود بشكل صحيح.
الآن قم بالنقر على زر جديد لاضافة صف جديد ماذا يحدث
Button2. Enabled = True
Button3. Enabled = True
Call opentxt() Button3.Select()
يقوم بتمكين زي الحفظ وزر محو النصوص بالمربعات
ثم يقوم باستدعاء دالة مخصصة opentxt
لقراها الآن
Public Sub opentxt()
Form1.txtname. ReadOnly=False Form1.txtfather. ReadOnly=False
Form1.txtgrand. ReadOnly= False
Form1.txtfamily. ReadOnly=False
Form1.txtqabilah. ReadOnly=False Form1.birthplace. ReadOnly= False
Form1.birthdate. ReadOnly= False Form1.txtrecordno. ReadOnly=False
فهرس كتاب انشاء صلاحيات 2008 وأكسس:
غير مفهرس
Comments are closed.