Posted on: 7/23/2014 4:39:53 AM | Views : 389

dim htmlstr as stringbuilder=""   
Dim HtmlStr As New StringBuilder 'For i As Integer = 0 To dt.Rows.Count - 1 HtmlStr.Append("<table id='table1' runat='server' border='1' align='center'>")
HtmlStr.Append("<tr>")
HtmlStr.Append("<th>" + "TeamName" + "</th>") HtmlStr.Append("<th>" + "TeamMember" + "</th>") HtmlStr.Append("</tr>") For i As Integer = 0 To dt.Rows.Count - 1 cmd.Parameters.Clear() ds.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) HtmlStr.Append("<tr>")< ...

Go to the complete details ...