<% id=request("id") if request("action")="add" then userip = Request.ServerVariables("HTTP_X_FORWARDED_FOR") If userip = "" Then userip = Request.ServerVariables("REMOTE_ADDR") end if sql="select * from news_msg where news_id="&Id set rs=server.CreateObject("adodb.recordset") rs.open sql,conn,1,3 rs.addnew rs("news_id")=id rs("txt")=request("msg_txt") rs("user_id")=request.Cookies("userinfo")("userid") rs("user_name")=request.Cookies("userinfo")("username") rs("user_ip")=userip rs.update rs.close set rs=nothing response.Redirect("news_show.asp?id="&id) response.End() end if %> <%if request("action")="msg_up" then msgid=request("msgid") sql="update news_msg set ding=ding+1 where id="&msgid conn.execute (sql) response.Redirect("news_show.asp?id="&id) response.End() end if%> <%if request("action")="msg_down" then msgid=request("msgid") sql="update news_msg set cai=cai+1 where id="&msgid conn.execute (sql) response.Redirect("news_show.asp?id="&id) response.End() end if%> <% sql="update mall_product set liulancount=liulancount+1 where productid="&id conn.execute (sql) sql="select * from mall_product2 where productid="&id set rs=server.CreateObject("adodb.recordset") rs.open sql,conn,1,3 mystypeid=rs("stype_id") %> <%if not rs.eof then %><%=rs("productname")%><%end if%>-买车就上广州购车网 <%end if%>"/>
<%if not rs.eof then %> <%if trim(rs("memo"))<>"" then %> <%else%> <%end if %>
   [<%=rs("btype_name")%>] - [<%=rs("stype_name")%>]
<%=rs("productname")%>
广州购车网 发表时间:<%=rs("adddate")%> 
    <%=rs("memo")%>
<% MypageType=rs("pagetype") '0部分页 1自动分页 2手动分页 Myarticleid=rs("productid") '文章id Mycontent=rs("productcontent") '文章内容 Mylinkid="id" '下页链接的参数,比如?acticleid= ,所以填acticleid %>
<% call ShowArticleContent()%>
 
 
 
<%else%>
对不起,未找到该新闻,请确认!
<%end if rs.close set rs=nothing%>