link_add.asp

来自「java_blog是一个非常好的blog」· ASP 代码 · 共 58 行

ASP
58
字号
<%if session("admin")<>"" and Request.Cookies("admin")<>"" then%>
<html>
<head>
<meta http-equiv="Page-Exit" content="revealTrans(Duration=1.0,Transition=12)">
<link href="skin_1.css" rel="stylesheet" type="text/css">
<title>RanRan</title>
</head>
<body>
<form action="save.asp?action=l_add" method="post" name="add">
  <table width="310" border="0" cellpadding="2" cellspacing="0">
    <tr> 
      <td width="36"><div align="right">标题:</div></td>
      <td width="266"><input name="title" type="text" class=xndyk id="user" size="20" maxlength="15"> 
        <font color="#FF0000">*</font></td>
    </tr>
    <tr> 
      <td><div align="right">网址:</div></td>
      <td><input name="web" type="text"  class=xndyk id="title" size="20" maxlength="80"> 
      </td>
    </tr>
    <tr>
      <td>LOGO:</td>
      <td><input name="logo" type="text"  class=xndyk id="web" size="20" maxlength="80"></td>
    </tr>
    <tr> 
      <td valign="top"><div align="right"><a>简介:</a></div></td>
      <td><textarea name="jianjie" cols="38" rows="6"  class=xndyk id="jianjie"></textarea> 
        <font color="#FF0000"> *</font></td>
    </tr>
    <tr align="center"> 
      <td> </td>
      <td><div align="left"> 
          <input type="submit" name="Submit" value="添加链接"  class=xndyk>
          <input type="reset" name="Submit" value="重 填"  class=xndyk>
        </div></td>
    </tr>
  </table>
  <br>
  <table width="310" border="0" cellspacing="1" cellpadding="4">
    <tr>
      <td width="330"><div align="center"> 
          <p align="left"><font color="#FF0000"> 注意:</font>凡后面带 <font color="#FF0000">* 
            </font>号的表单为必填信息</p>
        </div></td>
    </tr>
  </table>
</form>
</body>
</html>
<%
'**********************************************************
' zhuzhu 1.0 Free        Power by zgrq.com
' Email:ringsbot@163.com       OICQ:500985
' 网站: http://www.zgrq.com   演示:http://www.zgrq.com
'**********************************************************
else
response.Redirect("a_admin.asp")
end if%>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?