1.后台友情链接管理修正
连接频道,如果添加文字连接,在后台也默认为LOGO连接修正：
（Admin/admin_link.asp373行左右)
<%
if rs.eof and rs.bof then
  Response.Write("<tr align=""center""><td class=Hxcmsds colspan=8>当前没有链接！</td></tr>")
Else
   Dim art_Nums,MultiPages,i
   rs.PageSize=adflperpage
   rs.AbsolutePage=CurPage
   art_Nums=rs.RecordCount
   MultiPages="<tr><td class=Hxcmsqs colspan=""9"" align=""center"">共有【"&title&"】链接："&art_Nums&"个&nbsp;&nbsp;"&MultiPage(art_Nums,adflperpage,CurPage,Url_Add)&"</td></tr>"
Do Until Rs.EOF OR i=adflperpage
sql="select cat_name from Hx_Linkcat where cat_id="&rs("cat_id")
set rs2=conn.execute(sql)%>

 
红色部分改为：Flcat_id
******************************************************************************************
2.修正后台日志不能记录非法和错误登陆信息

admin.asp  的前面部分找到：【红色部分为新增】

         Response.Write("<script language=javascript>alert('您输入的用户名和密码不正确!！');this.location.href='admin.asp';</script>")
   set rs1=Server.Createobject("adodb.recordset")
   sql1="Select * from Hx_Log"
   rs1.open sql1,conn,3,3
   rs1.addnew
   rs1("Username")=adminname
   rs1("LoginIP")=userip
   rs1("OS")=vOS
   rs1("ErrorPas")=ReplaceBadWord(Request.form("adminpwd"))
   rs1("Result")="Error"
   rs1.update
   rs1.close
   set rs1=nothing
   elseif rs("lock")=1 then
  response.Write"<script language=javascript>alert(' 错误:帐号 "&rs("admin_name")&" 已被锁定,你不能登陆!请联系站长。');this.location.href='admin.asp';</script>"