📄 moveads.asp

📁 模块及功能： 1.汽车新闻分类.查询.翻页 2.出售信息搜索.评估.地区展示.发布.展示.固顶.刷新 3.求购信息发布.展示.固顶.刷新 3.加盟商家管理注册.登录.信

💻 ASP

字号:

<!--#include file="conn.asp"-->
<!--#include file="session1.asp"-->
<html>
<head>
<title>邮编管理</title>
<script>
function IsDigit()
{
  return ((event.keyCode >= 48) && (event.keyCode <= 57));
}
</script>
<meta http-equiv="目录类型" content="文本/html; 字符集=gb2312">
<link href="css/style.css" rel="stylesheet" type="text/css">
</head>
<body>
<center>
<table cellpadding="3" cellspacing="1" border="0" width="100%" class="tableBorder" align=center>
 <form method="post" action="savemoveads.asp?action=update">
   <tr> 
	<th class="tableHeaderText" colspan=5><span lang="zh-cn">移动公告管理</span></th>	
   </tr>
      <tr align=center> 
        <td class="forumRowHighlight">序号</td>
        <td class="forumRowHighlight">公告名称</td>
        <td class="forumRowHighlight">公告链接</td>
        <td class="forumRowHighlight">排序</td>
        <td class="forumRowHighlight">删除</td>
      </tr>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "SELECT  * from moveads order by newsorder desc",conn,1,1
if rs.recordcount=0 then 
%>
      <tr> 
        <td colspan="5" height=25 align="center" width="100%" class="forumRowHighlight"> 还没有添加移动公告</td>
      </tr>
<%
else
    do while not rs.eof
%>
      <tr height=25> 
        <td align=center class="forumRowHighlight"><%=rs("ID")%></td>
        <td align=center class="forumRowHighlight"> 
          <input type="hidden" name="id" value="<%=rs("id")%>">
          <input class=text type="text" name="newsname" size="16" value="<%=trim(rs("newsname"))%>">
        </td>
        <td align=center class="forumRowHighlight"> 
          <input class=text type="text" name="newslink" size="16" value="<%=trim(rs("newslink"))%>" ></td>
        <td align=center class="forumRowHighlight"> 
          <input class=text type="text" name="newsorder" size="10" value="<%=rs("newsorder")%>" ONKEYPRESS="event.returnValue=IsDigit();" >
        </td>
        <td align=center class="forumRowHighlight"> 
          <a href="Killmoveads.asp?id=<%=rs("id")%>">删除</a> 
        </td>
      </tr>
      <%
    rs.MoveNext
    Loop
%>
      <tr> 
        <td colspan="5" height=25 align="center" width="100%" class="forumRowHighlight"> 
          <input class="button" type="submit" name="Submit2" value="保存修改" style="font-family: 宋体; font-size: 9pt" >
          &nbsp; 
          <input class="button" type="reset" value="重新设定" style="font-family: 宋体; font-size: 9pt" name="重置" >
        </td>
      </tr>
<%
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
    </form>
    <form method="post" action="savemoveads.asp?action=add">
      <tr height=25> 
        <td align=center class="forumRowHighlight">添加<span lang="zh-cn">移动公告</span></td>
        <td align=center class="forumRowHighlight"> 
          <input class=text type="text" name="newsname" size="16">
        </td>
        <td align=center class="forumRowHighlight"> 
          &nbsp;<input class=text type="text" name="newslink" size="10" ></td>
        <td align=center class="forumRowHighlight"> 
          <input class=text type="text" name="newsorder" size="10" ONKEYPRESS="event.returnValue=IsDigit();"></td>
        <td align=center class="forumRowHighlight"> 
          <input class="button" type="submit" name="Submit3" value="添加" style="font-family: 宋体; font-size: 9pt">
        </td>
      </tr>
    </form>
  </table>
</center>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -