تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] انشاء login form
#1
السلام عليكم
إذا سمحتم أحد ينبهني على الخطأ الموجود في الكودات فالأسفل مع العلم انها ل login form



Dim userlist As New db_operation()
Dim strPassword As String = PasswordTextBox.Text
Dim deHashpass As New EncodingDecodingPassword
'Dim strUserID As String

strSql = "Select * from Supervisors WHERE supName = '" & UsernameTextBox.Text & "'"
strTableName = "Supervisors"

tblMyTable = userlist.PopulateDataset(strSql, strTableName).Tables(0)
intRecordCounter = tblMyTable.Rows.Count

If intRecordCounter = 1 Then
intRecordCounter = 0
strPassword = tblMyTable.Rows(intRecordIndex)(1)
strPassword = deHashpass.base64Decode(strPassword)
strPassword = deHashpass.base64Decode(strPassword)


If strPassword = PasswordTextBox.Text Then
If vb.Left(UsernameTextBox.Text, 5) = "admin" Then
Dim frm_admin As New frmadmin
frmadmin.MdiParent = MdiParent
frmadmin.Show()

Else

Dim frm_teachers As New frmTeachers
frmTeachers.MdiParent = MdiParent
frmTeachers.Show()

End If
Else
MsgBox("Invalid User")
End If
End If

End Sub
الرد }}}}
تم الشكر بواسطة:
#2
please I NEED help
الرد }}}}
تم الشكر بواسطة:
#3
تفضل اخي هذه مثال جاهز لاحد الاخوان من المنتدى لعلك تستفيد منه

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


الملفات المرفقة
.zip   Easy_permission_example.zip (الحجم : 358.53 ك ب / التحميلات : 114)
الرد }}}}
تم الشكر بواسطة:
#4
جزاك ربي خيرا
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  انشاء قاعدة بيانات بإمتداد خاص بك thevirus 1 54 منذ 5 ساعة مضت
آخر رد: أبوبكر سويدان
  مساعدة في انشاء ثيم عبدالرحمن المكاوي 11 280 25-11-16, 11:57 AM
آخر رد: العزابي
  هل يمكن انشاء صفحة متصفح Mohamed20 2 128 20-11-16, 12:38 AM
آخر رد: myalsailamy
  [سؤال] طلب لمثال عن انشاء حماية للبرنامج في vb.net 2012 مع فكرة بحاجة للتطبيق M@GED 12 309 05-11-16, 10:49 AM
آخر رد: أبو عمر
  أرسال قيمة من UserControl الى Form Rabeea Qbaha 5 96 16-10-16, 06:47 PM
آخر رد: Rabeea Qbaha
  [سؤال] ظهور خطأ عند استخدام them login ddemed 3 131 12-10-16, 02:56 AM
آخر رد: ممدوح
  [VB.NET] طلب انشاء جملة update في مشروعي Codack 7 193 11-10-16, 04:41 PM
آخر رد: Codack
Exclamation [VB.NET] إغلاق الـ Form عند الضغط على زر معين Doctor GME 3 108 07-10-16, 10:54 PM
آخر رد: Doctor GME
  Wpf And Windows Form Kian Tech 2 81 06-09-16, 09:12 PM
آخر رد: Kian Tech
  [سؤال] form يظهر مرره واحدة بداية تشغيل البرنامج mudz 3 160 06-09-16, 06:07 AM
آخر رد: أبو عمر

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم