Display DataTable in HTML Table layout in ASP.Net using C# and VB.Net

hi rrmisinfo,

You need to format the query to display the column Particulars.

Please refer below example.

Database

For this example I have used of Northwind database that you can download using the link given below.

Download Northwind Database

HTML

<asp:PlaceHolder ID="PlaceHolder1" runat="server" />

Namespaces

C#

using System.Data;
using System.Data.SqlClient;
using System.Configuration;
using System.Text;

VB.Net

Imports System.Data
Imports System.Data.SqlClient
Imports System.Configuration
Imports System.Text

Code

C#

protected void Page_Load(object sender, EventArgs e)
{
    DataTable inputData = new DataTable();
    string constr = ConfigurationManager.ConnectionStrings["constr"].ConnectionString;
    string query = "SELECT TOP 5 OrderID, OrderDate, EmployeeID, CustomerID, '<b>' + ShipName + '</b><br />' + ShipCity 'Details', Freight FROM [Orders]";

    using (SqlConnection con = new SqlConnection(constr))
    {
        using (SqlDataAdapter sda = new SqlDataAdapter(query, con))
        {
            sda.Fill(inputData);
        }
    }

    StringBuilder Sb = new StringBuilder();
    Sb.Append("<table class='table'>");
    Sb.Append("<thead>");
    Sb.Append("<tr>");

    foreach (DataColumn columnName in inputData.Columns)
    {
        Sb.Append("<th>" + columnName.ColumnName + "</th>");
    }
    Sb.Append("</tr>");
    Sb.Append("</thead>");
    Sb.Append("<tbody>");

    foreach (DataRow row in inputData.Rows)
    {
        Sb.Append("<tr>");
        foreach (DataColumn columnName in inputData.Columns)
        {
            Sb.Append("<td>" + row[columnName.ColumnName].ToString() + "</td>");
        }
        Sb.Append("</tr>");
    }
    Sb.Append("</tbody>");
    Sb.Append("</table>");
    PlaceHolder1.Controls.Add(new Literal() { Text = Sb.ToString() });
}

VB.Net

Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
    Dim inputData As New DataTable()
    Dim constr As String = ConfigurationManager.ConnectionStrings("constr").ConnectionString
    Dim query As String = "SELECT TOP 5 OrderID, OrderDate, EmployeeID, CustomerID, '<b>' + ShipName + '</b><br />' + ShipCity 'Details', Freight FROM [Orders]"
    Using con As SqlConnection = New SqlConnection(constr)
        Using sda As SqlDataAdapter = New SqlDataAdapter(query, con)
            sda.Fill(inputData)
        End Using
    End Using

    Dim Sb As StringBuilder = New StringBuilder
    ' Create the data table
    Sb.Append("<table class='table'>")
    Sb.Append("<thead>")
    Sb.Append("<tr>")
    For Each columnName As DataColumn In inputData.Columns
        Sb.Append("<th>" & columnName.ColumnName & "</th>")
    Next
    Sb.Append("</tr>")
    Sb.Append("</thead>")
    Sb.Append("<tbody>")
    For Each row As DataRow In inputData.Rows
        Sb.Append("<tr>")
        For Each columnName As DataColumn In inputData.Columns
            Sb.Append("<td>" & row(columnName.ColumnName).ToString() & "</td>")
        Next
        Sb.Append("</tr>")
    Next
    Sb.Append("</tbody>")
    Sb.Append("</table>")
    PlaceHolder1.Controls.Add(New Literal() With {.Text = Sb.ToString()})
End Sub

Screenshot

Your Idea was fabulous but i did that from another way beacuse it was generated through stored procdure and have lenghty data.

There I applied same idea with different way.

Dim inputData As DataTable = DBH.GetDataTable(SqlStr)
inputData.Columns.Add("Particulars", GetType(String))
inputData.Columns.Add("Amount", GetType(String))
Dim inputColumnNames As String() = {"SrNo", "TripDate", "OrderNos", "CNDoNo", "Particulars", "Amount", "TotalAmtWithoutTax"}
For Each row As DataRow In inputData.Rows
    Dim Particulars As String = $"<B>{row("Description")}</B></br>  {row("ContainerType")} VehicalNo: {row("VehicalNo")} </br> {row("OtherChargesTxt")} </br> {row("TaxPercentage")}"
    Dim Amount As String = $"<B>{row("TransCharges")}</B></br></br>  {row("OtherChargesV")} </br> {row("TaxAmt")} </br>"
    row("Particulars") = Particulars
    row("Amount") = Amount
Next
Dim Sb As StringBuilder = New StringBuilder
' Create the HTML table
Sb.Append("<table cellpadding='5' cellspacing='0' style='border: 1px solid #ccc;font-size: 9pt;font-family:Arial;width:100%'>")
Sb.Append("<thead>")
Sb.Append("<tr>")
For Each columnName As String In inputColumnNames
    Sb.Append("<th>" & columnName & "</th>")
Next
Sb.Append("</tr>")
Sb.Append("</thead>")
For Each row As DataRow In inputData.Rows
    Sb.Append("<tr>")
    For Each columnName As String In inputColumnNames
        Sb.Append("<td style='width:100px;border: 1px solid #ccc'>" & row(columnName).ToString() & "</td>")
    Next
    Sb.Append("</tr>")
Next
Sb.Append("</table>")
PlaceHolder1.Controls.Add(New Literal() With {.Text = Sb.ToString()})