Take a fresh look at your lifestyle.

كتاب انشاء صلاحيات 2008 واكسس بصيغة PDF مجانا

5

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

عنوان الكتاب

انشاء صلاحيات 2008 واكسس

عدد الصفحات :

23

صيغة الكتاب:

PDF

تصنيف الكتاب: 

اكسس

اكسس

مقدمة كتاب انشاء صلاحيات 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 وأكسس:

غير مفهرس

تحميل كتاب انشاء صلاحيات 2008 وأكسس بصيغة PDF مجانا

من هنا

Comments are closed.