koao

السلام عليكم ورحمة الله وبركاته هذان رابطان .. لعل بهما ما يلبي طلبكم /index.php?showtopic=143691 /index.php?showtopic=181491

السلام عليكم ورحمة الله وبركاته اللهم أنصر إخواننا في فلسطين وثبت أقدامهم أخي الكريم .. بحكم أنك لم تضع المثال فيصعب علينا معرفة المشكلة .. وأيضا مساعدتك في الشق الثاني بخصوص الترقيم وبنظرة سريعة قد تكون السبب لمشكلتك .. ألاحظ أنك وضعت الكود التالي كمصدر للبيا…

السلام عليكم ورحمة الله وبركاته أخي الكريم الكود الذي أنت واضعه في حدث مابعد التحديث لـ Text8 إستبدله بالتالي Private Sub Text8_AfterUpdate() Text8 = DLookup("item", "StoreData", "Item = '" & Text8 & "'") Combo6 = DLookup("snum", "StoreData", "Item = '" & Text…

السلام عليكم ورحمة الله وبركاته أخي الكريم .. لا تستخدم هذا الكود On Error Resume Next لأنه في حال وجود خطأ فلن تعلم بوجوده .. لأنك به تخبر مترجم اللغة أنه في حال وجود خطأ تجاوزه نأتي الآن لحل مشكلتك .. في حدث النقر لزر CmdSave وضعت كود للتعديل أو الحفظ .. وأس…

بســم الله الـرحمــن الرحيــم السلام عليكــم ورحمـة الله وبركاتــه أتمنى أني فهمت طلبك بالشكل الصحيح ... والمثال بعد التعديل في المرفق koao_Tajreby.zip

السلام عليكم ورحمة الله وبركاته أخي مشارف .. دعواتك المباركة كان لها الأثر الكبير في نفسي .. وشملك ومن يقرأ بها .. اللهم آمين بالنسبة لتعلم البرمجة والأكواد .. فإن وقتك يسمح بأخذ دورة في أحد المعاهد المعتبرة .. فيكون أفضل .. والأولين يقولون .. من كان شيخه كتاب…

بســم الله الـرحمــن الرحيــم السلام عليكــم ورحمـة الله وبركاتــه أخي في الصورة المرفقة .. تابع الشرح بالأرقام 1- حدد النموذج المراد تغيير خاصيته .. بالنقر عليه 2-أنقر على تصميم 3- أنقر على أيقونة الخصائص الموضحة 4-أنقر على تبويب بيانات 5- غير خاصية السماح با…

السلام عليكم ورحمة الله وبركاته أخي الكريم .. لمنع المستخدم من التعديل .. على السجلات المدخلة .. مع السماح له بالإضافة فما عليك سوى تغيير خاصية AllowEdits أو السماح بالإضافة الخاصة بالنموذج .. لـ .. لا

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

السلام عليكم ورحمة الله وبركاته أخي الكريم غير الكود في رأس التقرير إلى التالي If Not IsNull(Me.PlayerPic) Then Me![APic].Visible = True Me![APic].Picture = CurrentProject.Path & "\images\Players\" & Me![PlayerPic] End If

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

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

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

بســم الله الـرحمــن الرحيــم السلام عليكــم ورحمـة الله وبركاتــه أخي ناصر يبدو أنني احب أفكر أكثر من اللازم لحل المشاكل .. وفكرتك منطقية .. ولكن لم أرى ردك إلا بعد ما عملت المثال التالي .. فتحمل تدخلي لعل المثال يفيد koao_db1.zip

الله يعافيك أخي ناصر .. شرفتنا بمرورك الكريم

بســم الله الـرحمــن الرحيــم السلام عليكــم ورحمـة الله وبركاتــه في أحد مشاركات أستاذتي وأختي الكريمة زهرة حفظها الله .. تطرقت لقراءة البيانات من ملف إكسيل وتخزينه في قاعدة البيانات .. وكعادتي ولأستفيد من الدرر الثمينه في أكوادها .. قرأت الأكواد بعنايه وكل أ…

بســم الله الـرحمــن الرحيــم السلام عليكــم ورحمـة الله وبركاتــه ضع في خاصية مصدر عنصر التحكم للحقل B الكود التالي =Forms!TTT!A

بســم الله الـرحمــن الرحيــم السلام عليكــم ورحمـة الله وبركاتــه تم التعديل على المثال koao_db1.zip

بســم الله الـرحمــن الرحيــم السلام عليكــم ورحمـة الله وبركاتــه أخي الكريم لعل يكون في هذا المثال ما يلبي طلبك koao_Random.zip

بســم الله الـرحمــن الرحيــم السلام عليكــم ورحمـة الله وبركاتــه أتمنى ان التعديل على مثالك .. أظهر الفكرة لما يلبي طلبك أختي الكريمة koao_db2.zip