<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file = "tuzh_pri.asp"-->
<!--#include file="../setup.asp" -->
<!--#include file="../connadmin.asp"-->
<%
id = request("id")
sql = "select * from friendly_link_img where id="&id
Set rs = server.CreateObject("adodb.recordset")
rs.Open sql, conn, 1, 3
title = request.Form("title")
url = request.Form("url")
logo = request.Form("logo")
order_id = request.Form("order_id")
If title = "" Then
    response.Write("<script language=javascript>alert('网站名称不能为空！');history.go(-1)</script>")
    response.End
End If
If url = "" Then
    response.Write("<script language=javascript>alert('链接地址不能为空！');history.go(-1)</script>")
    response.End
End If
If logo = "" Then
    response.Write("<script language=javascript>alert('网站logo不能为空！');history.go(-1)</script>")
    response.End
End If
If order_id = "" Then
    response.Write("<script language=javascript>alert('排序数字不能为空！');history.go(-1)</script>")
    response.End
End If
If Not IsNumeric(request("order_id")) Then
    response.Write("<script language=javascript>alert('排序字符必须为数字！');history.go(-1)</script>")
    response.End
End If
rs("title") = title
rs("url") = url
rs("logo") = logo
rs("order_id") = order_id
rs.update
rs.Close
response.Write "<script>alert('修改成功！');window.location.href='links.asp';</script>"
%>
