اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

jjafferr

أوفيسنا
  • Posts

    9998
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    406

كل منشورات العضو jjafferr

  1. اخي صالح استخدم هذا الرقم الصحيح ، وجرب الكود مرة ثانية وحياك الله اخي حمدي جعفر
  2. شو اسم المديرية؟ الرقم الذي ارفقته لا يوجد في القائمة!! جعفر
  3. حياك الله اخوي عبد الفتاح في الواقع اعمل على مشروع كبير (والكبير الله سبحانه وتعالى) ، وكلما اعمل جديد ، فأحب ان اعرضه في المنتدى حتى يستفيد الباقين من هذه التجارب ، فخلّي عينك على مواضيعي الجديدة جعفر
  4. لا يعمل الرابط ، Request Rejected !! اذا ما اشتغل الرابط ، اعمل نسخة من Page Source ثم احفظها في ملف txt وارفقه هنا. جعفر
  5. وعليكم السلام رجاء العمل بخطوات الرابط التالي: جعفر
  6. السلام عليكم ورحمة الله وبركاته عندما يكون برنامج الاكسس يعمل ، وفجأة بدأ بإعطاء رسائل خطأ وبدون اي تعديل في البرنامج ، او عند عمل تعديل على البرنامج يُغلق الاكسس: . فغالبا المشكلة يمكن حلها بعمل هذه الخطوات: @Echo off Echo decompiling D:\Testing\myDataBase_FE.accdb "C:\Program Files\Microsoft Office\Office14\msaccess.exe" "D:\Testing\myDataBase_FE.accdb" /decompile /cmd shutdown Echo compacting D:\Testing\myDataBase_FE.accdb "C:\Program Files\Microsoft Office\Office14\msaccess.exe" "D:\Testing\myDataBase_FE.accdb" /compact Echo compiling D:\Testing\myDataBase_FE.accdb "C:\Program Files\Microsoft Office\Office14\msaccess.exe" "D:\Testing\myDataBase_FE.accdb" /cmd compile Echo compacting D:\Testing\myDataBase_FE.accdb "C:\Program Files\Microsoft Office\Office14\msaccess.exe" "D:\Testing\myDataBase_FE.accdb" /compact Echo Opening D:\Testing\myDataBase_FE.accdb , and Exiting .bat start "" "C:\Program Files\Microsoft Office\Office14\msaccess.exe" "D:\Testing\myDataBase_FE.accdb" وانا استعمل هذا الملف المرفق ليقوم بالعمل كله: سيفتح البرنامج ، ويجب عليك غلقه ، الى ان لا يفتح تلقائيا مرة اخرى. ولكن ، يجب دائما اخذ الاحتياط وعمل نسخة من البرنامج قبل عمل هذه الخطوات. اقدم لكم شرح بسيط عن الموضوع: في الكثير من الاوقات ، لما نعمل الكود ، نقوم بتعديل وتغيير وتضبيط الكود عدة مرات ، ولكن الاكسس في بعض الاحيان يبقى محتفظ بالكود القديم في ذاكرته !! لذلك : 1. اثناء البرمجة ، وبشكل يومي اقوم بتشغيل هذا الملف المرفق ، 2. وقبل تسليم البرنامج الى الزبون ، اقوم بتشغيل الملف للمرة الاخيرة ، واجهز البرنامج لتسليمه الى الزبون 1Decompile2.zip xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx النسخة رقم 2 ، والتي لا نتعامل مع الكود ، وانما بواجهة فقط 🙂 جعفر
  7. وعليكم السلام اخي صالح يجب ان نعرف عمود/حقل تخزين قيمة المربع ، فكما نعرف في الاكسس ، فالقيمة الحقيقة لمربع التحرير والسرد قد لا تكون العمود الاول!! اعطني رابط الموقع واشوفه لك ان شاء الله جعفر
  8. السلام عليكم شباب اسمحوا لي ادلو بدلوي عملت على هذا التاريخ فقط ، واذا الموضوع حاز على رضى اخونا العود ابو خليل واخي الاستاذ رمهان اللي مشتاق لهم كثيرا، فبكرة الصبح ان شاء الله اشوف ردودكم ، ونعدل على المرفق النتيجة: . جعفر 900.test.mdb.zip
  9. وعليكم السلام مثال لوسمحت ، بمرفق جعفر
  10. ايش اسم جدول فاتورة البيع ، وهل رقم الفاتورة فيه طريقة معينه ، او انه رقم مسلسل.
  11. كيف تعمل هذه الخطوة؟ جعفر
  12. من تجربتي ، اعمل تقريرين ، احدهما بالطول ، والاخر بالعرض جعفر
  13. الطابعات الافتراضية (برنامج طابعات) لا تحتاج الى هوامش ، مثل طابعة ملفات PDF ، وطابعات ملفات الصور والتي ذكرتها هنا جعفر
  14. اعتذر منك اخوي ابوخليل ، موضزعك كان يختلف شوي: ولكنك ما شاء الله عندك مخزن يحتوي على كل غالي ونفيس اخوي عمر : 1. يجب معالجة هذا الموضوع ، فعليه لن تحتاج الى الحذف ، 2. محتاجين الجدول الذي و به بيانات قليلة ، ومثال على المطلوب. جعفر
  15. وعليكم السلام اذكر اخوي @ابوخليل له مشاركة في هذا الخصوص ، وحتى كان اختيار بترك او سجل وحذف الباقي ، جعفر
  16. 3. آسف ، لا اعرف هذا ، 2. اذا قصدك تحول بيانات النموذج ARD الى فاتورة بيع ، فهذا معناه ان هذه الفاتورة يجب ان يكون لها رقم جديد ، والذي نستطيع عمله ، 1. عليه ، ما يكون عندنا مشكلة هنا ، لأننا سنستخدم رقم الفاتورة الجديد ، اما بدون رقم الفاتورة ، فما ممكن ربط البيانات بين النموذج الرئيسي والنموذج الفرعي ، إلا عملت تغيير على حقول ربط النموذج الرئيسي بالنموذج الفرعي. الذي يجب عمله الآن: تعبئة بيانات النموذج الرئيسي ، وبيانات النموذج الفرعي ، من النموذج ARD. جعفر
  17. وعليكم السلام اخوي حربي رجاء متابعة الموضوع معاي حسب الارقام الحمراء في الصورة في الاسفل (مع ملاحظة ان المقاسات في كمبيوتر بالبوصة وليست بالسنتيمتر) : - رقم 3 ، عرض الورقة 8.27 ، - رقم 5 ، هامش اليسار + هامش اليمين ، وهذه الهوامش لا يمكن ان تكون صفر ، لأن الطابعة بها بكرات لسحب الاوراق وهي بحاجة الى هذه الهوامش ، وهوامش كل طابعة تختلف عن الاخرى ، ولمعرفة اقل هامش تحتاجة طابعتك ، اجعل الهوامش = صفر لليسار واليمين (في رقم 5) ، ثم افتح التقرير في وضع معاينه ، ثم اعد التقرير في وضع تصميم ، وسترى القيم في رقم 5 ، - عرض التقرير حسب الصورة في الاسفل (رقم 6) = 8.27 (رقم 3) - 0.275 (الهامش اليمين في رقم 5) - 0.275 (الهامش اليسار فر رقم 5) = 7.72 - وللحصول على اقصى عرض للتقرير ، اجعل الرقم في (رقم 7) = النتائج اعلاه (7.72) . واحتياطا ، يجب ترك مسافة هامش زيادة من الجانبين ، وإلا فالتقرير قد يطبع صفحة زيادة عند الزبون جعفر
  18. وعليكم السلام اخوي ابو زاهر لا تستطيع اظهار بيانات النموذج ARD مباشرة في النموذج الفرعي frmSubSales ، وذلك لأن النموذج الفرعي frmSubSales مرتبط بالنموذج الرئيسي frmSales بهذه الحقول الثلاث: . وعليه ، فيجب ارسال بيانات الحقول الثلاث Rjmfatwra;Atarih;NoEmp من النموذج ARD الى النموذج الرئيسي frmSales ، والذي على اساسه سيتم تصفية النموذج الفرعي frmSubSales تلقائيا. لذا ، توجب ادخال هذه الحقول الثلاث الى الاستعلام مصدر بيانات النموذج ARD ، ثم تعديل كود الزر "ادراج كامل السجلات بفاتورة البيع" الى: Private Sub أمر40_Click() DoCmd.OpenForm "frmSales", acNormal 'Forms![frmSales]![SubSales]![Rajmsanf] = Me.Rajmsanf 'Forms![frmSales]![SubSales]![ID_Sanf] = Me.ID_Sanf Forms![frmSales]![Rjmfatwra] = Me.Rjmfatwra Forms![frmSales]![Atarih] = Me.Atarih Forms![frmSales]![NoEmp] = Me.NoEmp End Sub . وبسبب العلاقة بين النموذج الرئيسي والفرعي ، فقد لا تحصل على جميع السجلات (اقول هذا لأني لا اعرف كيف حصلت على البيانات في النموذج ARD) جعفر 894.قاعده اسهل.accdb.zip
  19. وعليكم السلام جرب هذا التعديل في كودك ، واللي بيعطيك اسماء جميع الملفات Private Sub Command29_Click() With Application.FileDialog(3) .Title = "Uploading picture : Uploading Picture" .Filters.Clear .Filters.Add "Image type", "*.jpg" .Filters.Add "All types", "*.*" .AllowMultiSelect = True .InitialFileName = "" If .Show = -1 Then 'Me.swra = .SelectedItems(1) 'Loop through each file selected and add it to our list box. For Each varFile In .SelectedItems 'Me.FileList.AddItem varFile MsgBox varFile Next End If End With End Sub جعفر
  20. وعليكم السلام استعملت استعلام الحاقي: . والوحدة Append_Buy_to_Daily هي التي تقوم بالعمل: . ونناديها من اكثر من مكان (لاحظ الاسهم). جعفر الاصلي.zip
  21. السلام عليكم اخي صالح عمل جميل ، كالمعتاد اقتراح اضافة شوية اشياء له: خلينا نعتبر هذا البرنامج هو العقل المدبر ، اللي لازم يكون شغال بتشغيل الكمبيوتر ، ولا ينطفئ إلا بإطفاء الكمبيوتر ، خلي فيه Logo الشركة ، وبياناتها ، خلينا نستفيد من الساعة في: عمل Backup يومي لبرنامجي أ وبرنامجي ج في الساعة الفلانية ، وخليني اتذكر موعد الاجتماع يوم d/m/yy الساعة hh:mm ، ووووو وكذلك اذا الزبون اراد ان يرسل لي ملاحظة في ايميل عن برنامجه ويريد .... جعفر
  22. وعليكم السلام اخوي سلمان الرابط هذا فيه ملف تقدر تستفيد منه ومن الرابط ، اعتقد بأن هذه المعادلة تكفيك: IIf([النهاية]>[البداية],[النهاية]-[البداية],([النهاية]+1)-[البداية]) ولأن فيها كلمات عربية ، تم لخبطة مكان الحقول ، ولكن نسخها من هنا ولصقها في برنامجك سيكون صحيحا ، وهكذا تبدو بالصورة الصحيحة جعفر
  23. اذا كان قصدك كود ربط برنامج الواجهة مع برنامج الجداول اللي على السيرفر ، فتستطيع انزال البرنامج من هذا الرابط ، وفيه الكود JStreetAccessRelinker2.accdb جعفر
  24. الله يطول في عمرك اخوي كاسر ، انت واجد متفاءل اولا يجب ان تخبره انه بحاجة الى انترنت
  25. تعال واخبر المستخدمين هذا الكلام جعفر
×
×
  • اضف...

Important Information