jjafferr

ما شاء الله ، 6 مشاركات وانتوا تتكلموا عني ، وانا مافي الدنيا خلوني اجيب بخور اتبخر فيه وشاكر جميل كلماتك أخي ابوعارف جعفر

وعليكم السلام هل نسخة 2013 هي 64 بت ، بينما نسخة 2007 كانت 32 بت؟ وماهي رسالة الخطأ ، انت لم تعرضها لنا؟ جعفر

وسبقني أخي رمهان للخير . التنسيق عندي هو: "MR"000000 والنتيجة: جعفر 234.قاعدة البيانات1.accdb.zip

وعليكم السلام تفضل: SELECT Format(['Date],"mmm-yyyy") AS Month_Year, Format(['Date],"yy") AS Expr1, Format(['Date],"mm") AS Expr2 FROM MainTble GROUP BY Format(['Date],"mmm-yyyy"), Format(['Date],"yy"), Format(['Date],"mm") ORDER BY Format(['Date],"yy"), Format(['Date],"mm"); جعفر

. انا كنت بكتب تعليق على ان هذه الخطوة لم يتم تطبيقها ، ولكن ابوعارف عارف بالتفصيل جعفر

أخوي عبدالله إحساسي يحسسني بأن فيه شئ آخر تريد تعمله بعدما تحل موضوع نقل البيانات للاكسل شو الخطوة التالية اللي تريد تعملها؟ هل تريد حفظ ملف الاكسل باسم معين؟ هل تريد ان تطبع البيانات او ايش الخطوة اللي تريد تعملها بعد حفظ البيانات في الاكسل؟ لو تعطينا تفصيل اكثر ، ممكن نعطيك جواب متكامل اكثر جعفر

وعليكم السلام اولا والملاحظة سهلين بس كود ثانيا ، شو عمله بالضبط ، حتى اعرف شو يسوي ، وعلى اساسه اعرف مكانه من الاعراب جعفر

وعليكم السلام . نعم ممكن رحم الله والديك ، سهلت علي المشوار ، فبدل ان اشتغل واضبط نموذجك ، انت ريحتني وستقوم بالعمل بدلي المنتدى مليان بمواضيع مماثلة ، وانا راح ارفق لك رابطين: http://www.officena.net/ib/topic/41365-اضافة-صورة-طالب-في-نموذج-في-برنامج-اكسس/#comment-233973 http://www.officena.net/ib/topic/32307-تحميل-صورة-الشخص-لكل-سجل/#comment-165675 جعفر

تفضل جعفر 231.الرصيد.accdb.zip

انزل البرنامج المجاني من هذا الرابط http://www.7-zip.org/ ثم اضغط البرنامج بصيغة 7z ، وعندما يكون الحجم مناسب ، تستطيع ان: إما ان ترفعه في رابط خارجي ، ثم ترفق الرابط هنا ، او ان تغير اسم الملف وتغير صيغته الى zip بدلا عن 7z ، ثم تستطيع ان ترفقه في مشاركتك في هذا المنتدى وتخبرنا بصيغة المرفق جعفر

هذا معناة انت تريد الاختيار رقم 2 ان شاء الله ، عطني الى الليلة وان شاء الله ارد عليك جعفر

وعليكم السلام أخي كرار انا لم ادخل البيانات ولا لعبت فيها ، استعلامك raseed يؤكد ان عندك ادخالين ادخل معلومات جديدة ، وشوف النتيجة جعفر

وعليكم السلام أخي حسين انا اللي يجي في بالي طريقتين للحل: ان نعمل حقل في النموذج ، في اعلى النموذج مثلا ، وبلون خلفية معين ، بحيث جميع الارقام تدخل فيه ، ومن خلاله يتم توزيع الارقام للحقول الصحيحة ، اعتمادا على من اين اتى امر ادخال الارقام (Screen.PreviousControl) ، عمل نموذج خارجي في حجم نافذة الادخال ، ثم بعد الانتهاء من ادخال البيانات ، وعند اغلاق البيانات ، يتم توزيع الارقام للحقول الصحيحة ، اعتمادا على من اين اتى امر ادخال الارقام (Screen.PreviousControl). وانا افضل الطريقة الاولى ، ايش رايك؟ جعفر

وعليكم السلام أستاذ علي ولا تُسدي الكلمات حقكم في تعليمكم اجيالاً جعفر

وعليكم السلام نتيجة استعلامك السابق كان: . واصبح . وتصميم الاستعلام الجديد هكذا: . جعفر

وعليكم السلام ياريت ترفق قاعدة بياناتك ، وتخبرنا عن المكان اللي تريد فيها الصورة. جعفر

السلام عليكم أخي عبدالله رجاء ارفاق قاعدة بياناتك ، وتخبرني اين احصل على المعلومات التي تريد تصديرها جعفر

تفضل يا سيدي الجزء الاول يعتمد على هذا الكود لتفكيك نص الباركود عند علامة + : Private Sub barcode_LostFocus() 'only split is nfous is empty If Len(Me.nfous & "") <> 0 Then Exit Sub Dim x() As String x = Split(Me.barcode, "+") Me.nfous = DLookup("[NoufousName]", "NoufousTable", "[Field1]='" & x(0) & "'") Me.[0000] = x(1) Me.[00] = x(2) Me.[00000] = x(3) Me.[0] = x(4) End Sub . اما بالنسبة للجزء الثاني ، فرجاء عمل نسخة منه ، وحذف جميع البيانات ، وابقاء بيانات قليلة تخدم المطلوب ، وبعدها تخبرني عن اي حقل من البرنامج الاول له علاقة بالبرنامج الثاني ، واعطني مثال استطيع ان اقتدي به ، لوسمحت جعفر 229.1.db barcode new.mdb.zip

وعليكم السلام أستاذ علي عذرا على التأخر في الرد ، كنت في ابوظبي من يوم الاثنين ، وبعيد عن كمبيوتري هذا هو التقرير: . وعلشان يعمل ، فيجب النقر على الزر الجديد لطباعة التقرير: . وهذا الزر يستعمل الكود التالي: Private Sub cmd_rpt_Absent_Late_Click() If Len(Me.cmb_Month & "") = 0 Then MsgBox "Can't leave the Month Empty" Exit Sub ElseIf Len(Me.Grades & "") = 0 Then MsgBox "Can't leave the Grades Empty" Exit Sub ElseIf Len(Me.Sections & "") = 0 Then MsgBox "Can't leave the Sections Empty" Exit Sub End If 'Delete the data from MySQL = "Delete * From tbl_Absent_Late" CurrentDb.Execute (MySQL) DoCmd.SetWarnings fasle 'DoCmd.OpenQuery "Absents_Crosstab_1-3" DoCmd.OpenQuery "Absents_Crosstab_2-3" DoCmd.OpenQuery "Absents_Crosstab_3-3" 'DoCmd.OpenQuery "Late_Crosstab_1-3" DoCmd.OpenQuery "Late_Crosstab_2-3" DoCmd.OpenQuery "Late_Crosstab_3-3" DoCmd.SetWarnings True DoCmd.OpenReport "rpt_Absent_Late", acViewPreview End Sub جعفر 221.Folow up V.2.accdb.zip

تفضل يا سيدي 226.Edf.mdb.zip

أخي طارق . انا آسف ، لم افهم قصدك اعطني مثال لكي اهتدي به لوسمحت ، مثلا ، ماذا تريدني ان اعمل بالمعلومة A1+2000+00+00101+B اخبرني بالتفصيل لوسمحت ، بالقيم واسماء الحقول. . آسف لم افهم المطلوب ابدا ولكن وبشكل عام ، نعم نستطيع ان نربط قواعد البيانات ببعض ، واجراء اي عمل عليها جعفر

السلام عليكم شباب الله يسلمكم ، انا كثير السفر ، وبدون الكمبيوتر ما اقدر ارد على أسئلة صعبة بكرة الصبح ان شاء الله بشوف الموضوع جعفر

وعليكم السلام انا اعتقد ان الطريقة الصحيحة هي ، عند إضافة صنف ، الكود يجب ان يتأكد من وجود الصنف على القائمة او لا: اذا الصنف غير موجود ، فيتم إضافة الصنف كالعادة ، اذا كان الصنف موجود ، فيجب الذهاب الى ذلك السجل ، واجراء العملية عليه (سواء + او -) مثلا جعفر

وعليكم السلام ورحمة الله وبركاته حيا الله أبوخليل وانا اقول وين أخونا العود ، بس قلت الغايب عذره معاه اثاريك مشغول تبرمج الطرق اللي بقولها ، ما تحمي الصورة الخارجية ، وانما تعطيك الطريقة للتأكد من أن الصورة لم تتغير ، يعني في قاعدة البيانات نحتفظ بمعلومات الصورة الخارجية ، وعند تشغيل قاعدة البيانات ، نقرأ بيانات الصورة الخارجية ونقارنها مع بياناتنا. الرابط التالي فيه الطريقة الاسهل ببيانات اقل: https://technet.microsoft.com/en-us/library/ee176615.aspx والرابط التالي فيه برنامج اكسس ، بس البيانات اللي تحصل عليها مهولة: http://www.everythingaccess.com/tutorials.asp?ID=Accessing-detailed-file-information-provided-by-the-Operating-System وبرنامج بتغييرات على البرنامج اعلاه: http://www.accessmvp.com/strive4peace/DB_ListFiles.htm جعفر

وعليكم السلام تفضل جعفر db barcode new.zip