16-06-13, 03:15 PM
السلام عليكم ورحمة الله وبركاته
مثل ما قال أخي سجـّـــــاد، إذا كان إسم السرفر SQLEXP فيكون كالتالي
PHP كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim connection As New SqlClient.SqlConnection("Data Source=.\SQLEXP; Initial Catalog=SGG; Integrated Security=True")
Dim sql As String = " Select * From [user] " & _
" Where [User Name] = @UserName " & _
" And [Password] = @Password "
Dim command As New SqlClient.SqlCommand(sql, connection)
command.Parameters.AddWithValue("@UserName", TextBox1.Text)
command.Parameters.AddWithValue("@Password", TextBox2.Text)
Dim adaptor As New SqlClient.SqlDataAdapter(command)
Dim datatable As New DataTable
adaptor.Fill(datatable)
If datatable.Rows.Count = 0 Then
MsgBox("هناك خطاء فى اسم المستخدم او كلمة المرور")
Me.TextBox1.Clear()
Me.TextBox2.Clear()
Me.TextBox1.Focus()
Else
MainMenu.show()
Me.Hide()
End If
End Sub
السلام عليكم ورحمة الله وبركاته