<!--#include file=CONN.ASP-->
<!--#include file=cookies.asp-->
<%
dim rs,sql,id
id=trim(request("id"))
set rs=server.createobject("adodb.recordset")
sql="select tj,data from [FOX_link] where id="&id&""
rs.open sql,conn,1,3
if rs("tj")=1 then
rs("tj")=0
elseif rs("tj")=0 then
rs("tj")=1
end if
rs("data")=now()
rs.update
response.write "<script language=JavaScript>" & chr(13) & "alert('ÐÞ¸Ä³É¹¦£¡');" &"window.location='listlink.asp'" & "</script>"
%></body></html>