ابو ياسين المشولي قام بنشر فبراير 4, 2018 قام بنشر فبراير 4, 2018 السلام عليكم ورحمه الله وبركاته اخواني مشرفي واعضاء المنتدى الكرام عندي مشكله عند عمل استيراد يحذف بينات جدول المشتريات والمرتجع وجدول transaction ولا عرفت ايش السر واتوقع انه يوجد علاقه بهما باكثر من جدول ارجو افادتكم ولك مني جزيل الشكر اخوكم ابو ياسين بـرنـامـج خـيـاط.rar 1
ابوخليل قام بنشر فبراير 6, 2018 قام بنشر فبراير 6, 2018 رغم عدم قناعتي بطريقتك في التبديل بين النسخ باعتبارها خطيرة و الاحتمال وارد بشكل قاطع لفقدان شيء من البيانات فكلامك صحيح ومشكلتك بسبب العلاقات فيلزم لحل المشكلة ان يتم الاستيراد على خطوات بالترتيب : 1- حذف العلاقات في القاعدة المرتبطة 2- حذف البيانات في القاعدة المرتبطة 3- جلب البيانات من القاعدة النسخة 4- جلب العلاقات من القاعدة النسخة وهذا ماتم عمله في مثالك المرفق اتمنى ان يلبي حاجتك بـرنـامـج خـيـاط.rar 3
ابو ياسين المشولي قام بنشر فبراير 6, 2018 الكاتب قام بنشر فبراير 6, 2018 34 دقائق مضت, ابوخليل said: رغم عدم قناعتي بطريقتك في التبديل بين النسخ باعتبارها خطيرة و الاحتمال وارد بشكل قاطع لفقدان شيء من البيانات فكلامك صحيح ومشكلتك بسبب العلاقات فيلزم لحل المشكلة ان يتم الاستيراد على خطوات بالترتيب : 1- حذف العلاقات في القاعدة المرتبطة 2- حذف البيانات في القاعدة المرتبطة 3- جلب البيانات من القاعدة النسخة 4- جلب العلاقات من القاعدة النسخة وهذا ماتم عمله في مثالك المرفق اتمنى ان يلبي حاجتك بـرنـامـج خـيـاط.rar الف الف شكر استاذ ابو خليك ربي يحفظك
ابو ياسين المشولي قام بنشر فبراير 7, 2018 الكاتب قام بنشر فبراير 7, 2018 12 ساعات مضت, ابوخليل said: رغم عدم قناعتي بطريقتك في التبديل بين النسخ باعتبارها خطيرة و الاحتمال وارد بشكل قاطع لفقدان شيء من البيانات فكلامك صحيح ومشكلتك بسبب العلاقات فيلزم لحل المشكلة ان يتم الاستيراد على خطوات بالترتيب : 1- حذف العلاقات في القاعدة المرتبطة 2- حذف البيانات في القاعدة المرتبطة 3- جلب البيانات من القاعدة النسخة 4- جلب العلاقات من القاعدة النسخة وهذا ماتم عمله في مثالك المرفق اتمنى ان يلبي حاجتك بـرنـامـج خـيـاط.rar استاذي ابو خليك جزاك الله خير ماقصرت هو المطلوب ولكنه فيه نقص شوي اي انه لم يراء العلاقات ثم يعيدها لولحظت جدول transaction مربوط بجدول المشتريات وجدول المرتجعات وجدول اقمشة وعند الاستيراد مرة يستورد بدون ربط العلاقات مرة ومرة اخرى بدون بدون ربط كامل العلاقات ياليت تتفحص اين المشكلة
ابوخليل قام بنشر فبراير 7, 2018 قام بنشر فبراير 7, 2018 ابو ياسين نريد نفهم ليش تنتهج هذه الطريقة .. الى الآن لم توضح لنا ذلك ؟ مع ان المسألة كلها نسخ احتياطية . ويتم استرجاعها ما المشكلة انك تضع النسخ الاحتياطية بجانب قاعدة البيانات الخلفية ، وتتنقل بينها متى ما اردت ؟ حذف البيانات من قاعدة البيانات لا يوافقك عليها اي مبرمج على الكرة الارضية فما بالك بحذف العلاقات ؟ 2
ابو ياسين المشولي قام بنشر فبراير 7, 2018 الكاتب قام بنشر فبراير 7, 2018 3 دقائق مضت, ابوخليل said: ابو ياسين نريد نفهم ليش تنتهج هذه الطريقة .. الى الآن لم توضح لنا ذلك ؟ مع ان المسألة كلها نسخ احتياطية . ويتم استرجاعها ما المشكلة انك تضع النسخ الاحتياطية بجانب قاعدة البيانات الخلفية ، وتتنقل بينها متى ما اردت ؟ حذف البيانات من قاعدة البيانات لا يوافقك عليها اي مبرمج على الكرة الارضية فما بالك بحذف العلاقات ؟ هههههههه استاذي لانه كل 3 اشهر احذف البيانات واعتمتد من جديد هذا كل شي على العموم والله انك ماقصرت وانا بحاول فيها اظن في شي لم افهمه ربما يكون من عندي الخطاء برجها خلال يومين وبيتضح الامر اكرر شكري لك
kaser906 قام بنشر فبراير 7, 2018 قام بنشر فبراير 7, 2018 16 دقائق مضت, ابو ياسين المشولي said: هههههههه استاذي لانه كل 3 اشهر احذف البيانات واعتمتد من جديد هذا كل شي على العموم والله انك ماقصرت وانا بحاول فيها اظن في شي لم افهمه ربما يكون من عندي الخطاء برجها خلال يومين وبيتضح الامر اكرر شكري لك من بعد أذن استاذنا ابو خليل 24 دقائق مضت, ابوخليل said: ما المشكلة انك تضع النسخ الاحتياطية بجانب قاعدة البيانات الخلفية ، وتتنقل بينها متى ما اردت ؟ كما قال استاذنا انت لست بحاجة الى حذف البيانات كل ما تحتاجه قاعدة بيانات خلفية فارغة وتعيد الارتباط بها وتبقى بياناتك كماهي
ابو ياسين المشولي قام بنشر فبراير 7, 2018 الكاتب قام بنشر فبراير 7, 2018 يا اخوان انا عارف والله ان طريقتي ما تعجبكم بس بحب اوضح لكم شي انا عامل عند الاقلاع انه يقلع من مجلد البرنامج بالدي وعندما ادخل بينات ت Public Function acbRelink(strPath As String, Optional blnSilent As Boolean) As Boolean On Error GoTo alalal Call SysCmd(acSysCmdSetStatus, "Re-linking the data tables...") Set DB = CurrentDb() For Each tdf In DB.TableDefs If (tdf.Attributes And dbAttachedTable) = _ dbAttachedTable Then tdf.Connect = ";DATABASE=" & "D:\بـرنـامـج الـخـيـاط\data\tailor" tdf.RefreshLink End If Next Call SysCmd(acSysCmdClearStatus) If blnSilent Then MsgBox " تم العوده الى النسخه الأصليه مره أخرى ", vbInformation, " بـرنـامـج الـخـيـاط : النسخه الأصليه " End If alalal: If err.Number = 3024 Then MsgBox " عفوا مجلد البيانات تم نقلة أو أعادة تسميتة " & Chr(13) & " لذا سوف يتم اغلاق البرنامج " & Chr(13) & " رجاء أذهب الى مصدر البرنامج وتأكد من وجود مجلد باسم " & Chr(13) & " بجوار ملف بـرنـامـج الـخـيـاط tailor ", vbYes, " بـرنـامـج الـخـيـاط : خطــــــأ " DoCmd.Quit End If End Function حفظ بالدي ولكن عندما اعمل ارتباط يجي اي واحد من العمال يدخل بيانات وعند الاقلاع تجدها غير موجوده ويستوي لخبطه انا لست خشيم الى هذة الدرجه كل واحد المهم الاستاذ ابو خليل بارك الله فيه جاب المطلوب وما قصر بقلى شي قليل اظن انه حله بسيط ليس صعب وقد يكون الخطاء مني انا
ابوخليل قام بنشر فبراير 7, 2018 قام بنشر فبراير 7, 2018 طيب .. نقول العاقل خصيم نفسه اذا عندي لك طريقة محكمة وسهلة جدا انتظرني ...
ابو ياسين المشولي قام بنشر فبراير 7, 2018 الكاتب قام بنشر فبراير 7, 2018 33 دقائق مضت, ابوخليل said: طيب .. نقول العاقل خصيم نفسه اذا عندي لك طريقة محكمة وسهلة جدا انتظرني ... انا في انتظارك استاذي ماقصرت من اول الموضوع وانت من جاب الطلب وانا ممنون لك ربي يحفظك
ابو ياسين المشولي قام بنشر فبراير 7, 2018 الكاتب قام بنشر فبراير 7, 2018 3 ساعات مضت, ابوخليل said: تفضل بـرنـامـج خـيـاط2.rar تسلم استاذي ابو خليل بس هذة خطيرة جدا الاولى افضل بنسبة 95 % لك مني كل الشكلر والتقدير
ابوخليل قام بنشر فبراير 7, 2018 قام بنشر فبراير 7, 2018 لا يوجد فارق في الخطورة بل الاخيرة محكمة واضمن بعدم حدوث الأخطاء الاولى : أول خطوة يتم فيها هو حذف جميع البيانات وهذا يكفي الطريقة الثانية يتم استبدال القاعدة بالكامل وكلا الطريقتين بالفناء سواء واعتقد ان الطريقة الاخيرة هي ماكنت تبحث عنها في موضوع لك سابق
ابو ياسين المشولي قام بنشر فبراير 7, 2018 الكاتب قام بنشر فبراير 7, 2018 1 دقيقه مضت, ابوخليل said: لا يوجد فارق في الخطورة بل الاخيرة محكمة واضمن بعدم حدوث الأخطاء الاولى : أول خطوة يتم فيها هو حذف جميع البيانات وهذا يكفي الطريقة الثانية يتم استبدال القاعدة بالكامل وكلا الطريقتين بالفناء سواء واعتقد ان الطريقة الاخيرة هي ماكنت تبحث عنها في موضوع لك سابق استاذي ابو خليل الاولى اذا كان اسماء الجداول او الحقول فيه اي اختلف يرفض حذف ويخرج لكن الاخير تحذف اي حاجه واي قاعده على العموم انت عملت مجهود كبير جدا في الاولى والاخير بس انا افضل الاولى بعشرة اضعاف عن الاخير لو تشرح لي الاكواد استاذي ممكن نجد لها حل تلميذك عنده سنه اولى متوسط في التعليم لذلك يواجهني تعب بفهم الكود حتى اتجاوز اخطائه
ابوخليل قام بنشر فبراير 7, 2018 قام بنشر فبراير 7, 2018 اقتباس الاولى اذا كان اسماء الجداول او الحقول فيه اي اختلف يرفض حذف ويخرج طيب اذا في الأولى كود مسؤول عن المقارنة والتأكد من الاختلاف فهذا تمام انقله واستخدمه في الثانية
ابو ياسين المشولي قام بنشر فبراير 7, 2018 الكاتب قام بنشر فبراير 7, 2018 مانفع استاذي ابو خليل هو كان هذا On Error GoTo MyErr Exit Sub MyErr: MsgBox " مصرح بإسترجاع البيانات المنسوخه أو المحفوظه " & Chr(13) & " عن طريق ( بـرنـامـج الـخـيـاط ) فقط ", vbInformation, " بـرنـامـج الـخـيـاط : خطــــــــأ " شوف حاول تحذف اي خانه في اي جدول وشوف لم يقبل او حاول تستورد من اي قاعده لم يقبل
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.