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

[عبد الله قدور]

السلام عليكم

اخواني الكرام 

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

بشرط ان لا يكون النموذج تابع للجدول اي يجب ان يكون مصدر سجلات النموذج فارغ

 

[محمد سلامة]

24 دقائق مضت, عبد الله قدور said:

السلام عليكم

اخواني الكرام 

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

بشرط ان لا يكون النموذج تابع للجدول اي يجب ان يكون مصدر سجلات النموذج فارغ

 

السلام عليكم استاد عبدالله

الخبراء يقولون ان هذه الطريقة هي الافضل 

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

 

[ابو جودي]

39 دقائق مضت, عبد الله قدور said:

السلام عليكم

اخواني الكرام 

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

بشرط ان لا يكون النموذج تابع للجدول اي يجب ان يكون مصدر سجلات النموذج فارغ

 

اتفضل يا استاذ عبد الله
هذه احد الافكار

كذلك ممكن عمل كود vba ووضع اكثر من مصدر البيانات من خلال sql كود كما تريد من خلال اوبشن جروب او كمبوبوكس او كما تشاء حسب خيالك انت
 

SQLdemo.rar

Dim task
RecordSource = task
task = "جملة sql"

او ممكن task = " اسم استعلام"

يعنى انت شكل وتخيل الطريقة المثلى التى تتماشى مع احتياجاتك

[عبد الله قدور]

السلام عليكم

جزاك الله عنا كل خير اخي ابو جودي

ما قدمته جيد لكن يجب ان يكون النموذج كامل مكمل (كما نقول في حلب) بحيث بعد الضغط على حفظ مثلا الانتقال الى سجل جديد ومن ثم مثلا يمكننا الرجوع الى السجل القديم باضافة اسهم تنقل مثلا واستخدامها 

لكني لا افضل استخدام اوامر sql لانها تكون بطئية بادخال البيانات والتعديل والحذف في حال العمل على شبكة 

 

[رمهان]

هذا رابط القي نظرة اخ عبدالله وقبل كل شي

 

[ابو جودي]

منذ ساعه, عبد الله قدور said:

السلام عليكم

اخواني الكرام 

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

بشرط ان لا يكون النموذج تابع للجدول اي يجب ان يكون مصدر سجلات النموذج فارغ

 

وهذه فكرتى المتواضعة لاستعراض البيانات لنفس المرفق السابق بعد التعديل عليه

SQLdemo_up.rar

1 دقيقه مضت, رمهان said:

هذا رابط القي نظرة اخ عبدالله وقبل كل شي

 

عود احمد استاذ رمهان 
وبحضور المعلم الجليل 
كما تعلمنا فى دروس الفقه اذا حضر الماء بطل التيمم
فلا يفتى والاستاذ رمهان فى اوفيسنا 

[رمهان]

8 دقائق مضت, ابا جودى said:

عود احمد استاذ رمهان 
وبحضور المعلم الجليل 
كما تعلمنا فى دروس الفقه اذا حضر الماء بطل التيمم
فلا يفتى والاستاذ رمهان فى اوفيسنا 

العفو اخي محمد

الكل فيه الخير والبركة

صدقني بالله الافكار ليست حصرا على احد مهما وصل من المعرفة

قد ياتي مبتدئ ولكن الفكرة التي يريد تنفيذها جميلة ! لان البرمجة الاساس الفكرة او الخوارزمية

وصدقني فكرتك الاخيرة فتحت لي بعض الافكار

والاستاذ عبدالله بسؤاله فتح لنا ان نتعلم شي غير المعروف عن الاكسس واتمنى ان الرابط السابق به فائدة وبه كذلك مثال جاهز ومشاركة من الاستاذ جعفر

ولي عودة هنا ان شاء الله

دمتم بخير وعافية

[ابو جودي]

26 دقائق مضت, رمهان said:

العفو اخي محمد

الكل فيه الخير والبركة

صدقني بالله الافكار ليست حصرا على احد مهما وصل من المعرفة

قد ياتي مبتدئ ولكن الفكرة التي يريد تنفيذها جميلة ! لان البرمجة الاساس الفكرة او الخوارزمية

وصدقني فكرتك الاخيرة فتحت لي بعض الافكار

والاستاذ عبدالله بسؤاله فتح لنا ان نتعلم شي غير المعروف عن الاكسس واتمنى ان الرابط السابق به فائدة وبه كذلك مثال جاهز ومشاركة من الاستاذ جعفر

ولي عودة هنا ان شاء الله

دمتم بخير وعافية

وايش تيجى الافكار جنب اللمسات الرمهانية

[رمهان]

4 دقائق مضت, ابا جودى said:

وايش تيجى الافكار جنب اللمسات الرمهانية

مشاركتك الاخيرة ولدة فكرة وسارفقها ان شاء الله ! واعتقد هي ستكون اجابة لتساؤلات طرحت هنا او في منتديات شقيقة ! فخليني ابحث عن تلك التساؤلات ومشاركتك هي اجابة شافية بدون اي اضافة

تحياتي

تم تعديل أكتوبر 25, 2016 بواسطه رمهان

[ابو جودي]

وانا دائما وابدا انتظر اللمسات والافكار الرمهانية بلهفة مشتاق

[محمد ايمن]

تحية طيبة اخي عبد الله

بالنسبة لي افضل جمل SQL فهي تلبي كافة الاحتياجات من ربط المصدر الى البحث و التعديل و الحذف والاضافة

2 ساعات مضت, عبد الله قدور said:

ما قدمته جيد لكن يجب ان يكون النموذج كامل مكمل (كما نقول في حلب) بحيث بعد الضغط على حفظ مثلا الانتقال الى سجل جديد ومن ثم مثلا يمكننا الرجوع الى السجل القديم باضافة اسهم تنقل مثلا واستخدامها 

يمكنك عند الضغط على زر التالي او السابق ان تجعل مصدر النموذج الجدول المطلوب و بذلك يمكنك التنقل بكل بساطة

2 ساعات مضت, عبد الله قدور said:

لكني لا افضل استخدام اوامر sql لانها تكون بطئية بادخال البيانات والتعديل والحذف في حال العمل على شبكة 

سبب البطئ اخي الكريم هو انك عندما تفتح جدولا معينا يتم فتح قاعدة بيانات الخلفية و استدعاء الجدول وعند الانتهاء منه يتم اغلاقها وهكذا في كل مرة

اخينا Bluemaind قدم وحدة نمطية تقوم بتسريع الاتصال بالشبكة و ذلك بابقاء قاعدة بيانات الخلفية مفتوحة دائما 

FastTest.rar

[عبد الله قدور]

19 ساعات مضت, محمد ايمن said:

اخينا Bluemaind قدم وحدة نمطية تقوم بتسريع الاتصال بالشبكة و ذلك بابقاء قاعدة بيانات الخلفية مفتوحة دائما

اخي الكريم محمد ايمن 

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

[محمد ايمن]

3 ساعات مضت, عبد الله قدور said:

اخي الكريم محمد ايمن 

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

تحية طيبة اخي عبدالله

ماهي المشاكل التي ستحدث في حال كانت قاعدة بيانات الخلفية مفتوحة دائما ؟؟؟؟؟

[عبد الله قدور]

اخي العزيز محمد ايمن 

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

لكن عندما اضيف البيانات الى القاعدة عن طريق كود sql فهذا لا يترك الجدول مفتوحا وعندها تستطيع مشاهدة السجل المسجل بعد الانتهاء من ترحيله مباشرة 

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

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

وهذا ما احتاجه الان

 

[محمد ايمن]

منذ ساعه, عبد الله قدور said:

اخي العزيز محمد ايمن 

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

لكن عندما اضيف البيانات الى القاعدة عن طريق كود sql فهذا لا يترك الجدول مفتوحا وعندها تستطيع مشاهدة السجل المسجل بعد الانتهاء من ترحيله مباشرة

تحية طيبة اخي عبد الله

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

اما بالنسبة الى عبارات SQL فهي الافضل كما تفضلت وهي تتلافى مشكلة تضارب البيانات

منذ ساعه, عبد الله قدور said:

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

وهذا ما احتاجه الان

هل استخدمت DAO ام ADO ؟؟؟

[عبد الله قدور]

Dim mydb As Database, Q1 As Recordset
   Set mydb = CurrentDb()
   Set Q1 = mydb.OpenRecordset("man")
   Q1.Edit
   Q1!id = Trim(Me![pid])
  Q1!accname = Trim(Me![paccname])
    Q1!mob = Trim(Me![pmob])
  Q1!note = Trim(Me![pnote])
  Q1.Update

استخدمت هذا الكود في التعديل وقد اخذته من المنتدى قديما 

ولا ادري هل هو dao or ado

واتنمى منك شرح كلا الحالتين وايهما افضل في الاستخدام

 

 

تم تعديل أكتوبر 27, 2016 بواسطه عبد الله قدور

[رمهان]

في 10/25/2016 at 22:16, رمهان said:

مشاركتك الاخيرة ولدة فكرة وسارفقها ان شاء الله ! واعتقد هي ستكون اجابة لتساؤلات طرحت هنا او في منتديات شقيقة ! فخليني ابحث عن تلك التساؤلات ومشاركتك هي اجابة شافية بدون اي اضافة

تحياتي

عودة للمشاركة اعلاه هنا كيف نستفيد من فكرة اباجودي في رسم جدول في التقرير ويمكن بدمج خلايا محددة .

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

https://www.officena.net/ib/topic/24569-رسم-جدول-فى-التقرير-بناءاً-على-بيانات-معينة/?_fromLogin=1

https://www.officena.net/ib/topic/38468-هل-هناك-إمكانية-لإنشاء-جدول-بالتقرير/

https://www.officena.net/ib/topic/32989-تكرار-السجلات-فى-تقرير/

https://www.officena.net/ib/topic/48517-اريد-تنسيق-جداول-اكسس-2007-مثل-تنسيق-الجداول-في-اكسل/

هي تدور حول رسم جدول بالتقرير

واعتذر للاخوة والاستاذ عبدالله لو خرج هذا قليلا عن الموضوع

هذا المثال وفكرته : ضع مصدر للتقرير فقط وبدون مصدر لمربعات النص او اي عنصر اخر كعنصر خيار مثلا وغيره

بالتوفيق

SQLdemo_up.rar

[محمد ايمن]

في ٢٧‏/١٠‏/٢٠١٦ at 13:46, عبد الله قدور said:

Dim mydb As Database, Q1 As Recordset
   Set mydb = CurrentDb()
   Set Q1 = mydb.OpenRecordset("man")
   Q1.Edit
   Q1!id = Trim(Me![pid])
  Q1!accname = Trim(Me![paccname])
    Q1!mob = Trim(Me![pmob])
  Q1!note = Trim(Me![pnote])
  Q1.Update

استخدمت هذا الكود في التعديل وقد اخذته من المنتدى قديما 

ولا ادري هل هو dao or ado

واتنمى منك شرح كلا الحالتين وايهما افضل في الاستخدام

 

 

تحية طيبة اخي عبد الله

الكود السابق هو DAO

الفرق بين DAO و ADO هو باختصار

DAO تدعم قواعد بيانات اكسس فقط

ADO تدعم جميع انواع قواعد البيانات ( اكسس SQL Oracle ) والله اعلم

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

[صالح حمادي]

السلام عليكم و رحمة الله تعالى و بركاته

الإحتكاك و المشاركة إلى جانب عمالقة هذا المنتدى الرائع شرف لي و الله

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

 

test.rar

[ابو جودي]

9 ساعات مضت, صالح حمادي said:

السلام عليكم و رحمة الله تعالى و بركاته

الإحتكاك و المشاركة إلى جانب عمالقة هذا المنتدى الرائع شرف لي و الله

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

 

test.rar

راااااااااااااااائع جدا جدا
بس ممكن سؤال السجل الاول المفروض رقمة  1  وليس  صفر
هل ممكن عمل ذلك ؟

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

[صالح حمادي]

مرحبا بك أستاذي العزيز أبا جودي تفضل التعديل المطلوب و وافني بالنتيجة فأنا أتعلم و أستفيد من نصائحكم السديدة.

test.rar

[co2002co]

منذ ساعه, صالح حمادي said:

مرحبا بك أستاذي العزيز أبا جودي تفضل التعديل المطلوب و وافني بالنتيجة فأنا أتعلم و أستفيد من نصائحكم السديدة

انا اتعلم منك ايضا

 

 

طيب مشكلة التكرار

 

[ASSOUSI]

السلام عليكم و رحمة الله تعالى و بركاته

استادنا  أبا جودي تفضل التعديل  على مافهمته 

معاحترامي لكم 

لأني مازلة تلميذكم

SQLdemo.rar

[محمد ايمن]

2 ساعات مضت, ابا جودى said:

بس ممكن سؤال السجل الاول المفروض رقمة  1  وليس  صفر

منطقيا يتم الترقيم من الصفر و ليس من الواحد

لذلك عندما ننشئ حلقة دورانية تجد اننا نكتب بداية الحلقة من 0 الى رقم معين او الى نهاية السجلات

 

[عبد الله قدور]

في ٣‏/١١‏/٢٠١٦ at 10:42, صالح حمادي said:

مرحبا بك أستاذي العزيز أبا جودي تفضل التعديل المطلوب و وافني بالنتيجة فأنا أتعلم و أستفيد من نصائحكم السديدة.

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