طلب اكواد لفورم مع الشرح للفهم (استدعاء بيانات من اكثر من جدول فى فورم واحد)

[عمر ضاحى]

1 ساعه مضت, TQTHAMI said:

السلام عليكم 

اولا وقبل كل شي انا مبتدي لا احد يقولي  ما هكذا تورد يا سعد الابل 

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

وتقبلو اكلامي بصدر رحب 

Request.accdb 632 kB · 0 downloads

اولا احب ارحب بمداخلتك لحل المشكله 

والان اتعلمت كود جديد 

 

[txtArName] = DLookup("[ArName]", "GetInfo", "EmpID =[T2]")

لكن انا ملاحظ ان هذا الكود فقط يقوم باستدعاء البيانات 

لكن اذا احببت ان اضيف او اعدل او احذف كيف بافعلها 

[د.كاف يار]

اخي الكريم اتبع الشرح التالي 

في حال اردت اضافة بيانات الى جدول من حقول في النموذج غير منضمة

اسهل طريقة بما أنك مبتدئ ان تستخدم الإستعلام الإلحاقي كما يلي

 

بمجرد اختيار الجدول الذي سيتم الحاق البيانات به تبدء الأن اختيار حقول الجدول

قم بإختيار الحقول التي ترغب بإضافة القيمة لها من النموذج

 

تبقى الأن اضافة الحقول من النموذج داخل الإستعلام

و هذا هو النموذج المستخدم

كما ترى الحقول غير منضمة

الأن نذهب للإستعلام لإضافة حقول النموذج داخل الإستعلام لإلحاق البيانات من النموذج الى الجدول

 

ثم تضع اسماء الحقول كما يلي

بعد تعبئة الحقول  و حفظ الاستعلام الالحاقي 

تضع ازرار داخل النموذج لتشغيل الاستعلام و في حديث عند الضغط تضع التالي

DoCmd.SetWarnings False
DoCmd.OpenQuery " ضع هنا اسم الاستعلام الإلحاقي "
DoCmd.SetWarnings True

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

 

 

 

 

 

 

 

[TQTHAMI]

بعد تحية الاسلام 

الاخ والاستاذ د.كاف يار

ياليت تشرح لو مختصر عن عن انواع الاستعلام نشوفها ولا نعرف الا النوع المستخدم العادي

وتقبل خالص التحيه

[د.كاف يار]

4 دقائق مضت, TQTHAMI said:

بعد تحية الاسلام 

الاخ والاستاذ د.كاف يار

ياليت تشرح لو مختصر عن عن انواع الاستعلام نشوفها ولا نعرف الا النوع المستخدم العادي

وتقبل خالص التحيه

 

الإستعلامات لها انواع كثير لكني سوف اذكر الأكثر استخداما

انواع الاستعلامات من حيث معالجة البيانات

Select - INSERT INTO - Update - Delete

إستخراج البیانات من قاعده البیانات : Select  

بناء الجملة يكون بالشكل التالي

لعرض جميع البيانات
SELECT * FROM Persons

'=================================

لعرض أعمدة محدددة
مثلا الاسم الأول و الاسم الأخير للموظف
SELECT LastName,FirstName FROM Persons

'=================================

لعرض البيانات بدون تكرار
اضف بعد عبارة التحديد الجملة التالية 
DISTINCT
SELECT DISTINCT Company FROM Orders

إضافه بیانات جديده : INSERT INTO 

بناء الجملة يكون بالشكل التالي

اضافة بيانات 

INSERT INTO table_name (column1, column2,...) VALUES (value1, value2,....)

التعديل على البیانات المسجله : Update

UPDATE table_name
SET column_name = new_value
WHERE column_name = some_value

حذف البیانات من القاعده : Delete

DELETE FROM table_name
WHERE column_name = some_value

استعلام التوحيد

تستخدم لدمج حقلین من جدولین مختلفین ولكن يجب
ان يكون نوع البیانات فى الحقلین واحد اى يكون نصوص او ارقام .………إلخ

SELECT E_Name FROM table_name_1
UNION
SELECT E_Name FROM table_name_2

 

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

(AVG - COUNT-First-last-Max-Min-SUM)

لنفترض انك تريد الحصول على اجمالي الفواتير للشركات المتعاقدة مع شركتك

SELECT Company, SUM(Amount) FROM Sales

 

حذف جدول DROP DATABASE

DROP TABLE table_name

لعمل نسخه إحتیاطیه من الجدول فى نفسالقاعده

Persons="اسم الجدول" 
Persons_backup= اسم الجدول الجديد الذي سيتم انشائه و حفظ البيانات به في حال عدم وجوده
SELECT * INTO Persons_backup FROM Persons

IN لنسخ الجدول لقاعده بیانات أخرى : نستخدم

SELECT Persons.* INTO Persons IN '\Backup.mdb'
FROM Persons

 

في  النهاية انصحك بإستخدام اليوتيوب و البحث عن دروس في SQL

فهي روح اي برنامج ان اسحنتها صلح برنامجك

 

شكرا لك

[TQTHAMI]

لايسعني الا ان اقول جزاك الله خيرا

وسوف اقوم بتطبيقها وان شاء الله يظبط معي لو جزء منها كبدايه اعتبرها جميل لك ان شاء الله يكتب في موازين حياتك

 

[عمر ضاحى]

5 ساعات مضت, د.كاف يار said:

اخي الكريم اتبع الشرح التالي 

في حال اردت اضافة بيانات الى جدول من حقول في النموذج غير منضمة

اسهل طريقة بما أنك مبتدئ ان تستخدم الإستعلام الإلحاقي كما يلي

 

بمجرد اختيار الجدول الذي سيتم الحاق البيانات به تبدء الأن اختيار حقول الجدول

قم بإختيار الحقول التي ترغب بإضافة القيمة لها من النموذج

 

تبقى الأن اضافة الحقول من النموذج داخل الإستعلام

و هذا هو النموذج المستخدم

كما ترى الحقول غير منضمة

الأن نذهب للإستعلام لإضافة حقول النموذج داخل الإستعلام لإلحاق البيانات من النموذج الى الجدول

 

ثم تضع اسماء الحقول كما يلي

بعد تعبئة الحقول  و حفظ الاستعلام الالحاقي 

تضع ازرار داخل النموذج لتشغيل الاستعلام و في حديث عند الضغط تضع التالي

DoCmd.SetWarnings False
DoCmd.OpenQuery " ضع هنا اسم الاستعلام الإلحاقي "
DoCmd.SetWarnings True

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

 

 

 

 

 

 

 

 

بسم الله ما شاء الله 

اولا بحب اشكر حضرتك على الشرح 

تسلم ايدك ويحفظك الله

فى مشكله معي حاليا

فى حال ان البيانات موجوده فى اكثر من جدول كيف اضيف الجداول فى الاستهلام الالحاقى  (كما فى الحال معي حاليا)

لان البيانات متقسمه على جداول كثيره 

[د.كاف يار]

3 ساعات مضت, عمر ضاحى said:

 

بسم الله ما شاء الله 

اولا بحب اشكر حضرتك على الشرح 

تسلم ايدك ويحفظك الله

فى مشكله معي حاليا

فى حال ان البيانات موجوده فى اكثر من جدول كيف اضيف الجداول فى الاستهلام الالحاقى  (كما فى الحال معي حاليا)

لان البيانات متقسمه على جداول كثيره 

 

لإضافة قيم لأكثر من جدول في نفس الوقت اتبع التالي

 

Dim db As DAO.Database
Dim sSQL As String
On Error GoTo errorhandle

' الجدول الأول
Set db = CurrentDb
sSQL = "INSERT INTO [Table_Name1] (Column1, Column2,...) VALUES (Value1, Value2,....) " 
db.Execute sSQL
 
' الجدول الثاني
sSQL = "INSERT INTO [Table_Name2] (Column1, Column2,...) VALUES (Value1, Value2,....) " 
db.Execute sSQL
    
MsgBox "تم اضافة البيانات الى الجداول بنجاح", vbInformation + vbMsgBoxRight, "تأكيد"
errorhandleexit:
        Exit Sub
errorhandle:
        MsgBox Err.Description
        Resume errorhandleexit

 

تم تعديل يوليو 16, 2021 بواسطه د.كاف يار

[Eng.Qassim]

12 hours ago, د.كاف يار said:

 

الإستعلامات لها انواع كثير لكني سوف اذكر الأكثر استخداما

انواع الاستعلامات من حيث معالجة البيانات

Select - INSERT INTO - Update - Delete

إستخراج البیانات من قاعده البیانات : Select  

بناء الجملة يكون بالشكل التالي

لعرض جميع البيانات
SELECT * FROM Persons

'=================================

لعرض أعمدة محدددة
مثلا الاسم الأول و الاسم الأخير للموظف
SELECT LastName,FirstName FROM Persons

'=================================

لعرض البيانات بدون تكرار
اضف بعد عبارة التحديد الجملة التالية 
DISTINCT
SELECT DISTINCT Company FROM Orders

إضافه بیانات جديده : INSERT INTO 

بناء الجملة يكون بالشكل التالي

اضافة بيانات 

INSERT INTO table_name (column1, column2,...) VALUES (value1, value2,....)

التعديل على البیانات المسجله : Update

UPDATE table_name
SET column_name = new_value
WHERE column_name = some_value

حذف البیانات من القاعده : Delete

DELETE FROM table_name
WHERE column_name = some_value

استعلام التوحيد

تستخدم لدمج حقلین من جدولین مختلفین ولكن يجب
ان يكون نوع البیانات فى الحقلین واحد اى يكون نصوص او ارقام .………إلخ

SELECT E_Name FROM table_name_1
UNION
SELECT E_Name FROM table_name_2

 

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

(AVG - COUNT-First-last-Max-Min-SUM)

لنفترض انك تريد الحصول على اجمالي الفواتير للشركات المتعاقدة مع شركتك

SELECT Company, SUM(Amount) FROM Sales

 

حذف جدول DROP DATABASE

DROP TABLE table_name

لعمل نسخه إحتیاطیه من الجدول فى نفسالقاعده

Persons="اسم الجدول" 
Persons_backup= اسم الجدول الجديد الذي سيتم انشائه و حفظ البيانات به في حال عدم وجوده
SELECT * INTO Persons_backup FROM Persons

IN لنسخ الجدول لقاعده بیانات أخرى : نستخدم

SELECT Persons.* INTO Persons IN '\Backup.mdb'
FROM Persons

 

في  النهاية انصحك بإستخدام اليوتيوب و البحث عن دروس في SQL

فهي روح اي برنامج ان اسحنتها صلح برنامجك

 

شكرا لك

احسنت دكتور كاف على الشرح..لكني اعتقد انه من المهم دراسة لغة السكوال مع الاكسس

[د.كاف يار]

5 ساعات مضت, Eng.Qassim said:

احسنت دكتور كاف على الشرح..لكني اعتقد انه من المهم دراسة لغة السكوال مع الاكسس

صحيح فهي اساس اي برنامج ترغب في انشائه