gs7581

اخي الفاضل حسب علمي أن كائنات قاعدة اليانات التي يتم حزفها لايمكن استرجاعها مرة اخري حسب رسائل الاكسس تقبل تحياتي

شكرا اخي خضر الرجبي علي اهتمامك الشديد بمساعدة اعضاء المنتدي و قدكتب ردا بالامس و لكن لم يتم تحميلة و لا اعرف السبب و قد عملت اعادة تجزئة وتحسن اداء القاعدة نوعا ما اما بالنسبة لردك الجميل اليوم فحاولت عملة و لكن هناك عدد2 refrences OLE Automotion Microsoft access 11.0 object library علما بأني استخدم فيجوال بيزك من نسخة Visual studio 6 و يتوقف الكود عند السطر Set db = Workspace(0).OpenDatabase ارجو الافادة و شكرا

السلام عليكم قمت بمطالعة موقع شركة ميكروسوفت الموجود في تعقيب الاخ خضر الرجبي الخاص بعمل جملة begin trans لتسريع قاعدة البيانات و عملت البرنامج المطلوب و لكن تظهر لي رسالة خطأ عند تشغيل البرنامج تقول user defined function not defined عند السط Dim db As Database و لا اعرف السبب ارجو مراجعة الكود و المساعدة Private Sub Form_Load () Dim Starttime, Endtime Dim db As Database Dim t As RecordSet Dim i As Integer Dim tempName As String Dim temphone As String Set db = Workspace(0).OpenDatabase("c:\vb\BIBLIO.MDB") ' Uses a ' copy of BIBLIO.MDB. Set t = db.OpenRecordSet("Publishers", dbOpenTable) Starttime = Now 'BeginTrans ' Add this and CommitTrans (below) for greater speed. For i = 1 To 100 tempName = "testname" & Str$(i) ' Make an arbitrary unique ' string. tempPhone = Str$(i) ' Make arbitrary number. t.AddNew ' AddNew clears copy buffer to prepare for new record. t!PubID = 30 + i ' Set primary key to unique value. t!Name = tempName ' Set Name field to unique value. t!Telephone = tempPhone ' Set Telephone field to unique value. t.Update ' Write the record to disk or to transaction buffer. Next i 'CommitTrans ' Add this and BeginTrans (above) for greater speed. Endtime = Now MsgBox "Time required= " & Format(Endtime - Starttime, "hh:mm:ss") t.Close db.Close End End Sub

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

كل الشكر للأخ الفاضل خضر الرجبي البرنامج يعمل و الحمد لله

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

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

السلام عليكم الاسم: جابر محمد عبداللطيف الشيمي المهنة : طبيب بيطري تاريخ الميلاد 30/1/1975 تاريخ التخرج 1997 من كلية الطب البيطري بكفر الشيخ جامعة طنطا مصر متزوج من 3 سنوات وليس عندي اولاد عملت لمدة خمس سنوات كمندوب دعاية باحدي شركات الأدوية ثم تفرغت للعمل بمجالي الطب البيطري و البرمجة الهوايات الكمبيوتر ثم....................ثم الكمبيوتر الاقامة بمدينة حوش عيسي محافظة البحيرة مصر التليفون 2388206/010 البريد الالكتروني gs7581@yahoo.com اتمني معرفة و مراسلة جميع رواد المنتدي

اشكر الاخ امير عاطف علي تجاوبة البروسيسور علي الجهاز 128/1.7 فهل هو غير مناسب للقاعدة ام لا و شكرا :(

السلام عليكم عندي جدول للأصناف بة بيانات الصنف العادية والكمية الموجودة من الصنف اريد طباعة تقرير من الجدول بحيث يتكرر السجل الخاص بالصنف عدد مرات مساوي للعدد المكتوب في خانة الكمية الخاص بكل صنف - ملحوظة: اريد معرفة كيف يتم ارفاق ملف الي المنتدي و شكرا

ردا علي اقتراح الاخ فتي الوادي فأنا اشكرة بشدة علي استعدادة لاصلاح قاعدة البيانات و لكن اخبرة انني من مصر و ليس من المملكة العربية السعودية و طلب اخير اين تكتب جمل begin trans و غيرها وكيف يتم التحويل الي SQL و شكرا

الأخ الفاضل خضر الرجبي لو كان ممكن حلول اخري باللغة العربية مع الشكر

السلام عليكم عندي قاعدة بيانات و تعمل في صيدلية و وصل عدد السجلات في فاتورة البيع فقط الي اكثر من 26000 سجل و عند استدعاء كشوفات الحساب الخاصة بالعملاء او الاصناف يتم في بطء شديد حتي لو عملت ضغط و اصلاح لقاعدة البيانات و لا اعرف ما السبب او ما يجب عملة الجزء الثاني من سؤالي هو ظهور رسالة خطأ عند العمل بالبرنامج و تظهر في جميع سجلات النموزج الموجود بدون سبب و احيانا تظهر رسالة تقول ان محرك jet engine قام بوقف العملية نظرا لوجود اخطاء وغير قادر علي اتمامها ارجو الرد علي الاستفسارات و شكرا

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

الاخوة الافاضل اتمني الرد السريع ان كان ممكنا

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

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