不管用啊

可以了！但是出现此图这样的


都可以了！就是 不能选

录入 点击数 没有显示 主题算是可以了

response.write "<a href='Admin_ArticleShow.asp?ArticleID=" & rsArticleList("articleid") & "'>"
response.write " title='标 题：" & rsArticleList("Title") & vbcrlf & "作 者：" & rsArticleList("Author") & vbcrlf & "转 贴 自：" & rsArticleList("CopyFrom") & vbcrlf & "更新时间：" & rsArticleList("UpdateTime") & vbcrlf

response.write(rsArticleList("Key"))
response.end

response.write "点 击 数：" & rsArticleList("Hits") & vbcrlf & "关 键 字："
if len(rsArticleList("Key"))>2 then
response.write mid(rsArticleList("Key"),2,len(rsArticleList("Key"))-2)
end if
response.write vbcrlf & "推荐等级："
if rsArticleList("Stars")=0 then
response.write "无"
else
response.write string(rsArticleList("Stars"),"★")
end if
response.write vbcrlf & "分页方式："
if rsArticleList("PaginationType")=0 then
response.write "不分页"
elseif rsArticleList("PaginationType")=1 then
response.write "自动分页"
elseif rsArticleList("PaginationType")=2 then
response.write "手动分页"
end if
response.write vbcrlf & "阅读等级："
if rsArticleList("ReadLevel")=9999 then
response.write "游客"
elseif rsArticleList("ReadLevel")=999 then
response.write "注册用户"
elseif rsArticleList("ReadLevel")=99 then
response.write "收费用户"
elseif rsArticleList("ReadLevel")=9 then
response.write "VIP用户"
elseif rsArticleList("ReadLevel")=5 then
response.write "管理员"
end if
response.write vbcrlf & "阅读点数：" & rsArticleList("ReadPoint")
response.write "'>" & rsArticleList("title") & "</a>"
%>

红的的为我加的
但是</a>不知道该加哪

[此贴子已经被作者于2006-5-25 11:57:51编辑过]