asp.net技术内幕的书配源码

				
				
				Sub Page_Load
				  Dim objNewsService As BetterNewsService
				  Dim arrNews As NewsItem()
				
				  objNewsService = New BetterNewsService()
				  arrNews = objNewsService.GetNews()
				  rptNews.DataSource = arrNews
				  rptNews.DataBind()
				End Sub
				
				
				
				
				DisplayBetterNews.aspx
				
				
				The lastest news:
								  ID="rptNews"
				  Runat="Server">