<!--#include file=CONN.ASP-->
<!--#include file=cookies.asp-->
<title>修改友情链接</title>
<link rel="stylesheet" type="text/css" href="images/fox.css">
<style type="text/css">
<!--
body {
	background-color: #CCCC99;
}
.style1 {color: #FF0000}
-->
</style>
<%
	dim sql
	dim rs
	dim id,ok,biaoti,neirong,tupic,yz
    id=request("id")
function HTMLEncode(fString)
if not isnull(fString) then
    fString = replace(fString, ">", "&gt;")
    fString = replace(fString, "<", "&lt;")
    fString = Replace(fString, CHR(32), "&nbsp;")
    fString = Replace(fString, CHR(9), "&nbsp;")
    fString = Replace(fString, CHR(34), "&quot;")
    fString = Replace(fString, CHR(39), "&#39;")
    fString = Replace(fString, CHR(13), "")
    fString = Replace(fString, CHR(10) & CHR(10), "</P><P> ")
    fString = Replace(fString, CHR(10), "<BR> ")
    'fString=ChkBadWords(fString)
    HTMLEncode = fString
end if
end function
	set rs=server.createobject("adodb.recordset")
	sql="select * from [FOX_link] where id="&cstr(id)
	rs.open sql,conn,1,3
    if request("ok")=1 then
    rs("biaoti")=request("biaoti")
    rs("tupic")=request("tupic")
    rs("neirong")=request("neirong")
    rs("yz")=request("yz")
    rs.update
    response.write "<script language=JavaScript>" & chr(13) & "alert('修改成功！');" &"window.location='listlink.asp'" & "</script>"
    response.end
    else
%>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%">
  <tr>
    <td width="78%">
  <div align="center">
    <center>
  <table width="100%" height="250" border="1" cellpadding="2" bordercolor="#F7F7F7">
    <FORM name=theForm method=POST action=editlink.ASP?ok=1&id=<%=request("id")%>>
    <tr bgcolor="#BDBEDE">
                      <td width="517" height="28" colspan="2" style="border-style: solid; border-width: 1" bgcolor="#CC3300">
                      <p class="style1" style="MARGIN-LEFT: 6px">
                <span style="font-size: 9pt"><font size="2">&nbsp;</font><font color="#FFFFFF">修改
				友情链接：</font></span></td>
              </tr>
    <tr>
                      <td bgColor="#f7f7f7" height="43" width="90" style="border-left-style: solid; border-left-width: 1; border-right-style: none; border-right-width: medium; border-top-style: solid; border-top-width: 1" align="center">
                      <span style="FONT-SIZE: 12px">
                      网站名称：</span></td>
                      <td bgColor="#f7f7f7" height="43" width="492" style="border-left-style: none; border-left-width: medium; border-right-style: solid; border-right-width: 1; border-top-style: solid; border-top-width: 1">
                      <p align="left">
                      <span style="FONT-SIZE: 12px">
                      <input name="biaoti" style="BACKGROUND-COLOR: #eeeeee; BORDER-BOTTOM: 1px solid #FFFFFF; BORDER-LEFT: 1px solid #a2a2a2; BORDER-RIGHT: 1px solid #ffffff; BORDER-TOP: 1px solid #a2a2a2; COLOR: #333333; tabIndex="1" value="<%=HTMLEncode(rs("biaoti"))%>" size="45" maxlength="50">
                      </span></td>
              </tr>
    <tr>
                      <td bgColor="#f7f7f7" width="90" style="border-left-style: solid; border-left-width: 1; border-right-style: none; border-right-width: medium" align="center">
                      <font style="font-size: 9pt">相关图片：</font></td>
                      <td bgColor="#f7f7f7" style="border-left-style: none; border-left-width: medium; border-right-style: solid; border-right-width: 1">
                      <span style="FONT-SIZE: 12px">
                      <input name="tupic" style="BACKGROUND-COLOR: #eeeeee; BORDER-BOTTOM: 1px solid #FFFFFF; BORDER-LEFT: 1px solid #a2a2a2; BORDER-RIGHT: 1px solid #ffffff; BORDER-TOP: 1px solid #a2a2a2; COLOR: #333333; tabIndex="1" value="<%=HTMLEncode(rs("tupic"))%>" size="45" maxlength="50"></span></td>
              </tr>
    <tr>
                      <td bgColor="#f7f7f7" width="90" style="border-left-style: solid; border-left-width: 1; border-right-style: none; border-right-width: medium" align="center">
                      链接<font style="font-size: 9pt">地址：</font></td>
                      <td bgColor="#f7f7f7" style="border-left-style: none; border-left-width: medium; border-right-style: solid; border-right-width: 1">
                      <span style="FONT-SIZE: 12px">
                      <input name="neirong" style="BACKGROUND-COLOR: #eeeeee; BORDER-BOTTOM: 1px solid #FFFFFF; BORDER-LEFT: 1px solid #a2a2a2; BORDER-RIGHT: 1px solid #ffffff; BORDER-TOP: 1px solid #a2a2a2; COLOR: #333333; tabIndex="1" value="<%=HTMLEncode(rs("neirong"))%>" size="45" maxlength="50"></span></td>
              </tr>
    <tr>
                      <td bgColor="#f7f7f7" width="90" style="border-left-style: solid; border-left-width: 1; border-right-style: none; border-right-width: medium" align="center">
                      链接状况：</td>
                      <td bgColor="#f7f7f7" style="border-left-style: none; border-left-width: medium; border-right-style: solid; border-right-width: 1">
                      <input type="radio" value="0" name="yz" <%if rs("yz")=0 then%>checked<%else%><%end if%>>未验证&nbsp;&nbsp; 
						<input type="radio" name="yz" value="1" <%if rs("yz")=1 then%>checked<%else%><%end if%>>通过验证&nbsp;&nbsp;
						<input type="radio" value="2" name="yz" <%if rs("yz")=2 then%>checked<%else%><%end if%>>未做好本站链接&nbsp;&nbsp; 
						<input type="radio" name="yz" value="3" <%if rs("yz")=3 then%>checked<%else%><%end if%>>链接地址错误&nbsp;&nbsp;
						<input type="radio" name="yz" value="4" <%if rs("yz")=4 then%>checked<%else%><%end if%>>内容不符合要求&nbsp;&nbsp;
						<input type="radio" name="yz" value="5" <%if rs("yz")=5 then%>checked<%else%><%end if%>>网站打不开
</td>
              </tr>              
    <tr valign="middle" bgcolor="#eeeeee">
                <td height="27" style="border-left-style: solid; border-left-width: 1; border-right-style: solid; border-right-width: 1; border-bottom-style: solid; border-bottom-width: 1" colspan="2"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
                  <tr>
                    <td><div align="center">
                      <input type="submit" value="确认修改" name="B1">
                    </div></td>
                    <td><div align="center">
                      <input type="reset" value="取消修改" name="B1">
                    </div></td>
                  </tr>
                </table></td>
              </tr>
			  <%
    end if
	rs.close
	conn.close
	set rs=nothing
	set conn=nothing
%>
</form>
  </table>
    </center>
  </div>
    </td>
  </tr>
</table></body></html>