<% id=int(Getval("id",1)) sql="update bl_list set [view]=[view]+1 where id=" & id conn.execute(sql) sql="select * from bl_list where id=" & id set xrs=conn.execute(sql) sql="select bl_users.id,bl_users.title,bl_users.face2,bl_users.hidd,bl_users.content,uinfo.uname from bl_users left join uinfo on (uinfo.hidd=bl_users.hidd) where bl_users.hidd=" & xrs("hidd") set mrs=conn.execute(sql) content_=mrs("content") %> <%=xrs("title")&" "&mrs("title")%> 順德家具網--家具人博客
您現在的位置:順德家具網 >> 家具博客 >>"><%= mrs("title") %>
<%=xrs("title")%>
<% content =replace(xrs("content"),"","</script>") content =replace(content,"","</script>") content =replace(content,"
<%=content%>
 閱讀數(<%=xrs("view")%>) 發表于:<%=formatdatetime(xrs("addtime"),2)%>  " target="_blank">查看評論(<%=GetPingNum(xrs("hidd"),xrs("id"))%>)  發表評論
文章評論:(最新5條) 更多評論>>
<% sql="select top 5 uname,content,addtime from bl_pinglun where bid=" &id & " order by addtime desc,id desc" set rs=conn.execute(sql) do while not rs.eof content=rs("content") %>
[<%= rs("uname") %>]: <%=rs("addtime") %>    
<%=content %>
<% rs.movenext loop %>

發表評論

您的稱呼: " />

評論內容:

驗證碼: 看不清楚,換一個^_^ 

     

個人檔案
" width="80" height="80" />
<%=mrs("uname")%>
<% if len(content_)>105 then Response.Write(left(content_,105)&"...") else Response.Write(content_) end if %>
168彩票群