ابوخليل

الف مبروك اخي احمد ، وتستاهل اكثر

تفضل Dim i As String, x As Integer i = Me.Specialty x = DCount("*", "tblDoctors", "[Specialty]=" & i) + 1 Me.DoctorID = i & "/" & Format(Str(x), "000") ID2.rar

الطلب غير واضح - ما اسم الحقل الذي تريد الترقيم فيه ؟ لانه لا يظهر على الفورم حقل لترقيم الاختصاص

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

اخي العزيز ابو ابراهيم هذا السطر يجلب من الصفحة شرط وجود الجدول مسبقا في قاعدة البيانات DoCmd.TransferText acImportHTML, , "HTML1", CurrentProject.Path & "\0125.html", True, "0125" اذا جعلت اسماء الحقول في الجدول f1 , f2 ,f3 ....... وهكذا ، واستبدلت true بـــــــــ false يجلب البيانات + رأس العمود واذا سميت الحقول مثل ما هي في الصفحة لا يعمل الا مع true ويجلب جسم الجدول ولكن لا يظهر السجل الأول لو القيت نظرة بارك الله فيك IMPORT_HTML2.rar

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

غريبة .. طلبك يسير جدا ويبين انك لا تعرف في الأكواد هل انت من عمل المثال ؟ على كل لست ملزما بالاجابة تفضل التعديل test3.rar

لم اكتب الا بعد التجربة اعمل على اجهزة كما عندك .. وندوز7 واوفيس 10 ولم تعمل عندي السؤال : ما ذا تريد وما هي حاجتك من هذه الأمثلة ؟

فقط اعكس الكود With rst Me.sname = ![sname] Me.sage = ![sage] .Close End With Me.Refresh test2.rar

تفضل جرب الآن برنامج تنظيم الصور3 .rar

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

اخي الحلبي المشكلة في الاصدار كما ذكرت .. الاداة الموجودة في الامثله كلها لا تعمل على الاصدار 7 وما قبله .. حتى لو بدلت الاداة الى 5 الأقدم فلن تعمل لان الاكواد تعمل على مكتبة لا تعمل في 7 ليس امامك الا ان ترفق مثالك يكفي من المثال ما احاط بالعنق اقصد قدر الحاجة

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

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

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

مشاركة مع اخي ابو احمد .. كنت عملت عملا مشابها ايام الشباب .. يعني يوم انا ولد .. وقد بحث عنه حتى وجدته ، وقمت بالتعديل عليه بما يتوافق وطلب اخونا عمران اولا نصيحة وتوجيه حول تصميم قواعد البيانات عامة : تكرار البيانات في اكثر من جدول غير صحي بل هو مخالف للطرق التي ينصح بها عند تصميم الجداول فمثلا يوجد في القاعدة جدولا لبيانات الطلاب كاملة : المعرف والاسم والصف والعنوان .... الخ ، وعند الاطلاع على جدول الدرجات نرى مجموعة من هذه البيانات مكررة والطريقة الصحيحة ان يكتفى في جدول الدرجات على معرف الطالب فقط ودرجات المواد فإذا اردنا عرض بعض بيانات الطالب مع درجاته فالاستعلام كفيل بعرض كل شيء كتبت هذه المقدمة للفائدة وللتنبيه اني تصرفت في جدول الدرجات كما ينبغي ان يكون . الكود يرتب البيانات داخل جدول جديد مؤقت حسب الطلب آمل ان يحظى باستحسانكم ملحوظة : اخي عمران اذا لم يرق لك تعديلي على الجدول فيمكن للكود العمل على الجدول الأصلي ... فقط نعدل على ارقام داخل الكود Dim Rs, Rst, rsq As Recordset, Dbs As Database Dim r, x, i, q, j, j2 As Integer Set Dbs = CurrentDb Set Rs = Dbs.OpenRecordset("TBL_grades") Set Rst = Dbs.OpenRecordset("tbl_temp") Set rsq = Dbs.OpenRecordset("SELECT DISTINCT TBL_grades.IDStudent FROM TBL_grades") DoCmd.SetWarnings False DoCmd.RunSQL ("DELETE tbl_temp.* FROM tbl_temp") DoCmd.SetWarnings True Rs.MoveFirst rsq.MoveFirst r = Rs.RecordCount q = rsq.RecordCount For i = 0 To q Rst.AddNew Rst.Fields(1) = rsq.Fields(0) x = 2 For j = 1 To 8 j2 = 2 For j2 = 2 To 5 Rst.Fields(x) = Rs.Fields(j2) x = x + 1 Next j2 Rs.MoveNext Next j Rst.Update rsq.MoveNext Next i MsgBox "تم اعداد الجدول" تحويل اعمدة الى صف.rar

جرب العمل على استعلام تجميع بدلا من الجدول .. ضع فيه التواريخ والرقم فقط .. سينتج اربعة او خمس سجلات محكمة سوف يتضح لك ما ذكرته في فكرة تنفيذ الكود اعلاه

الأيام متعددة يعني لا يصلح احدد عدد فقط يجب تحديد تاريخ اليوم أو من تاريخ الى تاريخ

ما شاء الله تعددت الحلول الاستاذ ابو بسملة فكرة حلوة الأستاذ سامي : جرب تحذف تاريخ من التواريخ الموجودة ثم شغل الفورم انا عدلت على الحقل في الاستعلام فقط fmmm4.rar

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

عليكم السلام المرفق غير مكتمل ، يبدو انك عملته على السريع

اخونا الحبيب وأستاذنا القدير ابو عبدالله ؛ في الفقرة 1 لعلك تراجع الحسبة ، لاني حسبتها باصابعي والنتيجة 19 شهر المهم في الامر ان الاستعلام رفيقي مثل ما الاستاذ جعفر رفيق التقارير حاولت ان احل المسألة باستعلام واحد ونجحت في ذلك اتمنى ان يحقق مطلبك QuestionHalwane.rar

احسنت طال عمرك ، والف شكر

هذه هي جميع قيم Chr Character 0 (Chr(0): Character 1 (Chr(1): � Character 2 (Chr(2): � Character 3 (Chr(3): � Character 4 (Chr(4): � Character 5 (Chr(5): � Character 6 (Chr(6): � Character 7 (Chr(7): � Character 8 (Chr(8): [Backspace] Character 9 (Chr(9): [Tab] (vbTab) Character 10 (Chr(10): [Line Feed Return] (vbLf) Character 11 (Chr(11): [Shift+Enter] (vbVerticalTab) Character 12 (Chr(12): [Page Break] (vbFormFeed) Character 13 (Chr(13): [Carriage Return] (vbCr) Character 14 (Chr(14): [Column Break] Character 15 (Chr(15): [Shift In] Character 16 (Chr(16): � Character 17 (Chr(17): � Character 18 (Chr(18): � Character 19 (Chr(19): � Character 20 (Chr(20): � Character 21 (Chr(21): � Character 22 (Chr(22): � Character 23 (Chr(23): � Character 24 (Chr(24): � Character 25 (Chr(25): � Character 26 (Chr(26): � Character 27 (Chr(27): � Character 28 (Chr(28): � Character 29 (Chr(29): � Character 30 (Chr(30): � Character 31 (Chr(31): � Character 32 (Chr(32): (space) Character 33 (Chr(33): ! Character 34 (Chr(34): " Character 35 (Chr(35): # Character 36 (Chr(36): $ Character 37 (Chr(37): % Character 38 (Chr(38): & Character 39 (Chr(39): ' Character 40 (Chr(40): ( Character 41 (Chr(41): ) Character 42 (Chr(42): * Character 43 (Chr(43): + Character 44 (Chr(44): , Character 45 (Chr(45): - Character 46 (Chr(46): . Character 47 (Chr(47): / Character 48 (Chr(48): 0 Character 49 (Chr(49): 1 Character 50 (Chr(50): 2 Character 51 (Chr(51): 3 Character 52 (Chr(52): 4 Character 53 (Chr(53): 5 Character 54 (Chr(54): 6 Character 55 (Chr(55): 7 Character 56 (Chr(56): 8 Character 57 (Chr(57): 9 Character 58 (Chr(58): : Character 59 (Chr(59): ; Character 60 (Chr(60): < Character 61 (Chr(61): = Character 62 (Chr(62): > Character 63 (Chr(63): ? Character 64 (Chr(64): @ Character 65 (Chr(65): A Character 66 (Chr(66): B Character 67 (Chr(67): C Character 68 (Chr(68): D Character 69 (Chr(69): E Character 70 (Chr(70): F Character 71 (Chr(71): G Character 72 (Chr(72): H Character 73 (Chr(73): I Character 74 (Chr(74): J Character 75 (Chr(75): K Character 76 (Chr(76): L Character 77 (Chr(77): M Character 78 (Chr(78): N Character 79 (Chr(79): O Character 80 (Chr(80): P Character 81 (Chr(81): Q Character 82 (Chr(82): R Character 83 (Chr(83): S Character 84 (Chr(84): T Character 85 (Chr(85): U Character 86 (Chr(86): V Character 87 (Chr(87): W Character 88 (Chr(88): X Character 89 (Chr(89): Y Character 90 (Chr(90): Z Character 91 (Chr(91): [ Character 92 (Chr(92): \ Character 93 (Chr(93): ] Character 94 (Chr(94): ^ Character 95 (Chr(95): _ Character 96 (Chr(96): ` Character 97 (Chr(97): a Character 98 (Chr(98): b Character 99 (Chr(99): c Character 100 (Chr(100): d Character 101 (Chr(101): e Character 102 (Chr(102): f Character 103 (Chr(103): g Character 104 (Chr(104): h Character 105 (Chr(105): i Character 106 (Chr(106): j Character 107 (Chr(107): k Character 108 (Chr(108): l Character 109 (Chr(109): m Character 110 (Chr(110): n Character 111 (Chr(111): o Character 112 (Chr(112): p Character 113 (Chr(113): q Character 114 (Chr(114): r Character 115 (Chr(115): s Character 116 (Chr(116): t Character 117 (Chr(117): u Character 118 (Chr(118): v Character 119 (Chr(119): w Character 120 (Chr(120): x Character 121 (Chr(121): y Character 122 (Chr(122): z Character 123 (Chr(123): { Character 124 (Chr(124): | Character 125 (Chr(125): } Character 126 (Chr(126): ~ Character 127 (Chr(127): Character 128 (Chr(128): € Character 129 (Chr(129): Character 130 (Chr(130): ‚ Character 131 (Chr(131): ƒ Character 132 (Chr(132): „ Character 133 (Chr(133): … Character 134 (Chr(134): † Character 135 (Chr(135): ‡ Character 136 (Chr(136): ˆ Character 137 (Chr(137): ‰ Character 138 (Chr(138): Š Character 139 (Chr(139): ‹ Character 140 (Chr(140): Œ Character 141 (Chr(141): Character 142 (Chr(142): Ž Character 143 (Chr(143): Character 144 (Chr(144): Character 145 (Chr(145): ‘ Character 146 (Chr(146): ’ Character 147 (Chr(147): “ Character 148 (Chr(148): ” Character 149 (Chr(149): • Character 150 (Chr(150): – Character 151 (Chr(151): — Character 152 (Chr(152): ˜ Character 153 (Chr(153): ™ Character 154 (Chr(154): š Character 155 (Chr(155): › Character 156 (Chr(156): œ Character 157 (Chr(157): Character 158 (Chr(158): ž Character 159 (Chr(159): Ÿ Character 160 (Chr(160): Character 161 (Chr(161): ¡ Character 162 (Chr(162): ¢ Character 163 (Chr(163): £ Character 164 (Chr(164): ¤ Character 165 (Chr(165): ¥ Character 166 (Chr(166): ¦ Character 167 (Chr(167): § Character 168 (Chr(168): ¨ Character 169 (Chr(169): © Character 170 (Chr(170): ª Character 171 (Chr(171): « Character 172 (Chr(172): ¬ Character 173 (Chr(173): ­ Character 174 (Chr(174): ® Character 175 (Chr(175): ¯ Character 176 (Chr(176): ° Character 177 (Chr(177): ± Character 178 (Chr(178): ² Character 179 (Chr(179): ³ Character 180 (Chr(180): ´ Character 181 (Chr(181): µ Character 182 (Chr(182): ¶ Character 183 (Chr(183): · Character 184 (Chr(184): ¸ Character 185 (Chr(185): ¹ Character 186 (Chr(186): º Character 187 (Chr(187): » Character 188 (Chr(188): ¼ Character 189 (Chr(189): ½ Character 190 (Chr(190): ¾ Character 191 (Chr(191): ¿ Character 192 (Chr(192): À Character 193 (Chr(193): Á Character 194 (Chr(194):  Character 195 (Chr(195): à Character 196 (Chr(196): Ä Character 197 (Chr(197): Å Character 198 (Chr(198): Æ Character 199 (Chr(199): Ç Character 200 (Chr(200): È Character 201 (Chr(201): É Character 202 (Chr(202): Ê Character 203 (Chr(203): Ë Character 204 (Chr(204): Ì Character 205 (Chr(205): Í Character 206 (Chr(206): Î Character 207 (Chr(207): Ï Character 208 (Chr(208): Ð Character 209 (Chr(209): Ñ Character 210 (Chr(210): Ò Character 211 (Chr(211): Ó Character 212 (Chr(212): Ô Character 213 (Chr(213): Õ Character 214 (Chr(214): Ö Character 215 (Chr(215): × Character 216 (Chr(216): Ø Character 217 (Chr(217): Ù Character 218 (Chr(218): Ú Character 219 (Chr(219): Û Character 220 (Chr(220): Ü Character 221 (Chr(221): Ý Character 222 (Chr(222): Þ Character 223 (Chr(223): ß Character 224 (Chr(224): à Character 225 (Chr(225): á Character 226 (Chr(226): â Character 227 (Chr(227): ã Character 228 (Chr(228): ä Character 229 (Chr(229): å Character 230 (Chr(230): æ Character 231 (Chr(231): ç Character 232 (Chr(232): è Character 233 (Chr(233): é Character 234 (Chr(234): ê Character 235 (Chr(235): ë Character 236 (Chr(236): ì Character 237 (Chr(237): í Character 238 (Chr(238): î Character 239 (Chr(239): ï Character 240 (Chr(240): ð Character 241 (Chr(241): ñ Character 242 (Chr(242): ò Character 243 (Chr(243): ó Character 244 (Chr(244): ô Character 245 (Chr(245): õ Character 246 (Chr(246): ö Character 247 (Chr(247): ÷ Character 248 (Chr(248): ø Character 249 (Chr(249): ù Character 250 (Chr(250): ú Character 251 (Chr(251): û Character 252 (Chr(252): ü Character 253 (Chr(253): ý Character 254 (Chr(254): þ Character 255 (Chr(255): ÿ اقصد هذا الحرف : þ في الحالات المشابهه هل يجب علي اختبار جميع هذه الرموز الغريبة حتى اقع على الرمز الموافق ؟

لم تجب على تساؤلي :