• الإعلانات

    • فيصل الحربي

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

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

abs_2000

اعضاء جدد
  • عدد المشاركات

    42
  • تاريخ الانضمام

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

كل شيء نشر بواسطة abs_2000

  1. أولا يجب التسجيل في الموقع www.mobily.ws وبعد التسجيل بنجاح سيعطيك 3 رسائل مجانية انتقل إلى الملف المرفق MSINET.OCX وضعه في المسار C:\WINDOWS\system32 ثم أذهب إلى ابدأ تشغيل ثم اكتب الأمر التالي regsvr32 MSINET.OCX سيظهر لك رسالة تفيد نجاح التسجيل انتقل إلى صفحة الكود في الفورم وضع رقم جوالك الذي سجلت به بالصيغة الدولية ، فإذا كان بالسعودية فليكن مبتدأ بـ 96659999 كذلك يجب أن تكون بين علامتي التنصيص هذه "" كما في الصورة وكذلك الرقم السري انتقل إلى الفورم وضع رقم المرسل ولكن هذه المرة بدون 966 ليكن مثلا 059999 كما في الصورة ثم قم بعمل الإرسال تم التجربة والحمد لله وصلت بأمان طبعا هذا البرنامج من تصميم موبايلي http://www.mobily.ws/Solutions/Developers/MS_Access.html الحقيقة البرنامج يحتاج تطوير بحيث يقرأ الأرقام من الجدول كذلك يجب أن يكون الباسورد واليوزر في جدول فقد يحتاج المستخدم إلى تغيير أحدهما أتمنى كل واحد يحاول يطوره ويضعه هنا حتى يظهر البرنامج بالشكل المطلوب وشكرا لكم مقدما sms إرسال.rar
  2. بسم الله الرحمن الرحيم الكل يعلم مدى اهمية صلاحيات المستخدمين ومن ضمن من قاموا بعمل مثل هذه البرامج المبرمج العبقري مهند عبادي واسم البرنامج Users Maker 2 بعد ذلك قام بتطويره Users Maker 3 ولكن لم نشاهده فلا أعلم هل قام ببيعه أم لم يرى النور تجدر الإشارة إلى أنه مختفي عن الأنظار منذ فترة طويلة ! نسأل الله له حسن الثواب على ما قدمه من خدمات عظيمة رابط البرنامج http://www.arabmoheet.net/aspnetforum/amf/e15ce911-dd27-47db-b6be-15d7782babd3.aspx بعد ذلك قام الأخ مشارف بعمل بعض التعديلات عليه مشكوراً على هذا الرابط http://www.arabteam2000-forum.com/index.php?showtopic=187660 بعد ذلك قمت بتعديلات بسيطة عليه من ضمنها إمكانية اليوزر العادي تغيير كلمة المرور الخاصة به دون الدخول على شاشة الصلاحيات وبعض التعديلات البسيطة الأخرى نريد الآن تطويره للأفضل ونحقق الأكواد هل يوجد بها مشاكل ليستفيد الاعضاء منها ولا ننسى شكر صاحب الموضوع جزاه الله خيرا أتمنى أن يوضع الكود الخاص بالصلاحيات في وحدة نمطية بحيث يتم استدعاءه بسطر واحد فقط بدل أن نكرر الكود في كل صفحة نريد عمل صلاحيات عليه الملف مرفق بآخر التعديلات نتمنى وضع التعديلات عليه وتصحيح الأخطاء إن وجدت صلاحية.rar والسلام عليكم ورحمة الله وبركاته أخوكم محمد
  3. هذا ملف عملت عليه تعديل ولكن لم يعمل بما أريد فكل ما أريد أن يقرأ الأرقام من جدول معين ليرسلها للجميع حتى يعمل البرنامج : يجب تعديل جميع الأرقام لمن أراد التجربة لأنها أرقام وهمية كلها mobily access.rar
  4. حياك أخي الكريم 'همام ابوعرقوب' الحين سجلت في الموقع والشغل تمام ! هل قمت بإدخال رقم الجوال والرقم السري واعدت كتابة الارقام الموجودة في شاشة التسجيل بعد ذلك سيتم الدخول على شاشة ثانية تضع فيها رقم الجوال الرقم السري ثم يأتيك التفعيل على الجوال وتدخله وبعدها يفتح معاك الموقع عموما أنا سويت لك تسجيل وسأرسله لك على الخاص حتى تتمكن من التجربة
  5. أهلا وسهلا بك أخي الكريم 'اكسيرالحياة' لا اظن البرنامج سيمر من دون أن يكون لك لمسة من لمساتك العبقرية :)
  6. هل يمكن التعديل عليه يا أخوان للأفضل !! أعتقد هذا البرنامج يهم شريحة كبيرة من المبرمجين ولا غنا عنه
  7. حياك ربي وشاكر مرورك نتمنى من الاخوان تطويره بحيث يقرأ الأرقام من جدول معين وإعطا حرية الاختيار في الأرقام المرسلة
  8. الحين يوجد في البرنامج مستخدمين باسم 1- س والرقم السري = س 2- محمد والرقم السري = 1 ادخل مثلا اسم المستخدم = محمد الرقم السري = 1 ثم اضفط على زر (الرقم السري) كما في الصورة بعدها يفتح شاشة تضع فيها الرقم السري الجديد وتكرر في المربع الثاني وبكذا خلاص أتمنى اكون شرحت بوضوح ......
  9. ممكن توضح أكثر ؟ هل قمت بإنزال الملف والتجربة عليه ؟
  10. رسائل جوال SMS باستخدام MS Access هل ممكن شرح هذه الطريقة ؟ http://www.mobily.ws/Solutions/Developers/MS_Access.html
  11. . . . . هذا الكود يجب وضعه في كل فورم تريد وضع صلاحيات عليه Dim SF As Control With MyUser If .GetAbility(Me.Name, OpenForm) Then Me.AllowAdditions = .GetAbility(Me.Name, Add) Me.AllowEdits = .GetAbility(Me.Name, Edit) Me.AllowDeletions = .GetAbility(Me.Name, Del) For Each SF In Me.Controls If SF.ControlType = acSubform Then SF.Form.AllowAdditions = Me.AllowAdditions SF.Form.AllowEdits = Me.AllowEdits SF.Form.AllowDeletions = Me.AllowDeletions End If Next Else MsgBox "عفواً " & .UserName & " " & vbCr & vbCr & "ليس لديك الصلاحية لفتح هذا النموذج", 0 + 16 + 1572864, "نظام الصلاحيات" Cancel = True End If End With أتمنى ممن يستطيع وضع هذا الكود في وحدة نمطية واستدعائه بالطريقة المعروفة مثلاً Call AAZZ الحقيقة حاولت وعدلت في الأكواد ولم تفلح معي بنتيجة صحيحة انتظركم
  12. شكرا لك وللجميع ونتمنى أن تتظافر الجهود من الجميع في تطويره
  13. إذا كنت تقصد المستخدم العادي يغير في الباسورد ليوزره فقد أضفتها وهي في البرنامج في شاشة الدخول انظر الصورة
  14. قمت بعمل ملف صغير حتى يتسنى المساعدة بكل سهولة لدي مشكلة عويصة أتمنى الجميع يشارك حتى يستفيد ويفيد إن استطاع لان لدي حلول لها ولكنها ليست حلول جذرية أو ربما هي حلول شبه منطقية فلا أريد الاعتماد عليها إلا إذا تعذر الوصول للحل المناسب كما تشاهدون بالصور قمنا بالشراء التالي 5 جوالات بـــ 150 = 750 ريال 5 جوالات بـــ 190 = 950 ريال ليصبح متوسط التكلفة 170 ريال للحبة ------------------- ------------------- قمنا بالبيع التالي 1 جوال من 200 ليصبح الربح 30 ريال 1 جوال من 190 ليصبح الربح 20 ريال 3 جوال من 195 ليصبح الربح 75 ريال .... (بواقع 25 ريال لكل جوال ) اللي ابغاه تقرير يطلع الأرباح حسب التاريخ اللي أحدده مثلاً أبغا أرباح من 1-1-2010 إلى 3-1-2010 السؤال الأهــــم سيكون بعد عمل التقرير لأنه السؤال سينبثق من التقرير ومبدئياً قم بالإدخال الإضافي التالي وقارن النتائج في التقرير (قبل الإضافة وبعد الإضافة) 3 جوالات بـــ 220 = 660 ريال 4 جوالات بـــ 240 = 960 ريال سأوضح سؤالي بعد عمل التقرير :wacko:
  15. moh samer ali أخي الكريم سأعود للتعليق والتوضيح ولكني الآن مشغووووول جداً عموما أشكرك من كل قلبي ولي عودة
  16. حيــــــــاك الله أخي أبو عدنان شكرا على الإضافة الجميلة ولكن الأهم الذي طرحت مشاركتي فيها بدأت تظهر كنت اتمنى أن تعمل التقرير حتى تكون الامور واضحة اكثر عموما لكي تظهر لك المشكلة التي اعاني منها قم بشراء 20 جوال بسعر 199 ريال ثم أذهب للبيع وقم ببيع 20 جوال بسعر 200 ريال ثم قارن الربح في الشاشة بالربح الحقيقي والذي هو ( مجموع المبيعات - مجموع المشتريات) !! تلاحظ أن متوسط سعر التكلفة تغير إلى 183.40 وهذا يجب ان يكون في المبيعات السابقة واللاحقة (يطبق على الجميع) فأول بيعة سعر تكلفتها 152.20 فلكي تعطي نتائج صحيح يجب أن تكون183.40 ولا زال هناك مشاكل أخرى ولكن بعد حل هذه المعضلة :lol:
  17. تنبيه : كانت عملية البيع على صنف واحد حتى نستطيع معرفة المشكلة أريد التوضيح على هذه الطريقة هل هي صحيح أم لا باختصـــــار تكلفة الشراء الإجمالية لــ (جوال N70 مستعمل) = 1522 تكلفة البيـــع الإجمالية لــ (جوال N70 مستعمل) = 1945 إذا الربح الإجمالي = 1945 - 1522 = 423 هل لديكم ملاحظات أو ننتقل إلى الخطوة الثانية والأهم وهي حساب الربح اليومي فقط أتمنى تجربة المرفق وموافاتنا بالأخطاء R.rar
  18. يا أخوان شاركوا بما تستطيعون ...
  19. تأكد من صحة الكود يا أخ sahob :cool: المتوسط يحسب ب (مجموع المشتريات / مجموع الكميات) كما في المربع الأصفر وهذه الطريقة لا تجدي نفعاً في موضوعي لأنها ستعطي نتائج خاطئة نريد طريقة أخرى أتمنى من العباقرة الدخول والمشاركة !!
  20. هل أحد نزل المرفق وشاف المشكلة العويصة :wink:
  21. هذا الملف أتمنى إنشاء تقرير يحسب الأرباح بين تاريخين أنا أحددها ثم نكمل الاستفسار شكرا للجميع مقدماً الربح.rar
  22. آسف نسيت أرفق الملف والحين خرجت من الدوام وما في دوام إلا السبت :lol: لحظة أعمل مرفق جديد أخي الكريم التكلفة تحسب أوتوماتيكياً فهو يقسم المجموع على الكمية في مثالاً السابق 1700 / 10 = 170 فلو أدخلنا على كلامك 2 جوالات بـــ 100 تصبح التكلفة تلقائياً 1900 / 12 = 158.33 وهكذا ليست المشكلة هنا , المكشلة كيفية حساب الربح سأرفق الملف بعد قليل وانتظر مشاركتك
  23. مشكلتك بسيطة إن شاء الله ارفق ملف حتى يتم التعديل عليه إن استطعنا حاول تجرب وتشيل AM adn PM وبدال ال 4 مساء .... 16 إن شاء الله تضبط وإذا ماضبطت ارفق ملف للتعديل عليه ...