nó vào nhãn kiểm soát ở giữa của bảng trên trang. Điều này cho chúng ta tiêu đề của chúng tôi và cấu trúc bảng cơ bản khi chúng tôi cho thấy các hàng khác nhau. Mã phía sau trang này được thể hiện trong Liệt kê 8,12 và sử dụng rất nhiều các tính năng thể hiện trong dự án đầu tiên để tạo ra các đầu ra. | Teamwork Network Discussion Boards 495 it into the label control in the middle of the table on the page. This gives us our headers and basic table structure when we show the various rows. The code behind this page is shown in Listing and uses a lot of the features demonstrated in the first project to generate the output. Imports System Imports Imports Imports Imports Imports Imports TWNWObjects Namespace TWNW Public Class PostsView Inherits Page Protected lblPageTitle As Label Protected lblContent As Label Sub Page_Load objSender As Object objArgs As EventArgs Dim strColor As String tabletext If mID Is Nothing Then msg 403 rURL _ SCRIPT_NAME _ QUERY_STRING End If Dim DB As New Dim DBR As New Dim SD SDR As SqlDataReader If tID 0 Then Dim T As New Team DB tID Dim DR As DataRow View Posts - DR Name sp_UpdateMemberDiscussionHistory _ mID .Value _ tID Else View Posts - Public Forum sp_UpdateMemberDiscussionHistory _ mID .Value 0 End If SD sp_RetrieveOriginalPostsByTeam _ tID True Dim SB As New Do While Listing 496 Project 8 tr class 0 _ strColor td o td _ SD Author td 0 td _ SD Subject td align center 0 1 td _ SD PostDate .ToShortDateString _ SD PostDate .ToShortTimeString SDR sp_RetrieveStatisticsByPost SD pkPostID If SDR LastReplyDate .ToString Then td align center None td Else td align center 0 1 td SDR LastReplyDate .ToShortDateString _ SDR LastReplyDate .
