edit.asp

来自「这个程序是卡页连接联盟当前在使用的最新全站程序.本站是一套全新概念的自助友情链接」· ASP 代码 · 共 81 行

<link rel="stylesheet" href="../style.css" type="text/css">
<!--#include file="session.asp" -->
<!--#include file="conn.asp" -->
<%
edit=trim(request("edit"))
if edit="save" then
set rs=Server.CreateObject("Adodb.Recordset")
sql = "Select * from MB_Linkun where L_ID=" & request("id") & ""
rs.open Sql,my_conn,1,3
if rs.eof then
response.write"<script>alert('对不起，无用户资料！');history.back();</script>"
response.end
else if trim(request("title"))="" then 
response.write"<script>alert('你没有填写完整的信息,请返回填写');history.back();</script>"
response.end
else
rs("L_Title")=trim(request("title"))
rs("L_Class")=trim(request("fenlei"))
rs("L_Url")=trim(request("Url"))
rs.update
response.write "<script>alert('网站修改成功！');location.href='list.asp';</Script>"
Response.End
rs.close
end if
end if
else
set rs = server.CreateObject("adodb.recordset")
sql = "Select * from MB_Linkun where L_ID=" & request("id") & ""
rs.open Sql,my_conn,1,1
end if
%><p align="center"><br>
<br>
[<a href="list.asp">返回管理菜单</a>]
</p>
<form action=edit.asp?id=<%=request("id")%> method=post name=reg>
  <div align="center">
    <center>
    <table border="1" cellpadding="3" cellspacing="0" width="500" bordercolor="#ACACAC" height="130" style="border-collapse: collapse">
      <tr>
        <td colspan="2" height="16" bgcolor="#BCBCBC" width="492">
          <p align="center"><font color="#FFFFFF">文章信息修改</font></td>
      </tr>
      <tr>
        <td width="83" height="19" bgcolor="#DEDEDE">网站名称：</td>
        <td width="415" height="19" bgcolor="#DEDEDE">
        <input name="title" type="text" id="title" value=<%=rs("l_Title")%> size="38" style="border: 1px solid #ACACAC"></td>
      </tr>
      
         <tr>
        <td width="83" height="3" bgcolor="#DEDEDE">网站分类：</td>
        <td width="415" height="3" bgcolor="#DEDEDE"><select size="1" name="fenlei" style="border: 1px solid #ACACAC">
      <option value="<%=rs("l_Class")%>"><%=rs("l_Class")%></option>
      <option value="1">门户类</option>
      <option value="2">娱乐类</option>
      <option value="3">博客类</option>
      <option value="4">IT类</option>
      <option value="5">文教类</option>
      <option value="6">公司类</option>
      <option value="7">生活类</option>
      <option value="8">商业类</option>
      <option value="9">导航类</option>
      <option value="0">其他类</option>
      </select></td>
      </tr>
      
      <tr>
        <td width="83" height="5" bgcolor="#DEDEDE">网站地址：</td>
        <td width="415" height="5" bgcolor="#DEDEDE">
        <input name="Url" type="text" id="Url" value=<%=rs("l_Url")%> size="38" style="border: 1px solid #ACACAC"></td>
      </tr>
      
      <tr>
        <td height="1" colspan="2" align="center" bgcolor="#BCBCBC">
        <input type="hidden" name="edit" value="save">
        <input type="submit" value=" 提 交 " name="B1" style="color: #FFFFFF; border: 1px solid #DEDEDE; background-color: #ACACAC">&nbsp; 
        <input type="button" value=" 返 回 " onclick=javascript:history.go(-1) style="color: #FFFFFF; border: 1px solid #DEDEDE; background-color: #ACACAC"></td>
      </tr>
    </table>
    </center>
  </div>
</form>