网站程序员如何应对web标准.doc

　　网站程序员如何应对web标准edu.5151doc. 教育资源库 本文讨论的是在l标签，去了解如何让程序输出页面需要的代码。 比如： 上边是美工出来的效果图，下边是符合标准的程序代码： Dim oHtml set rs=server.createobject(adodb.recordset) Sql = select top 10 id,Title From tbl_Nel=lt;ul do l=oHtml lt;lilt;a href=shop; rs(id) title= rs(title) rs(title) lt;/alt;/li rs.movenext loop oHtml=oHtml lt;/ul rs.close set rs=nothing response.l) 而如果是传统的TABLE布局下，程序员要写的HTML代码就会多很多，要写出TABLE、要判断什么时候输出TR来换行、要在每条新闻的前边加个一个IMG来输出小图标、要用程序去控制输出的标题长度。所有的工作都需要先出页面代码，程序员才能去写出这段程序。 对于程序员而言，你应该把e As DateTime Protected _content As String Protected _clickCount As Integer Public Property Id() As Integer Get nbsp 123下一页 [这篇文章来自..，]; Return _id End Get Set(ByVal Value As Integer) _id = Value End Set End Property Public Property TypeId() As Integer Get Return _typeId End Get Set(ByVal Value As Integer) _typeId = Value End Set End Property Public Property Title() As String End Property Public Property Author() As String End Property Public Property original() As String End Property Public Property UpdateTime() As DateTime End Property Public Property Content() As String End Property Public Property ClickCount() As Integer End Property End Class Public Class Nee As DateTime Protected _content As String Protected _clickCount As Integer nb 上一页123下一页 [这篇文章来自..，]sp; Public Property Id() As Integer Get Return _id End Get Set(ByVal Value As Integer) _id = Value End Set End Property Public Property TypeId() As Integer Get Return _typeId End Get Set(ByVal Value As Integer) _typeId = Value End Set End Property Public Property Title() As String End Property Public Property Author() As String End Property Public Property original() As String End Property Public Property UpdateTime() As DateTime End Property Public Property Content() As String End Property Public Property ClickCount() As Integer End Property End Class 就像这样，把网站里所有的表都试着对象化。然后再定义对象相关的记录集，上边定义的是单个的新闻对象，再定义一个新闻的记录集。9 7 3 12 4 8 : 上一页123[这篇文章来自..，]