<!--#include file="sd_mdb.asp"-->
<%
if session("User")="" then
	response.write"<SCRIPT language=JavaScript>alert('您尚未登录！');"
	response.write"location.href=""sd_admin_login.asp"";</SCRIPT>"
end if
%>
<%
dim action,sd_title,sd_url,sd_fenlei
sd_title=request("sd_title")
sd_url=request("sd_url")
action=request("action")
if action="add" then
if sd_title="" or sd_url="" then
Response.Write ("<script language=javascript>alert('请完整填写！');history.go(-1);</script>")
else
set r=server.createobject("adodb.recordset")
r.open "select * from sd_link",conn,1,3
r.addnew
r("sd_title")=sd_title
r("sd_url")=sd_url
r.update
r.close
set r=nothing
Response.Write ("<script language=javascript>alert('添加成功！');this.location.href='sd_link.asp';</script>")
Response.End
end if
end if
%>
<HTML>
<HEAD>
<TITLE>雨过天晴工作室 www.zzcodes.net</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"> 
<LINK href="images/Admin_css.css" type=text/css rel=stylesheet>
</HEAD>
<BODY>
<form action="sd_link_add.asp" method="post" name="form1">
<table height="1" border="0" cellpadding="3"  cellspacing="1" bgcolor="#F2F9E8" class="admintable1">
  <tr>
    <td colspan="2" class="admintitle">添加友情链接</td>
  </tr>
  <tr>
    <td width="20%" height="30" align="right" bgcolor="#FFFFFF">链接名称：</td>
    <td width="80%" bgcolor="#FFFFFF"><input name="sd_title" size="35"></td>
  </tr>
  <tr>
    <td height="30" align="right" bgcolor="#FFFFFF">链接地址：</td>
    <td bgcolor="#FFFFFF"><input name="sd_url" size="35"></td>
  </tr>
  <tr>
    <td height="30" align="right" bgcolor="#FFFFFF"></td>
    <td bgcolor="#FFFFFF"><input type="hidden" name="action" value="add"><input type="submit" value="确认添加"></td>
  </tr>
</table>
</form>
<!--#include file="sd_copy.asp"-->
</BODY> 
</HTML>