السلام عليكم ورحمة من الله وبركاته
اخواني لدي جدول في قاعدة البيانات اسمه users يتكون من 3 أعمدة هي على التوالي
logine psd niveau
ولدي واجهة فورم للاتصال كما هو موضح في الصورة

ولدي كذلك 3 واجهات أخرى هي administrateur و agent و releveur
أريد الكود الذي سيجعل المستخدم عندما يدخل فقط logine والباسوورد تفتح له الواجهة الخاصة به دون ادخال مهمته
أي أنه على سبيل المثال اذا كلن لدينا في قاعدة البيانات
logine= محمد
psd = aaa
niveau =aministrateur
وعندما يدخل فقط اللوجين و الباسوورد أوتوماتيكيا تفتح له واجهة administrateur بعد التحقق منه في الكود التالي الذي لا يشتغل عندي ولا أعرف كيف أصححه لكي بعمل بالطريقة التي أريدها
con.Open()
cmd1.Connection = con
cmd1.CommandText = "select * from users where logine = '" & TextBox1.Text & " ' and psd ='" & TextBox2.Text & " ' and niveau='administrateur'"
da1 = New SqlDataAdapter(cmd1)
da1.Fill(ds, "users1")
dtadmin = ds.Tables("users1")
cmd2.Connection = con
cmd2.CommandText = "select * from users where logine =' " & TextBox1.Text & " ' and psd = ' " & TextBox2.Text & " ' and niveau='agent'"
da2 = New SqlDataAdapter(cmd2)
da2.Fill(ds1, "users2")
dtagent = ds1.Tables("users2")
cmd3.Connection = con
cmd3.CommandText = "select * from users where logine =' " & TextBox1.Text & " ' and psd = ' " & TextBox2.Text & " ' and niveau='releveur'"
da3 = New SqlDataAdapter(cmd3)
da3.Fill(ds2, "users3")
dtreleveur = ds2.Tables("users3")
If dtadmin.Rows.Count > 0 Then
Administrateur.Show()
ElseIf dtagent.Rows.Count > 0 Then
AgentDuFacturation.Show()
ElseIf dtreleveur.Rows.Count > 0 Then
releveur.Show()
Else
MsgBox(" incorrect")
End If
con.Close()

أريد منكم حلا وتصحيح للكود جزاكم الله خيرا

