html gridview 效果,使用HTML表格而不是Gridview

我想使用HTML表格而不是gridview来检查数据。为什么HTML表格？因为我将使用输出发送电子邮件，所以我更喜欢HTML表格而不是gridview。另外我不想使用对象，因为系统只能在服务器上运行。它会自动发送一封电子邮件。任何人都可以帮我解决我的问题吗？谢谢。使用HTML表格而不是Gridview

这是我到目前为止。在下面的例子中，我使用了gridview，因为我不知道如何使用Append来使用HTML Table。

Vb.Net

这是我打电话给我的功能

Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load

SendEmail()

End Sub

这是我想转换为使用追加HTML表我的电子邮件功能。

Protects Sub SendEmail()

For Each dt As System.Data.DataTable In prod3()

Dim i As Integer = i + 1

Dim dv As New System.Data.DataView(dt)

Dim dt2 As System.Data.DataTable = dv.ToTable(False, {"Name", "Product", "Expiry"})

Dim y As Date = dt.Rows(0)("pdate")

Dim dte1, dte2, dte3 As String

Select Case i

Case 1

dte1 = dt.Rows(0)("pdate").ToString

dte1 = y.Date.ToString("MM/dd/yyyy")

dte1 = y

GridView11.DataSource = dt2

GridView11.DataBind()

Case 2

dte2 = dt.Rows(0)("pdate").ToString

dte2 = y.Date.ToString("MM/dd/yyyy")

dte2 = y

GridView12.DataSource = dt2

GridView12.DataBind()

Case 3

dte2 = dt.Rows(0)("pdate").ToString

dte2 = y.Date.ToString("MM/dd/yyyy")

dte2 = y

GridView13.DataSource = dt2

GridView13.DataBind()

End Select

Next

End SUb

Public Function prod3() As List(Of DataTable)

Dim ds As New DataSet

Dim cmd As New SqlCommand

Dim ldt As New List(Of DataTable)

Dim adp As SqlDataAdapter = New SqlDataAdapter

Dim c As New SqlConnection("myconnection")

cmd.Connection = c

cmd.CommandText = "storedprocname"

cmd.Parameters.AddWithValue("@name", "%")

cmd.Parameters.AddWithValue("@product", "%")

cmd.Parameters.AddWithValue("@expiry", "%")

cmd.Parameters.AddWithValue("@datefrom", DateTime.Today.AddDays(1))

cmd.Parameters.AddWithValue("@dateto", DateTime.Today.AddDays(3))

cmd.Parameters.AddWithValue("@cost", "%")

cmd.CommandType = CommandType.StoredProcedure

adp.SelectCommand = cmd

adp.Fill(ds)

Dim dv As New DataView(ds.Tables(0))

Dim dvfilter As DataTable = dv.ToTable(True, {"pdate"})

For Each dtrow As DataRow In dvfilter.Rows

Dim dt2 As New DataTable

dv.RowFilter = "date =#" + dtrow("pdate") + "#"

dt2 = dv.ToTable(False, {"DATE", "Name", "Product", "Expiry"})

ldt.Add(dt2)

Next

Return ldt

End Function

该代码正在工作，但不是我想要的方式。我不想使用gridview。我希望它是在HTML表格，如：

Dim builder As New StringBuilder

builder.Append("")

builder.Append("

")

builder.Append("")

builder.Append("

")

builder.Append("

builder.Append("

")

builder.Append("

")

任何帮助将不胜感激！ :) 谢谢。

2016-09-29

x' tian

+0

这是一个错误的对面。 GridView是一个可以呈现HTML表格的服务器端控件。换句话说，它可以做你所要求的，而不必写HTML。关闭所有花哨的选项(如分页)，给它一些列定义，瞧。 –