run following in the Page_Load
Sub bindGrid()
Dim history() As ProcessInfo = ProcessModelInfo.GetHistory(100)
Dim i As Int32 = 0
Dim dt As New DataTable()
Dim dr As DataRow
dt = New DataTable()
dt.NewRow()
dt.Columns.Add("inception")
dt.Columns.Add("pid")
dt.Columns.Add("status")
dt.Columns.Add("age (sec)")
dt.Columns.Add("requests")
dt.Columns.Add("lamentation")
dt.Columns.Add("peak_memory")
For i = 0 To history.Length - 1
Dim obj() As Object = {history(i).StartTime, history(i).ProcessID, history(i).Status.ToString(), history & _(i).Age.TotalSeconds, history(i).RequestCount, history(i).ShutdownReason.ToString(), history(i).PeakMemoryUsed()}
'new row
dr = dt.NewRow()
' put in the data
dr("inception") = history(i).StartTime
dr("pid") = history(i).ProcessID
dr("status") = history(i).Status.ToString()
dr("age (sec)") = history(i).Age.TotalSeconds
dr("requests") = history(i).RequestCount
dr("lamentation") = history(i).ShutdownReason.ToString()
dr("peak_memory") = history(i).PeakMemoryUsed()
dt.Rows.Add(dr)
Next
dgrAspProc.DataSource = dt
dgrAspProc.DataBind()
End Sub