طلب كلمة مرور متغيره بتغير الوقت والتاريخ

[KHMB]

السلام عليم ورحمة الله وبركاتة

 

بدون مقدمات هذا طلبي من يستطيع عمله او المحاوله فليتفضل يدلوا بدلوه مشكور وجزاه الله خير

ليس لكل طلب ارفاق مثال

[ياسر خليل أبو البراء]

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

[KHMB]

السلام عليكم ورحمة الله

 

الصقر لوًح له و ........... بوًح له  مثل عربي قديم

 

 

الموضوع لايحتاج لمثال لكي توصل للفكره اللي اريدها.باين انك مافهمت الفكرة .إذا فهمت الفكرة المثال بسيط جدا ولاتحتاج لمثال. المثال اللي سوف ارسله لك عباره عن مصنف جديد مضاف علية فورم واحد وفي الشيت زر اذا ضغطت علية يظهر الفورم وطلبي إذا ضغطت علي الزر يطالبني بكلمة مرور إذا كلمة المرور صحيحة يظهر لي الفورم وبس ياطويل العمر.او انك تريدني ان اكمل واضع الكود وبهذا يصير مثال. انا آسف جدا

تم تعديل يناير 2, 2015 بواسطه KHMB

[ياسر خليل أبو البراء]

أخي الحبيب

طلبك لم توضح فيه ما وضحته بالمشاركة رقم 3 .. المشاركة رقم 3 فيها تفصيل واضح ، وبالتالي لا تحتاج إلى مرفق,..

أما المشاركة الأولى فلم تكن واضحة البته ..

ويا أستاذي بالراحة علينا (فهمي على أدي )

تفضل جرب المرفق التالي :fff:

 

Test.rar

[KHMB]

السلام عليكم ورحمة الله

اخي ياسر

أولا :  انت معطي إنطباع بالمنتدى من خلال ردودك والذي يوحي بأنك من كبار الخبراء

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

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

اخي ياسر لازلت مشكور وجزاك الله خير لكــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــن ليس هذا المطلوب فالمطلوب بالعنوان.

[أبوعيد]

تفضل

Test#1.rar

[ياسر خليل أبو البراء]

الموضوع لايحتاج لمثال لكي توصل للفكره اللي اريدها.باين انك مافهمت الفكرة .إذا فهمت الفكرة المثال بسيط جدا ولاتحتاج لمثال. المثال اللي سوف ارسله لك عباره عن مصنف جديد مضاف علية فورم واحد وفي الشيت زر اذا ضغطت علية يظهر الفورم وطلبي إذا ضغطت علي الزر يطالبني بكلمة مرور إذا كلمة المرور صحيحة يظهر لي الفورم وبس ياطويل العمر.او انك تريدني ان اكمل واضع الكود وبهذا يصير مثال. انا آسف جدا

 

لا تعليق ...

والعنوان أيضاً غير واضح ..يعني ايه كلمة مرور متغيرة بمرور الوقت والتاريخ ؟؟

هل تقصد أن كلمة المرور مرتبطة بالتاريخ والوقت ، ولكل وقت أو تاريخ كلمة المرور الخاصة به؟

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

تقبل تحياتي (وبعدين سألتك في مشاركة عن اسم حضرتك ولم تجبني ..أشكرك على أية حال)

[ياسر خليل أبو البراء]

الأخ الحبيب أبو عيد بارك الله فيك

أعتذر لم أكن قد اطلعت على ملفك ، ولكن بعد الإطلاع وجدته في قمة الروعة

جزاكم الله خيراً على كا ما تقدمه

[KHMB]

السلام عليكم ورحمة الله

شكرا جزيلا وجزاك الله خير

هذه احدي الطرق الجميله جدا

هذه الطريقة العشوائية (Rand) او (Random) بين رقم ورقم في استخراج الرقم العشوائي من الخلية [xfd1] وجعل النتيجة في الخلية [xfd2] واما الخلية  [xfd3] هي ناتج المعادلة {    Left(xfd2;3) + Right(xfd2;2) =   } ووضعت في عنوان مربع الحوار والرقم اللي يظهر في عنوان مربع الحوار خذ منة اول 3 ارقام من اليسار واجمع عليه اول رقمين من يمين الرقم وسيتطابق مع الخلية  [xfd3] .هذا هو مسار الكود .

تقريبا نفس النهج حسب مايخطر ببالي ولكنها عن طريق الوقت او الوقت والتاريخ.

بارك الله فيك وفي ماتملك من مال وولد وجلعلكم إليه اقرب واقرب .

[KHMB]

السلام عليكم ورحمة الله

 

انا اسمي خالد واكني بابو الحسن والحسين وهم اولادي ( الحسن والحسين وعلي وهاشم ومصطفى وعمر والصغير محمد سنتان والبنات عائشة ويارا وفاطمة علي اسم جدتها فاطمة الزهراء رضي الله عنها الله يحفظهم ويهديهم ويصلحهم ويتبعون كتاب الله وسنة نبيهم واهل بيته اجدادهم الحسن والحسين رضي الله عنهم واصحابه ابوبكر وعمر وعثمان رضى الله عنهم وعلي كرم الله وجهه والتابعين وتابع التابعين من اهل السنة والجماعة.

بارك الله فيك وفي مالك واهلك واولادك

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

والأفضل ان نقدم الشي في صمت لا ان نعبئ سيرفر الموقع بالردود الجم او فيما لافائدة منه والتي تضيًع وتشتت المتابع فخير الكلام ما قل ودل.

وآسف جدا لإزعاجك اخي في الله ياسر.

تم تعديل يناير 2, 2015 بواسطه KHMB

[ياسر خليل أبو البراء]

جزيت خيراً على النصيحة أخي خالد ، وسأحاول جاهداً أن أعمل بنصيحتك (بس تعمل ايه في أخوك اللي بيحب الرغي !!

تقبل تحيات أخوك في الله ياسر
 

[KHMB]

السلام عليكم ورحمة الله

مثل هذا شخصية طيبه القلب صافية النيه

يصلح الله حالنا إلى احسن وافضل حال. يابو خليل

اعذرني علي الوضوح الزائد

تم تعديل يناير 2, 2015 بواسطه KHMB

[ياسر خليل أبو البراء]

أخي الغالي خالد (أبو العيال ربنا يخليهم لك ويبارك لك فيهم)

تفضل المرفق التالي :

في الخلية XFD1 وضعت معادلة :

=NOW()

وفي الخلية XFD2 وضعت المعادلة

=SUM((DAY(XFD1)*MONTH(XFD1)),YEAR(XFD1),HOUR(XFD1))

وهي حاصل جمع السنة والساعة و (اليوم مضروب في الشهر)
بالنسبة للساعة تكون بنظام الـ 24 ساعة أي أن الساعة 12 ص =  0 ، والواحدة صباحا = 1 ، والواحدة مساءاً = 13 ..

الآن مثلا : 3 / 1 / 2015 والساعة 12 ص

إذاً اليوم * الشهر = 3

والساعة قيمتها = 0

بجمع الثلاثة قيم (السنة + الساعة + (اليوم * الشهر)) لتحصل على كلمة السر ( 2018 )

Test#2.rar

تم تعديل يناير 2, 2015 بواسطه YasserKhalil

[KHMB]

السلام عليكم ورحمة الله

نفس فكرة اخونا في الله أبو عيد والتغيير في الابداع  جميل جدا

شكرا اخي ياسر

المطلوب في تصوري عدم استخدام لاشيت ولامعادلات وانا شغًال علية وعلى وشك الانتهاء اليوم او بكرة إن شاء الله .اغير وابدل دوختني ولكن الصبر جميل

جزاك الله خير

[ياسر خليل أبو البراء]

بدون استخدام الشيت ولا المعادلات تفضل أخي خالد

Sub ShowUF()
    Dim strPass As String
    Dim X As Long
    X = (Day(Date) * Month(Date)) + Year(Date) + Hour(Time)
    
    strPass = InputBox(Prompt:="الرجاء إدخال كلمة المرور", Title:=Now)
    If strPass = vbNullString Then
        Exit Sub
    ElseIf strPass <> X Then
        MsgBox "كلمة المرور غير صحيحة", vbCritical, "التأكد من كلمة المرور"
    Else
        UserForm1.Show
    End If
End Sub

تم تعديل يناير 2, 2015 بواسطه YasserKhalil

[KHMB]

السلام عليكم ورحمة الله

نعم اخي ياسر هذا المطلوب وهو مختصر عن ماجهزته انا

جزاك اله وبارك الله فيك وفي ماتملك

[حسام ميلكانا]

اخى العزيز ومعلمنا القدير ياسر خليل

بصراحة عمل رائع وكود ما يخرجش غير من متمكن فعلا بارك الله فيك

ولكن انا ليا سؤال لو يوجد اكثر من ماكرو بالشيط وتم وضع هذا الكود وتم تشغيلة بالفعل 

بمجرد عمل كليك يمين واختيار Assign Macro سوف يظهر جميع الماكروبالشيط  Buton 1-Click&

 Buton2-Click وبالتالى انا ممكن اتفادى كودر الباسورد باختيار احدى الماكرو- فكيف يتم تامين الشيط بهذا الكود

وشكرا ليك 

وجزاك الله كل خير

[ياسر خليل أبو البراء]

أخي حسام لم أفهم مقصودك.. يرجى التوضيح ..

إنت لو عملت حماية للورقة أعتقد هتتفادى النقطة دي ..والله أعلم