سامي الحداد

من بعد اذن الاخ محمد البرناوي تقضل اخي مع العلم انا فقط عدلت على زر عند الضغط على . importmarks.accdb

تمت التجربة في اوفيس 2019 والبرنامج يعمل بدون اي مشاكل .

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

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

وعليكم السلام محاولة مني ان شاءالله يكون المطلوب تحياتي 1311.11.DATA12.rar

السلام عليكم أخي احمد بارك الله بك وشكرا على المعلومة ولكن اعتقد الاصح ان توضع بين قوسين اليس كذلك يعني هكذا Private Sub btnName_Click() MsgBox (Me!name) End Sub Private Sub btnNFrm_Click() MsgBox (Me.name) End Sub ان شاءالله ما اكون غلطان.. بارك الله بك أخي الكريم لما تقدمة لاخوانك في هذا الصرح الكبير تقبل تحياتي

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

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

Private Sub cmdSearch_Click() Dim strSearch As String Dim rs As Object Set rs = Me.RecordsetClone If IsNull(Me![txtSearch]) Or (Me![txtSearch]) = "" Then MsgBox "رجاء ادخل اسم للبحث عنه", vbOKOnly, "خطأ في البحث" Me![txtSearch].SetFocus Exit Sub End If strSearch = Me![txtSearch] With rs ' .FindNext "[EmpName] = '" & strSearch & "'" .FindNext "[EmpName] like '*" & strSearch & "*'" If Not .EmpName Like "*" & strSearch & "*" Then ' If .EmpName <> strSearch Then MsgBox "لا يوجد سجل بهذا الإسم : " & strSearch, , "غير موجود" Me.txtSearch = "" Me![txtSearch].SetFocus ElseIf .NoMatch Then MsgBox "آخر سجل في البحث عن : " & strSearch, , "آخر سجل" Me.cmdSearch.Caption = "بحث" Me.txtSearch = "" Me![txtSearch].SetFocus Me.cmdSearch.ForeColor = RGB(0, 0, 255) DoCmd.GoToRecord , , acFirst Else Me.Bookmark = .Bookmark MsgBox "تم ايجاد اسم : " & strSearch, , "مبروك" Me.cmdSearch.Caption = "اكمال البحث" Me.cmdSearch.ForeColor = RGB(255, 0, 0) End If End With rs.Close Set rs = Nothing End Sub تفضل اخي الكريم هذا التعديل على نفس الكود. واليك الملف بعد التعديل وافينا بالنتيجة تحياتي za-EmployyeUP.accdb

وعليكم السلام تفضل أخي الكريم ... شوف التعديل هل هذا هو المطلوب. جرب ووافينا بالنتيجة . تحياتي za-EmployyeUP.accdb

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

وعليكم السلام تفضل اخي جرب ووافينا بالنتيجة Shell "C:\Program Files\WinRAR\WinRAR.exe a -hp1 D:\bb\abolllll69.rar D:\bb\aboosama.accdb",vbHide

تفضل أخي الكريم كما طلبت ولكني لم اتمكن من معرفة طريقة عملك . بالتوفيق تحياتي Dataselect.accdb

هل ممكن إرفاق القاعدة لمعرفة أين المشكلة ؟ تحياتي

تفضل اخي الكريم تحياتي Database5.accdb

وعليكم السلام محاولة إن شاءالله تفي بالمطلوب. Combo.accdb

وعليكم السلام Private Sub Form_Load() DoCmd.GoToRecord , , acLast End Sub جرب ووافينا اذا كان هذا هو المطلوب تحياتي

وعليكم السلام تفضل اخي شوف المرفق. Database2.accdb

أخي شوف الملف المرفق هل هو المطلوب؟ My Menu.accdb

أحسنت وبارك الله فيك أستاذي الحبيب ابو خليل.

جزاك الله خيرا استاذي أبو خليل ورحم الله والديك.

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

السلام عليكم اخواني. حسب خبرتي المتواضعة هذا الكود تابع لبرنامج Dbpix 20. . وهذا رابط الشركة. http://www.ammara.com أتمنى أن يكون فيه إفادة.