dim con1 As New SqlClient.SqlConnection()
Dim dtF2 As New DataTable
Dim cmd1 As New SqlClient.SqlCommand
connectionString = "XXXX"
con1.ConnectionString = connectionString
con1.Open()
cmd1.Connection = con1
cmd1.CommandText = "StoredProcName"
cmd1.CommandType = CommandType.StoredProcedure
cmd1.Parameters.Clear()
cmd1.ExecuteNonQuery()
adapter.SelectCommand = cmd1
adapter.Fill(dtF2)
Grid2.DataSource = dtF2
|