cleSecond=second(NewArticleTime) end if NewArticleTime=year(NewArticleTime)&"-"& NewArticleMonth&"-"&NewArticleDay&" "&NewArticleHour&":"&NewArticleMinute&":"&NewArticleSecond Response.Write("") Response.Write("http://www.oao.com.cn/ShowArticle.asp?ArticleID=" & rsNewArticle("articleid")&"") Response.Write("<![CDATA["&replace(rsNewArticle("Title")," "," ")&"]]>") Response.Write("") Response.Write(""&NewArticleTime&"") Response.Write("(时间显示为文章发表时的北京时间)作者:"&NewArticleAuthor&"") Response.Write("") rsNewArticle.movenext loop end if rsNewArticle.close set rsNewArticle=nothing %>