*Two Namespaces are must be required for SqlServer Connectivity:-
1. Import System.Data
Show Data Form
1. Import System.Data
2. Import System.Data.SqlClient
Show Data Form
Private Sub btnShow_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnShow.Click
Dim StrCon As String = "Data Source=PRADEEP-HP;Initial Catalog=ClassDemo;Integrated Security=True"
Dim SqlCon As SqlConnection = New SqlConnection(StrCon)
Dim SqlQuery As String = "Select
EmpName,EmpAddress,EmpDOB from EMPTable"
Dim SqlCom As SqlCommand = New SqlCommand(SqlQuery, SqlCon)
SqlCon.Open()
Dim Dr As SqlDataReader
Dr = SqlCom.ExecuteReader()
Dim bs As BindingSource = New BindingSource()
bs.DataSource = Dr
DataGridView1.DataSource = bs
End Sub
0 comments
Post a Comment