<!--#include file="Inc.asp"-->
<!--#include file="ydzq.asp"-->
<!--#include file="forbbs.asp"-->
<%call head()
tid=request.QueryString("tid")
bbsid=request.QueryString("bbsid")
qrr=request.QueryString("qr")
shh=request.QueryString("sh")

call saycarda("+帖子链接审核+")


If shh=1 Then
 response.write"+帖子链接去除审核+<br/>----------------<br/>"
 set rs=Server.CreateObject("ADODB.Recordset")
rs.open"select * from sell where yc=0 and id="&tid,conn,1,1
if rs.eof then 
  Call Error("没有这个帖子！")
  end If
tidname=rs("name")
tidtxt=replace(replace(rs("txt"),"[/url]", "[/url待审核]"),"(/url)", "(/url待审核)")
rs.close
Set rs=Nothing

 If qrr=1 then
 set rs=Server.CreateObject("ADODB.Recordset")
rs.open"select * from sell where yc=0 and id="&tid,conn,1,2
rs("txt")=tidtxt
rs.update
rs.close
Set rs=Nothing
response.write"成功将帖子["&tidname&"]的链接更改为未审核!"
 Else
 response.write"<a href='topicsh.asp?sh="&shh&"&amp;tid="&tid&"&amp;sid="&sid&"&amp;qr=1&amp;bbsid="&bbsid&"&amp;saytk="&saytk&"'>确定</a>|"

Response.write "<a href='/bbs/topic.asp?tid="&tid&"&amp;sid="&sid&"&amp;bbsid="&bbsid&"&amp;saytk="&saytk&"'>取消</a>"
 End If

Else
 response.write"+帖子链接审核+<br/>----------------<br/>"
 set rs=Server.CreateObject("ADODB.Recordset")
rs.open"select * from sell where yc=0 and id="&tid,conn,1,1
if rs.eof then 
  Call Error("没有这个帖子！")
  end If
tidname=rs("name")
tidtxt=replace(replace(rs("txt"),"[/url待审核]", "[/url]"),"(/url待审核)", "(/url)")
rs.close
Set rs=Nothing

 If qrr=1 then
 set rs=Server.CreateObject("ADODB.Recordset")
rs.open"select * from sell where yc=0 and id="&tid,conn,1,2
rs("txt")=tidtxt
rs.update
rs.close
Set rs=Nothing
response.write"成功审核帖子["&tidname&"]的链接!"
 Else
 response.write"<a href='topicsh.asp?tid="&tid&"&amp;sid="&sid&"&amp;qr=1&amp;bbsid="&bbsid&"&amp;saytk="&saytk&"'>确定</a>|"

Response.write "<a href='/bbs/topic.asp?tid="&tid&"&amp;sid="&sid&"&amp;bbsid="&bbsid&"&amp;saytk="&saytk&"'>取消</a>"
 End If
 End if


 rs1.close
 Set rs1=Nothing
 Response.write "<br/><a href='/bbs/topic.asp?tid="&tid&"&amp;sid="&sid&"&amp;fid="&fid&"&amp;bbsid="&bbsid&"&amp;saytk="&saytk&"'>返回帖子</a>"
 %><!--#include file="fanhui.asp"-->
 <%
call headsay()

%>