الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف يتم وضع كلمة سر للبرنامج؟؟؟

مغلق
بدأه الورد الأبيض في 13 نوفمبر 2006 · 16 رد · 1,359 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلااام عليكم

الورد الابيض ...... عضو جديد في المنتدى

أولا ...أتشرف ان اكون عضو جديد في المنتدى

معكم .. حصلت على دبلوم البرمجة للحاسب لمدة سنتين

والان انا اعمل مصورة يعني تقولون خارج البرمجة

المهم بعد ماعرفتكم عن نفسي

انا سؤالي مهم وعجزت القى له حل

عندي برنامج صممته على الفيجول بسييك مع استخداام الكثير من البرامج

يتكون تقريبا من 13 فورم

اول فورم حطيت فيه كلمة سر عشان يفتح البرنامج

ولكن كلمة السر لما اكتبها تظهر الحروف

بس انا ابغاها الحروف مجهولة ..!!!!!

يعني كالعادة كلمة السر ماتبين حروفها هالشكل (*******)

عطوني الكود المناسب لهذي العملية

زميلتكم ...... الورد الابيض

شكرا

#2

فى خاصية الـ Password character بتاعة أى Textbox حطى نجمة *

و أهلا بيكى فى المنتدى

#3

السلام عليكم

اهلا بيكي اختي

و الحل متل ما تفضل الاخ msayed2004 و بكل بساطة

#4

عن طريق الكود ممكن تستخدمي هذا الكود :

Text1.PasswordChar = "*"

يا نفسُ إن لم تصلحي

فتشبهي بالصالحينا

[ أبو العتاهية ]

#5

السلااام عليكم ياجماعة الخير

بخصوص كلمة السر .....

افهموني ... انا أبغي اكتب كلمة مثلا اي حروف ــــــــــــ dfghyjbc

ويكون ظهور شكل الباسوورد (******* )

#6

اوكيه

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

وبعد ما تحددين عليه الخصائص فيه خاصيه اسمها Passwordchar

تلقينها فوق RightToLeft

في نفس الخاصية Passwordchar

أكتبي *

فقط مره واحده وبكذا ما راح تظهر الكتابه داخل التكست هذا أبداً ،، تظهر على شكل النجوم ( ******)

أرجو انه واضح

#7

سلام عليكم

شكرا لكم جميعا بشوووف هالحلول الطيبة

وإن شاء الله يطلع معي اللي ابيه

مشكوووريــــــــــــــــــــــــــــــــــن

#8

سلااااام عليكم جميعا

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

لكن صادفني هالأمر.......... خاصية Passwordchar... ماموجودة عندي لأني ماستخدمت text box

أنا استخدمت Image واضغط عليه يظهر لي msg box أبدأ ادخل فيه كلمة السر

هذا الكود كتيته على Image>>>

Dim p As String

Dim u As String

p = "2222"

u = InputBox ("فضلا أدخل كلمة السر")

If u = p Then

Form2.Show

MMControl1.Command = "stop"

Else

MsgBox ("عفوا كلمة السر خاطئة ..أدخل كلمة السر الصحيحة ")

End If

ارجو انكم تفيدوني ابغي أضبط كلمة السر وماتبين حروفها

شكـــــــــــــــــــــــــرا لكم جميـــــعا

#9

هو ممكن بأستخدام الـ SubClassing وديه طريقة صعبة و صعب شرحها و ليها مشاكل كتير , الأحسن تصممى نافذة و تديها نفس شكل الـ InputBox و تستعملى فيها TextBox عادى و تستعملى طريقة الـ Password Character

#10

السلام عليكم

بصراحة انا واجهتني نفس المشكلة

و لكن وجدت الحل و هو بمنتهى السهولة ؟؟؟؟

ما هو ,,,,,

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

لآآخذ المتحولات منه عند الانتهاء

و هيك صار عندي صندوق ادخال و يحمل ميزات عديدة مع امكانية التعديل و بدون اخطاء او تعارض

و ان شا الله تكون وصلت الفكرة :P

#11

تمام هو ده اللى أقصده , وعلى العموم كود الـ Subclassing بتاع الـ InputBox أهو http://www.planet-source-code.com/vb/scrip...56&lngWId=1 بس زى ما قلت قبل كده لا أنصح بيه.

#12

الصراحة مافهمت عليكم

انا اللي عندي ايميج اضيف text وين؟؟؟ واي كود برمجي اللي اكتبه ؟؟؟

ولو فرضنا اني لغيت image وبعدين حطيت text ..... خاصية Password Character

مااااضبطت معي ....... ساعدوني

....

شكرا

#13

أخى / أختى

أزاى من الأصل بتستعمل Image لأدخال كلمة سر.

حاول تانى مع الـ TextBox , و أن ما نفعش أرفع الـ Form المطلوب عمل الخاصية دى فيها

#14

مثال

مثال

_________.rar

_________.rar

#15

السلاااااااااااام عليكم

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

ظبطت بس بس مو مثل مابغيت

انا حطيت زر دخول على فورم 1.... وبعدين يدخلني على فورم جديد 2 مكون من زر (موافق )

و Text لكتابة كلمة السر

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

ا انا بغيت كل هالموضوع على msgbox لان الفورم الجديد ماله داعي ابدا بس لازم اضبطها

وفي مشكلة ثانية ((((حتى لما ادخل كلمة السر صح يقول لي انها خطأ)))))

هذا الكوود كتبته ( على زر موافق )[/size]

Dim p As String

Dim u As String

p = "2222"

u = Text1.PasswordChar

If u = p Then

Form2.Show

Else

("عفوا كلمة المرور خاطــــئة.........أدخل كلمة المرور الصحيحة") MsgBox

End If

#16

هو التشفير بالطريقة دى غلط بس على العموم الكود الصح :

Dim P As String

P = "2222"

وبعد كده فى حدث الضغط على الزر موافق :

If Text1.Text = P then

Form2.Show

Unload Me

Else

MsgBox "Invalid password"

End If

#17

هاااااااااااااااااااااااااااااااااااااااي

مشكوريــــــــــــــــــــــــــن مشكوريــــــــــــــــــــــــــن مشكوريــــــــــــــــــــــــــن مشكوريــــــــــــــــــــــــــن مشكوريــــــــــــــــــــــــــن

اخيرا ظبطت معي مسألة كلمة السر والله يعطيكم أألف عااااااااااااااااااااافيـــة

ويسلمكم -waf

هذا الموضوع مغلق.

مواضيع مشابهة