<% data_path="../" 'ACC连接数据库路径，对SQL无效 %>
<!--#include file="../conn/conn.asp"-->
<!--#include file="../inc/safe.asp"-->
<%
dim info_id
dim hits
if Chkrequest(request("info_id")) then
info_id=request("info_id")
else
Response.Redirect ("../login/chklogin.asp?login=4")
end if
hits=replace(trim(request("hits")),"'","''")


conn.execute("update Yixiang_Info set hits=hits+1 where info_id="&info_id&"")

 
sql="select sortid,typeid,typeid_2,info_id from Yixiang_Info where info_id="&info_id&""
Set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1
if rs.eof then
response.write"<br><br><div align=center>此条信息已经删除或不存在</div>"
else
response.redirect (""&HOPE_InstallDir&"seller/offerdetail/"&rs("sortid")&"-"&rs("typeid")&"-"&rs("typeid_2")&"-"&rs("info_id")&".html")
end if
rs.close 
set rs=nothing
%>