[سانسيفا]

PHP كود :

Dim SS As String
SS = InputBox("أدخل الرقم السري", "التحقق من الدخول")
Select Case SS

Case "123456"
MsgBox "تمتلك صلاحيات المسؤول"
'اكتب الكود الذي تريد هنا لصلاحيات المسؤول

Case "1122"
MsgBox "تمتلك صلاحيات مستخدم عادي"
'اكتب الكود الذي تريد هنا لصلاحيات المستخدم العادي

Case Else
MsgBox "لا يحق لك الدخول"
'هنا اذا تم ادخال رقم سري غير معروف أو لم يتم ادخال رمز سري
End
End Select 


مفهوم البرنامج أنه بمجرد ضغط زر الأمر تخرج نافذة تطلب من المستخدم إدخال الرقم السري
اذا أدخل المستخدم الرقم 123456 فمعنى ذلك أنه المسؤول واذا أدخل الرقم 1122 فإن له صلاحيات محدودة كمستخدم عادي .... وإذا أدخل ارقام وقيم أخرى فإن البرنامج يمنعه من الدخول للبرنامج ويقفل البرنامج

قم بالتعديل عليه حسب رغبتك