manage_editlink.asp

简洁清爽的网站管理管理系统,基本功能都具备了

<!--#include file="conn.asp"-->
<!--#include file="admin.asp"-->
<%if Request.QueryString("mark")="southidc" then

id=request("id")
name=request("name")
note=Request("note")
link=Request("link")

If name="" Then
response.write "SORRY <br>"
response.write "请输入网站名称"
response.end
end if
If note="" Then
response.write "SORRY <br>"
response.write "网站说明不能为空"
response.end
end if
If link="http://" Then
response.write "SORRY <br>"
response.write "连接地址不能为空"
response.end
end if

Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from links where id="&id
rs.open sql,conn,1,3

rs("name")=name
rs("note")=note
rs("link")=link
rs.update
rs.close
response.redirect "Manage_link.asp"
end if
%>
<%
id=request.querystring("id")
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "Select * From links where id="&id, conn,3,3
%>
<!-- #include file="Inc/Head.asp" -->
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
  <tr> 
    <td align="center" valign="top"> <br> <strong><br>
      </strong> <br> <br> <table width="560" border="0" cellpadding="2" cellspacing="1" class="table_southidc">
        <tr> 
          <td height="25" class="back_southidc"> 
            <div align="center"><strong>修改友情链接 <br>
              </strong></div></td>
        </tr>
        <tr> 
          <form method="post" action="Manage_editlink.asp?mark=southidc">
            <input type=hidden name=id value=<%=id%>>
            <td><div align="center"> 
                <table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#ECF5FF">
                  <tr> 
                    <td width="8%" height="25" bgcolor="#A4B6D7"> 
                      <div align="center">网站名称</div></td>
                    <td width="62%">
<input name="name" type="text" id="name" value="<%=rs("name")%>" size="35" maxlength="40">
                    </td>
                  </tr>
                  <tr> 
                    <td height="22" bgcolor="#A4B6D7">
<div align="center">网站说明</div></td>
                    <td>
<input name="note" type="text" id="note" value="<%=rs("note")%>" size="50" maxlength="120">
                    </td>
                  </tr>
                  <tr> 
                    <td height="22" bgcolor="#A4B6D7"> 
                      <div align="center">连接地址</div></td>
                    <td> 
                      <input name="link" type="text" id="link" value="<%=rs("link")%>" size="35" maxlength="40">
                    </td>
                  </tr>
                  <tr> 
                    <td height="25" colspan="2" bgcolor="#E3E3E3"> 
                      <div align="center"> 
                        <input name="submit" type="submit" value="确定">
                        &nbsp; 
                        <input name="reset" type="reset" value="从来">
                      </div></td>
                  </tr>
                </table>
              </div></td>
          </form>
        </tr>
      </table></td>
  </tr>
</table>
<!-- #include file="Inc/Foot.asp" -->