• الإعلانات

    • فيصل الحربي

      تسجيل عضوية جديدة في المنتدى   01/31/2016

      السلام عليكم ورحمة الله وبركاته  عزيزي العضو الجديد :  حاليا رسالة الإيميل لتأكيد صحة إيميلكم تذهب للبريد العشوائي ( جاري حل المشكلة )  فإذا لم تجد رسالة التحقق من إيميلكم في صندوق الوارد لديكم إتجه للبريد العشوائي ( JUNK)  وقم بتفعيل إشتراككم من هناك   

أشرف خليل

المشرفين القدامى
  • عدد المشاركات

    1,436
  • تاريخ الانضمام

  • تاريخ اخر زياره

السمعه بالموقع

3 عادي

عن أشرف خليل

  • الرتبة
    مشرف سابق

طرق الإتصال

  • ICQ 0

معلومات الملف الشخصي

  • اهتمامات الحاسب

أحدث الزائرين لملفلك الشخصي

4,060 زياره للملف الشخصي
  1. الأخ العزيز hofn : تكلفة المبيعات يمكن احتسابها كالتالى : تحتاج بعض التفسير من كلامك شوية وخللك معي . 1- متوسط تكلفة الوحدة كما ذكرت يمكن احتسابه بالطريقة المذكورة أعلى بعد كل عملية شراء وبالتالى يكون المتوسط لدينا موجود ومتجدد دائما . 2- الوحدات المباعة أين تكون . ستكون موجودة فى جدول المبيعات الفرعي 2 تقريبا . 3- بالتالي سيتم عمل استعلام متكون من جدول الأصناف الرئسيسي ( ج صنف أ ) مع جدول المبيعات الفرعي 2 . وإن لم تظهر بينهما العلاقة مباشرة فضع معهما جدول المبيعات الرئيسي وذلك كي تظهر العلاقات بين الجداول الثلاثة . 4- ستقوم بحساب الحقول المطلوبة لديك ( رقم الصنف - الوحدات المباعة - سعر الصنف ) ولكي لا تكون الحقول بشكل فردى لكل عملية يمكنك عمل استعلام تجميعي يقوم بجمع الكميات لكل صنف . وهكذا بالنسبة بقيمة المخزون . يمكنك أن تلعب بالاستعلامات بشكل كبير للحصول على النتائج المطلوبة . لعل الفكرة تكون وصلت إليك .
  2. لإظهار الجداول فى قاعدة البيانات انشء نموذج وضع عليه زر وبه هذا الكود " Dim obj As AccessObject, dbs As Object Set dbs = Application.CurrentData For Each obj In dbs.AllTables If Left(obj.Name, 4) <> "MSys" Then SetHiddenAttribute acTable, obj.Name, False Next obj
  3. الأخ hofn بالنسبة لتطبيق المعادلة فإنه لدينا كميتان وليست كمية واحد كما ذكرت وهي كما يلى : 1- الكمية الأولى مع سعرها موجودة أصلا فى جدول ( ج صنف أ ) وهي بالحقول التالية الرصيد - سعر التكلفة . ( وهذه الكمية تعتبر الرصيد الفعلى المتوفر حاليا مع متوسط التكلفة الحالى ) 2- الكمية الثانية وسعرها أيضا موجودين فى جدول ( جدول مشتروات فرعي 2) فى هذا الجدول يتم الاحتفاظ بكل كمية شراء جديدة لكل الأصناف . وبالتالى أصبح لدينا كميتان وسعرين . 3- المطلوب تطبيق المعادلة فى استعلام التحديث الذي ذكرته بالمشاركة السابقة وهو ( الشراء الجديد ) . جرب أن تستبدل هذا الكود بدلا من الكود الموجود الحالى فى استعلام التحديث فى حقل الرصيد ([ج صنف أ]![الرصيد]*[ج صنف أ]![سعر التكلفة]+[جدول مشتروات فرعي 2]![الكمية المشتراه]*[جدول مشتروات فرعي 2]![سعر الشراء])/([جدول مشتروات فرعي 2]![الكمية المشتراه]+[ج صنف أ]![الرصيد]) ولتطبيق ذلك جيدا ادخل صنف جديد من البداية واكتب له كمية وسعر وفىبند المشتريات قم بإضافة كمية مشتراه جديدة لهذا الصنف مع سعر جديد وبعد ادخال المشتريات ارجع لكارت الصنف وشوف السعر الجديد هل تغير أم لا . وتحياتي لكم بالتوفيق . أشرف خليل
  4. دخلت بالصدفة على المنتدى شوقا حيث ادخل كل سنة مرات قليلة جدا ووجدت الموضوع وحملت الملف وطلع البرنامج كنت عملته من زمااااان جدا على أكسيس 2 . المهم حذنت بعض الشيء لظرف خاص فى نفسي مرتبط بالبرنامج . وسعدت بأن هناك من يستفيد من أعمالى المتواضعة . وأحب أن ادلو برأي إن تفضلتم بالنسيبة لمتوسط التكلفة وطبعا كما ذكر الأخ من البداية أن المتوسط المرجح المتحرك هو الأفضل . وهذا يتم بعد كل عملية شراء جديدة . وبناء على ذلك تكون المعادلة كما يلى ( الكمية الحالية × سعرها + الكمية الجديدة × السعر الجديد ) / مجموع الكميتين . فقط إذا كنتم تريدون عمل ذلك فى البرنامج فيتم التعديل فى استعلام الشراء الجديد بالبرنامج وارفق معادلة فى برنامج آخر تم عمله وهي تقوم بعمل متوسط التكلفة المرجح بعد كل عملية شراء جديدة . يمكنكم الاقتباس منها . ([tblitems]![blance]*[tblitems]![per_prise]+[tblward1]![qty]*[tblward1]![price])/([tblitems]![blance]+[tblward1]![qty]) ولكم تحياتي . أشرف خليل ( موجود الاسم فى عرض كشف حساب عميل )
  5. كيف استخرج جداول البيانات

    أعتذر عن التأخر فى الرد جدا ولظروف خاصه . نعم أريد أن أسحب البناء الهيكلي مع البيانات للبرنامج . وشكرا .
  6. اختار اسم المستخدم ( حسن طواهر وكلمة المرور 1 ) أشرف خليل
  7. لدينا برنامج تم تركيبه على سيرفر ويعمل على الأوراكل . السؤال هنا : هل لو تم أخذ نسخه احتياطية للبرنامج من على أي محطة طرفية غير السيرفر هل سيتم نقل البيانات معاها ( حيث البيانات لمدة 3 أعوام ) . أم هناك طريقة أخرى لسحب البيانات من السيرفر . برجاء الإفادة . أشرف خليل
  8. مشرفتنا زهرة المنتدى . شكرا لمرورك الكريم وبارك الله فيكِ . أخي الفيلسوف 111 ( طارق ) شكرا على كلماتك الرائعة وسدد الله خطاك . أشرف خليل
  9. مثال كامل ويمكنكم التعديل عليه . لا أطلب إلا الدعاء . أشرف خليل z2k.rar
  10. هل تصير في الاكسس

    السلام عليكم مثال كنت عملته سنة 2001 بالمساعدة مع أبو هادي القدير . اختار اسم العميل واكتب التاريخ من 1-1-2001 كان على أكسيس 97 وقتها . يمكنك تحويله . أشرف خليل blns97.rar
  11. موضوع طبعا الكل يحتاجه ويبحث عن طرق الحماية بأكثر من شكل . نشكر الأخ أمجد على ذلك ونتمنى المواصلة حتى النهاية .
  12. الحماية هي صلاحيات المستخدمين الخاصة بالأكسيس .
  13. أولا : شكرا على الشرح والمثال وبارك الله فيك . ثايناً الكلام هذا موجه لمن قام بالمشاهدة أو حمل المثال . 24 مشاهده للموضوع و11 مرة تحميل للمثال . ومافيش ولا كلمة شكر . يا إخوان التشجيع مطلوب كي يستمر الأعضاء فى العطاء .
  14. يا شباب يا معلمين ساعدوني

    الأخ صادوق : اولا اختار عنوان مناسب لمواضيعك . ثانيا الحدث يكون قبل التحديث وليس بعد التحديث . ثالثا : الكود المطلوب هو :   If (Eval("DLookUp(""[name] "",""[tbl_data]"",""[name]=form![name]"") Is Not Null")) Then MsgBox "This Name Is Enterd B4....!!!!", vbCritical, "Wrong"          DoCmd.CancelEvent        SendKeys "{f2}", False  End If مع تغيير الحقل name إلى الحقل الي تريد منع التكرار فيه وتغير اسم الجدول tbl_data إلى اسم الجدول لديك .
  15. سؤال اخر

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