<!--#include file="conn.asp"-->
<%
dim rs,sql,id
 id=int(request.QueryString("id"))
   set rs=server.CreateObject("adodb.recordset")
   sql ="Select * from kw_wt where id="&id
   rs.open sql,conn,1,1
   
   
if rs("userid")=session("userid") and rs("zt")=1 and DateDiff("d",rs("twtime"),now())>=15 then
response.Write("document.write('<a href=../../manyi.asp?wtid="&id&"><font color=#B7280F style=""font-size:14px"">无满意答案</font></a>&nbsp;&nbsp;&nbsp;&nbsp;');")
end if
   
if rs("userid")=session("userid") and rs("zt")=1 then
response.Write("document.write('<a href=../../memo.asp?id="&id&"&cz=bc target=_blank class=page>问题补充</a> | <a href=../../memo.asp?id="&id&"&cz=tg target=_blank class=page>提高悬赏</a>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;');")
end if

rs.close
set rs=nothing
closedb
%>