محمد ايمن

تفضل اخي الكريم ربما يفيدك هذا البرنامج دليل الهاتفnew.rar

مشكور اخي الكريم ووفقك الله الى كل خير

اخي الكريم اسامة مشكور على سرعة الرد ان ما تقوله يعني ان الاكسسز يملك امكانيات كبيرة 32000 كائن ... 1000 وحدة نمطية لم اجد الى الان برنامج احتوى على هذا العدد برايي الخاص لاحاجة الى SQL في اكسسز عليك التعامل مع برنامج واحد اما SQL فانت بحاجة الى برنامجين تقريبا انا لاانكر امكانيات SQL ولكن اكرر و اقول برايي الخاص انا لا احتاج له

اصدقائي الاعزاء السلام عليكم و رحمة الله و بركاته طرح في المنتدى كثيرا مقارنة بين الاكسسز و SQL و اقتبس من كلام اخي هشام علام " عدد الجداول 2 مليون اما اكسس 32 " http://www.officena....?showtopic=2868 هل المقصود 32000 قمت بتجربة احد البرامج و المفاجاة ان عدد السجلات وصل الى 73500 و اكثر هل لتكرار البيانات علاقة في الامر ؟؟؟ اترككم مع المرفق data.rar

اخي الكريم nart lebzo لقد حلت المشكلة بما ان البرنامج بقوم بانشاء قاعدة مماثلة تماما ولكن بجداول فارغة وبذلك عند تفعيل الخاصية في القاعدة الاساسية تكون الخاصية مفعلة ايضا في القاعدة الجديدة طبعا ما اتكلم عنه هو برنامج يقوم بانشاء قاعدة جديدة بجداول فارغة و عند تشغيل القاعدة يرسل اختصارا لها على سطح المكتب ولكن مايحيرني لماذا ظهر عندي اختصارين ؟؟؟؟ انشاء قاعدة جديدة بجداول فارغة.rar

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

اخي ابو خليل كلامك صحيح و لكن القاعدة تعمل على 2007 اما بانسبة الى اخي nart lebzo انا لدي ويندوز 7 sp1 اخي الكريم الغريب في الموضوع اني جربت اربع برامج واحد للاخت زهرة و واحد لك وواحد للاخ ZAHOF اما الرابع فهو لواحد من اخوتنا في المتندى ثلاثة منها كانت تحتوي على نفس المشكلة وهي وضع اختصارين عوضا عن واحد اما الرابع فقد نجح وعندما فتحت البرامج وجدت ان الثلاثة لديهم نفس الكود اما الرابع فلديه كود مختلف ووحدتين نمطيتين عوضا عن واحد لكن الى الآن لم اصل الى جواب سؤالي الاصلي : وهو هل يمكن اضافة الخاصية windows script host object model بواسطة الكود ام لا ؟؟؟

اخي الكريم هذا رابط يحتوي على فيديو يوضح المشكلة http://www.4shared.com/rar/kCu0Ayk0/Untitled.html

اخي الكريم جرب المرفق الثاني ( انشاء قاعدة جديدة بجداول فارغة 3 ) لأن الاول يحتوي مشكلة كما ذكرت انت وهي انشاء القاعدة بنفس الاسم و الجداول ليست فارغة

اصدقائي الاعزاء تم حل المشكلة و الحمدلله اولا لابد من التعرف على طريقة عمل البرنامج ثم حل المشكلة البرنامج يقوم بانشاء قاعدة بيانات جديدة بنفس اسم القاعدة الاصلية و لكن الجداول تكون فارغة ثم يقوم باعادة تسمية القاعدة حسب الاسم المدخل في صندوق الادخال لكن ما لو كان هناك ملف بنفس الاسم المدخل في صندوق الادخال او بنفس اسم القاعدة الاصلية سيقوم البرنامج و بكل بساطة باستبداله و هذا يعني فقدان البيانات الحل كود يقوم بالتحقق ممايلي: 1 - عدم وجود قاعدة بيانات بنفس اسم القاعدة الاصلية 2 - عدم وجود قاعدة بيانات بنفس الاسم المدخل في صندوق الادخال اعتذر للاطالة و لكن لابد من شرح المشكلة حتى يتنسى للجميع فهم الكود و طريقة عمله انشاء قاعدة جديدة بجداول فارغة 3.rar

اصدقائي الاعزاء البرنامج التالي يقوم بانشاء نسخة جديدة عن قاعدة البيانات ثم يقوم باعادة تسمية القاعدة هل يمكن تسمية القاعدة قبل انشائها ؟؟؟ انشاء قاعدة جديدة بجداول فارغة.rar

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

اخي الكريم البرنامج الموجود في الرابط يقوم بوضع اختصارين عوضا عن اختصار واحد بينما البرنامج الموجود في المرفقات لدي يرسل اختصار واحد فقط على العموم شكرا للجميع ولكن لدي سؤال كيف اضيف الخاصية windows script host object model بواسطة الكود

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

اصدقائي الاعزاء تحية طيبة و بعد وجدت في المنتدى اكثر من برنامج لارسال اختصار لقاعدة البيانات الى سطح المكتب جميعها كانت تحوي مشاكل و هي ارسال اختصارين عوضا عن واحد اما برنامج الاخ ZAHOF فهو الوحيد الذي ارسل اختصار المشكلة الآن انه عند استيراد النموذج و الوحدات النمطية تظهر رسالة الخطا user-defined type not defind ويظهر السطر التالي مظللا باللون الازرق Dim oShell As IWshShell_Class علما انه عند تشغيل البرنامج الاصلي لم يظهر اي خطا و لكن عند الاستيراد ظهر هذا الخطا ماهو سبب هذا الخطا المرفق الأول يحتوي على نموذج لانشاء قاعدة بيانات جديدة و النموذج الثاني لارسال اختصار الى سطح المكتب المرفق الثاني و هو البرنامج الاصلي للاخ ZAHOF سؤال آخر كيف استطيع اضافة كود ارسال الاختصار الى سطح المكتب مباشرة بعد انشاء القاعدة عذرا للاطالة و لكم جزيل الشكر سلفا انشاء قاعدة جديدة بجداول فارغة.rar كود إرسال إختصار إلى سطح المكتب.rar

سلمت يداك اخي الكريم ووفقك الله الى كل خير

اخي الكريم الحمدلله تم حل المشكلة و لكن تم تعديل الكود الى التالي If Me.Product2ID = Me.Product1ID Then Me.Number2 = 0 ElseIf Me.Product2ID = Me.Product3ID Then Me.Number2 = 0 ElseIf Me.Product2ID = Me.Product4ID Then Me.Number2 = 0 ElseIf Me.Product2ID = Me.Product5ID Then Me.Number2 = 0 ElseIf Me.Product2ID = Me.Product6ID Then Me.Number2 = 0 ElseIf Me.Product2ID = Me.Product7ID Then Me.Number2 = 0 ElseIf Me.Product2ID = Me.Product8ID Then Me.Number2 = 0 ElseIf Me.Product2ID = Me.Product9ID Then Me.Number2 = 0 ElseIf Me.Product2ID = Me.Product10ID Then Me.Number2 = 0 ElseIf Me.Product2ID = Me.Product11ID Then Me.Number2 = 0 ElseIf Me.Product2ID = Me.product12ID Then Me.Number2 = 0 End If

السلام عليكم و رحمة الله و بركاته اصدقائي هل يمكن لتعليمة الشرط if المقارنة مع اكثر من قيمة لدي 12 حقل و لا ارغب في تكرار البيانات في احدا الحقول. قمت بكتابة هذا الكود و لكن ظهرت رؤسالة خطأ و هي tupe mismatch الكود If Me.Product1 = Me.Product2 Or Me.Product3 Or Me.Product4 Or Me.Product5 Or Me.Product6 Or Me.Product7 Or Me.Product8 Or Me.Product9 Or Me.Product10 Or Me.Product11 Or Me.product12 Then MsgBox "اسم المادة موجود يرجى إدخال اسم آخر", vbCritical Else DoCmd.GoToControl "number1" End If هل هذا الكود صحيح ام خطأ و هل يمكن لتعليمة if اساسا المقارنة مع اكثر من قيمة ؟؟؟؟؟؟؟ ولكم جزيل الشكر سلفا

والله بصراحة يا اخي لا اعلم كيف ينشئ استعلام الحذف اذا كنت تستطيع ان تشرحلي كيف انشئه و ساجربه ولك جزيل الشكر سلفا

اصدقائي السلام عليكم و رحمة الله و بركاته كيف استطيع ان احذف السجلات من نموذج بعد فتحه وهو مخفي ساضع الكود للتوضيح Dim r As String Dim e As String r = "mainmove" e = "[id]=" & "'" & Me![returninvoiceid] & "'" DoCmd.OpenForm r, , , e , , acHidden DoCmd.RunCommand acCmdSelectAllRecords DoCmd.RunCommand acCmdDelete DoCmd.close acForm, "mainmove" ولكن المشكلة ان هذا الكود يحذف السجلات من المنوذج المفتوح اساسا و ليس من النموذج mainmove ما هو التعديل اللازم لكي يحذف من النموذج mainmove ملاحظة اذا فتحت النموذج بشكل عادي فان الكود يعمل و لكن بشكل مخفي لا يعمل

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

أصدقائي الاعزاء الموضوع المطروح مهم جدا لذلك ارجو الافادة ولو بكلمة ولكم جزيل الشكر سلفا

الف الف الف الف مبروك انشالله للاحسن

مشكووووووووووووووووووووووووووووووووووور

اصدقائي السلام عليكم و رحمة الله و بركاته كيف اجعل الحقل الموجود في النموذج يتحدث بشكل مستمر بحيث يظهر الحقل كساعة تعمل بشكل دائم clock.rar