22-04-17, 06:16 PM
تفضل التعديل
PHP كود :
Using da As New OleDbDataAdapter("SELECT * FROM [user_name] WHERE ([username]=@username) AND ([pass]=@pass)", con)
da.SelectCommand.Parameters.AddWithValue("@username", TextBox1.Text)
da.SelectCommand.Parameters.AddWithValue("@pass", TextBox2.Text)
Using dt As New DataTable
If da.Fill(dt) > 0 Then
Dim r As DataRow = dt.Rows(0)
sa.الاصنافToolStripMenuItem.Enabled = r("SANF")
sa.المستخدمينToolStripMenuItem.Enabled = r("MOST")
sa.ToolStripButton5.Enabled = r("MOSH")
sa.tscos.Enabled = r("OMA")
sa.ToolStripButton4.Enabled = r("MOWA")
sa.tspto.Enabled = r("MAKH")
sa.الدرجToolStripMenuItem.Enabled = r("DORG")
End If
End Using
End Using
