<!--#include file="../inc/CONN.asp" -->
<%
if request("active")="ok" then
Title=replace(checkchar(trim(request("Title")))," "," ")
keyword=int(checkchar(trim(request("keyword"))))
url=checkchar(trim(request("url")))
sql="SELECT * FROM Lei_A order by key_id asc"
Set rs=Server.CreateObject("adodb.recordset")
rs.Open sql,conn,1,3
rs.addnew
rs("keyword")=keyword
rs("Title")=Title
rs("url")=url
rs.update
rs.close
response.write "<script>alert('处理成功!');location.href='modi.asp';</script>"
response.end
end if
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>疯鸟管理-首页</title>
<link href="../style/style.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="8">
<table cellpadding="2" cellspacing="0" border="0" width="95%" align="center">
<tr bgcolor="2595CF">
<td height=25 bgcolor="#FFFFFF"><%=M_liststr%></td>
</tr>
<tr bgcolor="2595CF">
<td><img src="../Images/1px.gif" width="1" height="2"></td>
</tr>
</table>
<table cellpadding="5" cellspacing="1" border="0" width="95%" align="center">
<form name="modi" method="post" action="">
<tr bgcolor="EEF7FC">
<td width="12%" height=2 align="right">关键字:</td>
<td><input name="keyword" type="text" id="keyword" size="50" maxlength="50"></td>
</tr>
<tr bgcolor="EEF7FC">
<td align="right">标题：</td>
<td><input name="Title" type="text" id="Title" size="55" maxlength="50"></td>
</tr>
<tr bgcolor="EEF7FC">
<td align="right">链接：</td>
<td><input name="url" type="text" id="url" size="70" maxlength="120"></td>
</tr>
<tr bgcolor="EEF7FC">
<td align="right"> </td>
<td><input type="submit" name="Submit" value="提交"> <input type="reset" name="Submit2" value="重置">
<input name="active" type="hidden" id="active" value="ok"> <input name="key_id" type="hidden" id="BorderID2" value="<%=key_id%>">
</td>
</tr>
</form>
</table>
</body>
</html>
