+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] كود تحقق من يوزر بالسماح له (/showthread.php?tid=16548)
كود تحقق من يوزر بالسماح له - hglogtd - 23-07-16
السلام عليكم .... صباح ومساء الخير على الغالين
عندي محاولة وارجوا التكرم بمساعدتي بالكود أو تغيير الفكرة أن كانت غير مجدية
في عملي اليوزرات والباسوردات كثيرة جدأ
فأنا أحاول تغيير الفكرة أن أمكنت
الفكره هي أن الداتا بيس تتكون من جداول من ضمنها جدول user
اقوم بإدخال اسم المستخدم المسجل في المجال فيه ليتمكن من الدخول لشاشة التعديل
* عند محاولة الدخول على form3 يقوم بالتأكد من اليوزر هل هو مجود في جدول user
أذا كان موجود يمسح له بالدخول وإلا فلا
مجرد فكره واستقبل كل اقتراحاتكم لي فأنا أتعلم منكم ، وفقكم الله
RE: كود تحقق من يوزر بالسماح له - طالب 22 - 23-07-16
يفضل انك تغير الفكرة الى
عند ضغط تسجيل الدخول يعطيك رسالة اسم المستخدم وكلمة السر
____________________________________-
اعتقد ان ما تطلبه صعب شوي بالنسبة لنا كمبتدئين بس علي داي ممكن يفيدك بالهموضوع اكثر لاني شفت له مثال مطرشه بالمنتدى لكي يستفيد منه الاعضاء
اول حاجه ستنشئ فورم ومنه تدخل اسم المستخدمين الجدد وماهي صلاحياتهم
ثانيا شي سيتم الربط بين الصلاحيات والمستخدم
ثالثا في كود تسجيل المستخدمين ستكتب الاوامر ... شغلانه طويلة
RE: كود تحقق من يوزر بالسماح له - hglogtd - 23-07-16
أنا استفيد من هالمنتدى الغالي على قلبي
وأخي طالب 22 ما فيه شي مستحيل او صعب على عباقرة المنتدى
واتوقع ان السؤال سهل وانا وانت نتعلم وأن شاء الله نلاقي حل واطلالتك على الموضوع تاج
أحاول انا ابتعد عن الصلاحيات ويوزر وباسور لان في مشروعي كل شخص بيشتغل على البرنامج عنده ما يكفيه من يوزرات
شكرا على الرد
RE: كود تحقق من يوزر بالسماح له - الوادي - 23-07-16
يعني المسألة ما فيها كلمة مرور،
يعني مجرد استفسار هل اسم اليوزر أو اسم اموظف أو اسمل اعميل (أيا كان) موجود مسبقا أم لا.
هنا اعمل استعلام عن الاسم فقط
ولكن Environment.UserName يعطيك اسم المستخدم الخاص بالويندوز.
هذا كود الاستعلام
PHP كود :
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
Dim ret As Integer
Using cmd As New OleDbCommand("SELECT COUNT(*) FROM [user] WHERE [user_name]=@username", cnn)
cmd.Parameters.AddWithValue("@username", Environment.UserName)
If Not cnn.State = ConnectionState.Open Then cnn.Open()
ret = cmd.ExecuteScalar ' Scalar '
cnn.Close()
End Using
If ret > 0 Then
Form3.ShowDialog()
Else
MsgBox("اسم المستخدم غير موجود")
End If
End Sub
في الأول كنت فاهم انك تريد طريقة الاستعلام مع تحقق شرط
لكن رجعت قرأت الموضوع إتضح انك تريد تأييد أو عدم تأييد للفكرة.
الفكرة طيبة ما فيها شي، وتستخدم في التحقق في الصلاحية للدخول على شاشات معينة،
ورأيت تطبيق لهذه الطريقة في برامج ولكني نسيتها،
ولكن أتذكر أنها كانت تطلب كلمة مرور فقط مخصصة لتلك الصفحة (لأن اسم المستخدم قد سبق تسجيله في بداية تشغيل البرنامج)
وأحيانا تكون نفس كلمة المرور الأساسية للمستخدم من باب الاحتياط في حال قام المستخدم بترك البرنامج مفتوح وحاول غيره الدخول للصفحات الخطرة التلاعب بها.
يا طالب، يعجبني فيك اجتهادك ونشاطك، ولاحظت فيك أنه عندما لا يكون لديك حل تشارك من باب تحريك وتنشيط الموضوع.
RE: كود تحقق من يوزر بالسماح له - hglogtd - 23-07-16
يعطيكم العافيه جميعاً وما استغني عنكم لا عدمناكم
الفكره وما فيها أنه اسم المستخدم يقرأ مع بداية تشغيل الفورم بدون تدخل احد يعني مثلا ليبل 2 = Environment.UserName
فاذا اضفت اسم المستخدم في جدول user هو تلقائي يسمح لك الدخول على الفورم واذا كان اسم المستخدم اللي هو Environment.UserName
غير موجود في القاعدة لا يسمح لك
تقريبا نفس نظام الصلاحيات عند فتح الفورم يتأكد من الاسم والرقم السري
RE: كود تحقق من يوزر بالسماح له - الوادي - 23-07-16
طيب الحين انتهى الموضوع ولا باقي؟
RE: كود تحقق من يوزر بالسماح له - hglogtd - 23-07-16
لا باقي ما انتهى وانا اللي ابيه الكود
وما عرفت اوصل له
RE: كود تحقق من يوزر بالسماح له - الوادي - 23-07-16
والكود اللي اعطيتك وش صار عليه.
RE: كود تحقق من يوزر بالسماح له - hglogtd - 23-07-16
اذا تكرمت طبقه لي على المثال لانه يعطيني اخطاء
RE: كود تحقق من يوزر بالسماح له - الوادي - 23-07-16
عشان تتعلم اعطيني الخطأ واعطيك الحل
وإذا ما فيك تتعلم اعطيك المثال.