<%
sql = "select *,ShowTime = convert(char(20),CreateDate,120) from TArticle where IfCommand = 'Y' and IfIssue = 'Y' and ArtType <> '004' order by CreateDate desc"
set rs = conn.execute(sql)
ShowTime = rs("ShowTime")
i = 0
do while not rs.eof and i<11
select case rs("ArtType")
case "000"
sql = "select * from TArticleInformation where ArticleId = '"+rs("ArticleId")+"'"
set rsInf = conn.execute(sql)
if not rsInf.eof then
sTitle = rsInf("Title")
Information = "标题："+rsInf("Title")+" 作者："+rsInf("Auther")+" 发布时间："+ShowTime+" 点击率："+cstr(rs("ClickNum"))
end if
rsInf.close
case "001"
sql = "select * from TLibrary where ArticleId = '"+rs("ArticleId")+"'"
set rsInf = conn.execute(sql)
if not rsInf.eof then
sTitle = rsInf("Title")
Information = "标题："+rsInf("Title")+chr(13)+"作者："+rsInf("Auther")+chr(13)+"发布时间："+ShowTime+chr(13)+"点击率："+cstr(rs("ClickNum"))
end if
rsInf.close
case "002"
sql = "select * from TCultural where ArticleId = '"+rs("ArticleId")+"'"
set rsInf = conn.execute(sql)
if not rsInf.eof then
sTitle = rsInf("Title")
Information = "标题："+rsInf("Title")+chr(13)+"发布时间："+ShowTime+chr(13)+"点击率："+cstr(rs("ClickNum"))
end if
rsInf.close
case "003"
sql = "select * from TDynamic where ArticleId = '"+rs("ArticleId")+"'"
set rsInf = conn.execute(sql)
if not rsInf.eof then
sTitle = rsInf("Title")
Information = "标题："+rsInf("Title")+chr(13)+"作者："+rsInf("Auther")+chr(13)+"发布时间："+ShowTime+chr(13)+"点击率："+cstr(rs("ClickNum"))
end if
rsInf.close
end select
%>

哪位大虾解释下哦 谢谢咯？

不会……

把文章表中的所有字段查询出来以及字定义的ShowTime字段,转换有不懂的看:http://fengyu.china.com/sqlserver_datefmt.htm
查询条件:IfCommand = 'Y' 和IfIssue = 'Y' 和ArtType <> '004'按CreateDate降序排序.
变量i=0
如果数据表中不为空且i<11
如果:ArtType="000":
给sTitle,Information 赋值
......
select 的后面你找下肯定有i=i+1循环用的,也就是在这个结构中要查出11条记录(sTitle,Information)

asp的代码,到asp区去发.