khaledhelmy

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

متأسف جداً فى التأخير على رد حضراتكم وذلك لظروف قهرية بسبب مرض إبنتى الأخ الكريم / عبدالرحمن هاشم شكراً جزيلاً على مجهودك معى وعلى نصيحتك الغالية والأخ الكريم / يوسف شكراً جزيلاً على كرم أخلاقك التى لا تبخل بها عن مساعدة الناس تم إدراج الكود وتم التنفيذ بنجاح وجزاكم الله كل خير

لا يوجد أحد من مجيب

إخوانى الكرام مرفق ملف كانت به مشكلة ولكن يرجع الفضل لله ثم الأخ يوسف فى معالجة المشكلة وهى بمجرد الضغط على الزرار الموجود فى الفورم يقوم بتنفيذ الأكواد وتحميل الناتج على كل السجلات التى ساعدنى فيها الأخ الكريم / يوسف ولكن أريد الأن بعد الضغط على الزرار وتحميل العمولات على كل السجلات تطلع رسالة تفيد بأنه تم تحميل عدد كام سجل وشكراً وجزاكم الله كل خير USER.rar

الأخ الكريم / يوسف معلش هزعج حضرتك معايا أريد بعد الضغط على الزرار وتحميل العمولات تطلع رسالة تقول بأنه تم تحميل كام سجل وشكراً وجزاك الله كل خير

سلمت يداك والله يعطيك من علمه كثيرا جزيل الشكر لك يا أخ / يوسف

الأخ الكريم / يوسف فكرة البرنامج أن خانة SERVISE يوجد بها 43 خدمة وخانة KIND_SERVISE بها 76 خدمة متفرعة من خدمة ال SERVISE وكل خدمة من ال76 لها عمولة مختلفة عن الأخرى . هذا النموذج المفروض ان المستخدم لا يقوم بالإدخال لكن سوف يقوم بتحميل ملف من قاعدة بيانات أخرى إلى القاعدة المرفقة على المنتدى فبعد تحميل البيانات بمجرد الضغط على الزرار تقوم خانة العمولة بحساب كل عمولة للخدمة . على العموم المشكلة التى تقابلنى الأن أن الزرار يقوم بحساب العمولة لكل سجل بمجرد الوقوف عليه والذى أريده أن بمجرد الضغط على الزرار يقوم بحساب كل السجلات مرة واحدة أرجو من حضرتك يا أخ يوسف الحل لانى حاولت كثيراً

ارجو الإفادة أفادكم الله

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

من فضلكم أرفقت ملف أكسيس به نموذج من خمس خانات توجد خانة AMOLA وعند الضغط على الزرار أريد إذا كانت خانة SERVISE = MOBINIL و خانة KIND_SERVISE= TOPUP يبقى خانة TRANSACTION_AMOUNT مضروبة * 0.26/100 والناتج يكون فى خانة AMOLA والشرط SERVISE = MOBINIL و خانة KIND_SERVISE= BILLPAYMENT يبقى خانة TRANSACTION_AMOUNT مضروبة * 0.78/100 والناتج يكون فى خانة AMOLA وفى حالة عدم تحقق الشرطين تكون خانة AMOLA = 0 ولكن أرجو من حضراتكم أن يكون الكود فى محرر أكواد الفيجوال بيسك الخاص بنموذج الأكسيس وهذا هو الكود الذى أستخدمه ولكن لا اعرف لماذا عدم التنفيذ Private Sub Command12_Click() If TEXT2.Text = "MOBINIL" And TEXT3.Text = "TOPUP" Then TEXT5.Text = TEXT4.Text * 0.026 / 100 Else If TEXT2.Text = "MOBINIL" And TEXT3.Text = "BILLPAYMENT" Then TEXT5.Text = TEXT4.Text * 0.078 / 100 Else TEXT5.Text = 0 End If End If End Sub

نرجو الرد على هذا الموضوع من كبار المعلمين بالمنتدى حيث ان هذا الموضوع هام جدا

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

تفضل أخى الكريم هذا الكود يوضع عند حدث on_click PlaySound (Application.CurrentProject.path & "\أسم الملف الصوتى.wav") قم بعمل كوبى للكود السابق ولصقه فى محرر الأكواد عندك وسوف أرفق لك 2 وحدة نمطية لتساعد على تشغيل الملف والكود السابق

شكراً جزيلاً لحضرتك وجزاك الله كل خير

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

متشكر جدا وجزاك الله كل خير راجعت المثال وإشتغل ولاحظ انك وضعت الدالة DLAST فى محرر الأكواد لكن ممكن أعرف ماهو فائدة السطر الأخير وهو Me.LAST_DEPOSIT = (FIRST_DEPOSIT + ADD_DEPOSIT) - (PULL_DEPOSIT + TOAL_BEE) وشكراً جزيلاً

على فكرة أنا وضعت فى الإستعلام هذه الدالة وما اشتغلتش Expr1: DLast("[LAST_DEPOSIT]";"BEE")

أرجو المساعدة فى هذا المثال من فضلكم

من فضلكم أرفقت نموذج به بحث برقم الموظف فإذا قمت بكتابة الرقم 666660 فى خانة البحث يقوم بإظهار عمليات الموظف حسن وقمت بعمل زرار لترحيل بعض البيانات فى السجل الجديد وقمت بكتابة الأكواد لكن ما أريد عند الضغط على زرار ترحيل يقوم بترحيل الرقم الموجود فى خانة رصيد أخر المدة إلى خانة رصيد أول المدة فى السجل التالى بمعنى أن أخر سجل للموظف حسن فى رصيد أخر المدة هو 130 . فعندما أضغط على زرار ترحيل يقوم بنقل الرقم 130 إلى خانة رصيد أول المدة فى السجل الجديد أرجو المساعدة ضرورى جدا وشكراً جزيلاَ GO_CALL.rar

شكراً جزيلاً وجزاك الله كل خير المثال اشتغل ميه ميه

المرفق المرسل ملف أكسيل انا طبقت المثال بتاعى كويس مثل مثال الأخت الكريمة زهرة ولكن أريد الإفادة بأين الخطأ

ممكن المساعدة لو سمحتم

لقد قمت بعمل المثال على أكمل وجه مثلما هو فى مثال الأخت زهرة ولكن لا يعمل فهل من الممكن أعرف أين الخطأ مرفق الملف وأرجو المساعدة db1.rar

شكراً جزيلاً على المرفق وجزاك الله كل خير سأحاول فى عمله مثل المثال المرفق وسوف أبلغك بالنتيجة شكراً جزيلاً

أرجو المساعدة من فضلكم