Take a
StringBuilder
take a html syntax inside that. Append each row and columns with the values returned buy the procedure. Try this:
Dim s As New StringBuilder
s.Append("<table border=1><tr>")
For Each drow As Data.DataRow In dt.Rows
s.Append("<td>")
s.Append(drow(0).ToString())
s.Append("</td>")
s.Append("<td>")
s.Append(drow(1).ToString())
s.Append("</td>")
s.Append("<td>")
s.Append(drow(2).ToString())
s.Append("</td>")
Next
s.Append("</tr></table>")
Response.Write(s)
--Amit