Dim data As New SqlDataAdapter
Dim ds As New DataSet
Dim df As New DataTable
Dim dt As New DataTable
Dim cblbind As New CheckBoxList
Dim strcon As String = ConfigurationManager.ConnectionStrings("sample").ConnectionString
Dim con As New SqlConnection(strcon)
Dim CmdString As String = "select Teamid,teamname from team"
Dim cmd As New SqlCommand(CmdString, con)
data.SelectCommand = cmd
con.Open()
data.SelectCommand = cmd
data.Fill(dt)
'For i As Integer = 0 To dt.Rows.Count - 1
For i As Integer = 0 To dt.Rows.Count - 1
cmd.Parameters.Clear()
Dim protyp As Integer = dt.Rows(i).Item("TeamId")
cmd.Connection = con
cmd.CommandText = "TeamBindingProc"
cmd.Parameters.Add("@TeamId", SqlDbType.Int).Value = protyp
cmd.CommandType = CommandType.StoredProcedure
data.SelectCommand = cmd
data.Fill(ds)
Dim HtmlStr As String = "&qu ...
Go to the complete details ...