كوماندير

السلام عليكم ورحمة الله وبركاته شباب لدي كود حفظ نسخة من قاعدة البيانات الحالية . المطلوب هو تغيير الكود ليحفظ نسخة من قاعدة البيانات (الجداول ) حيث ان قاعدة البيانات لدي مقسمة . الكود هو : Dim OldFile, DBwithEXT, DBwithoutEXT, NewFile, CopyMyDB, strFolderName OldFile = CurrentDb.Name DBwithEXT = Dir(OldFile) DBwithoutEXT = Left(DBwithEXT, Len(DBwithEXT) - 6) 'OurDb Backup strFolderName = "D:\LabDb Backup" If Len(Dir(strFolderName, vbDirectory)) = 0 Then MkDir (strFolderName) End If ' Next line shows the required path for the backup database NewFile = strFolderName & "\" & DBwithoutEXT & " " & Format(Date, "dddd dd mmmm yyyy") & Right(DBwithEXT, 6) CopyMyDB = "cmd.exe /C copy " & """" & OldFile & """" & " " & """" & NewFile & """" Shell CopyMyDB, 0 MsgBox "áÞÏ Êã ÍÝÙ äÓÎå ÇÍÊíÇØíÉ ÈäÌÇÍ Ýí ÇáãÓÇÑ " & vbCrLf & _ strFolderName 'MyErr: 'If Err.Number <> 0 Then 'MsgBox Err.Number & " - " & Err.Description 'End If If MsgBox("åá ÊÑíÏ ÇáÎÑæÌ ãä ÇáÈÑäÇãÌ ÝÚáÇ ¿ ", vbMsgBoxRight + vbMsgBoxRtlReading + vbCritical + vbYesNo, "ÊÍÐíÑ åÇã ¿") = vbYes Then DoCmd.Quit End If سؤال على الهامش ؟ عند تجربتي لهذا الكود على قاعدة بيانات تعمل على جهاز عليه Windows7 تعمل جيدا بدون مشاكل ، الملاحظ انه عند نقلي لقاعدة البيانات على جهاز به وندوز اكس بي ان شكل النماذج في النسخة المحفوظة تغير ، ماهو السبب برأيكم ؟

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

شكرا جزيلا ابا جودى وفي انتظار ردود بقية الاساتذة الكرام وياريت تطبق ماذكرت على مثالي , كما اود تضمين الصورة المراد عرضها للتقرير الحالي في رأس النموذج وكيف يمكنني التحكم بعرض وارتفاع الصورة من خلال النموذج ، مثلا ان كانت الصورة اكبر من حجم وعرض معين لايتم قبولها ويتم تنبية المستخدم ان حجم الصورة لايلائم المساحة المحددة لها في التقرير .

السلام عليكم ورحمة الله وبركاته عندي محاولة لادراج صورة كترويسة لثلاثة تقارير المطلوب هو ادراج الصورة في رأس التقرير حسب الحقل (MyPhotoShow في جدول التقارير ) كما هو حاصل بالنسبة لمربعي النص ( العنوان العلوي والسفلي ). ماهي الطريقة لعمل ذلك ؟ وكيف يمكنني التحكم بحجم الصورة (العرض والطول ؟) اليكم المرفق Mystore.rar

اخي هناك خطأ يظهر عند محاولة الاتصال بقاعدة البيانات انظر للصورة :

السلام عليكم اخواني بالمرفق احاول البحث عن عن قيمة احد الحقول ( في النموذج المستمر) حسب اختياري ل اسم الحقل من ( الكومبوبوكس ) وحسب عامل تشغيل المقارنة الذي اخترته من ( الكومبوبوكس ) وحسب القيمة في حقل ( TextToComp ). وماهي الطريقة لجعل التسمية التوضيحية تظهر بالقائمة المنسدلة لـ ( كمبوبكس اسماء حقول الجدول ) بدلا عن ظهور اسماء الحقول كما سيظهر بالمرفق . لم اهتد لطريقة معينة فهلا ساعدتموني في ايجاد الحل . شاكرا للكل . وهذا المرفق : QueryByService.rar

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

الف الف شكر اخي رمهان هو المطلوب بعينه حُلت

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

وهذا المرفق : LastTry3.rar

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

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

اخي رمهان الف الف شكر الفائده اذا كان مربع القائمة يعرض لي تواريخ زيارات عميل سابقة وباقي تفاصيل طلب هذا العميل توجد في النموذج ، فعندما تكون الزيارة التي انا بصددها مميزه بلون وخط خاصين يسهل علي اشياء كثيره . عموما بعد عناء مضن عن الموضوع توصلت الى انه لايمكنني عمل ذلك من خلال مربع القائمة . لكن يمكنني عمل ذلك من خلال نموذج فرعي وعن طريق التنسيق الشرطي . المشكله ان طريقة التنقل ضمن النموذج عن طريق مربع القائمة من خلال الكود : Me.RecordsetClone.FindFirst "[SalID]=" & Me.SalList Me.Bookmark = Me.RecordsetClone.Bookmark الان ما اريده هو طريقة التنقل بين سجلال النموذج الرئيسي من خلال النموذج الفرعي ( وكان النموذج الفرعي يقوم بعمل مربع القائمة ). مثلا عند النقر على اسم العميل بالنموذج الفرعي ينتقل الى هذا العميل بالنموذج الفرعي . وهذا المرفق : LastTry2.rar

السلام عليكم ورحمة الله وبركاته اخوتي الكرام عندي نموذج فيه بيانات مجموعة عملا ويتم متابعة المجموعة التي تم تسجيلهم في تاريخ معين من خلال مربع قائمة . المطلوب انه عند التنقل بين سجلات النموذج ان يتم تمييز(خط خاص ولون خاص وجعل النص مائلا ... الخ ) اسم العميل الحالي في مربع القائمة . اليكم المرفق : ‫LastTry1.rar

بعد محاولات وجدت الحل : DFG2.rar بقي سؤال وحيد : ماهو الفرق بين : A5: DSum("[DayValue]";"Q1";" [SerialDay] <=" & [SerialDay]) و A5: DSum([DayValue];"Q1";" [SerialDay] <=" & [SerialDay])

????????????

المطلوب هو جمع قيم الحقل A3 الى تاريخ هذا السجل

وهذا المرفق DFG.rar

عفوا اخواني لا استطيع رفع المرفق مالمشكله ؟؟

السلام عليكم اخوتي الكرام المطلوب في الاستعلام Q2 : اذا كان يوم جمعه ان تكزن القيمه للحقل A3 40 واذا كان غير الجمعه تكون القيمه 60 ويتم الجمع التراكمي للحقل A3 في الحقل A4 بحييث تكون الايام بالتسلسل واليكم المرفق ( ماهو الخطأ في عملي ):

عفوا اخواني هذا المرفق MyRptFormat.rar

السلام عليكم ورحمة الله وبركاته الاخوة الكرام لدي تقرير جدولي وهناك شروط لظهور واخفاء وتحريك بعض عناصره فعند اختياري للشركة Sh4 ,Sh7 اود تنسيقا معينا وهو اخفاء الاعمدة ColF,ColG,ColC وبالتالي تصغير عرض مربع النص SerialN ( الذي يوجد له تنسيقا شرطيا ) ليشمل مربعات النص الظاهرة فقط . ثم ماهو الخلل والفرق بين التقريرن وهما نفس الشكل اللهم ان التقرير MgRpt1 يحتوي على رقم الصفحة اعلا راس الصفحة الفرق يظهر جليا بين التقريرين عند اختيار Sh4 ,Sh7 وهذا المرفق

انظر للفاتورة رقم 4 OrderID=4

هل من طريقة للتخلص من اشارة السالب اخي عبدالرحمن