⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 keywords_yp_add.asp

📁 实现一个用JSP、Servlet技术实现的小型物流网站系统。实现功能如下:管理员通过登录该系统
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%dbdns="../../"%>
<!--#include file="../../inc/conn.asp" -->
<!--#include file="../cook.asp"-->
<%if fla17<>1 then
response.write "<script>alert('操作权限出错,您没有权限操作些功能');history.go(-1);</Script>"
Response.End 
end if%>
<%  page=Trim(Request.QueryString("page"))
if page="" or not isnumeric(page) then
page=1
else
page=cint(page)
end if
keywordsID=request("keywordsID")
action=request("action")
cokey=request("cokey") %>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>添加企业</title>
<%= citycss %>
</head>

<body>
<table width="100%" border="0" cellspacing="0" cellpadding="10">
  <tr>
    <td><table width="99%" border="1" align="center" cellpadding="3" cellspacing="0" bordercolorlight="#cccccc" bordercolordark="#FFFFFF">
      <form name="form1" method="post" action="?KeywordsID=<%= keywordsID %>&action=search"><tr>
        <td align="left" bgcolor="#EFEFEF">搜索企业
          <input name="cokey" type="text" id="cokey">
          <input type="submit" name="Submit2" value="搜索"></td>
        </tr>
        <tr>
          <td align="left" bgcolor="#EFEFEF">请输入该企业名称的部分字符,搜索出相关列表后进行选择确认</td>
        </tr>
      </form>
    </table>
    </td>
  </tr>
  <% if action="search" then 
  %>
  <tr>
    <td>&nbsp;</td>
  </tr>
      <form name="form2" method="post" action="Keywords_yp_save.asp?KeywordsID=<%= keywordsID %>&action=add"><tr>
  <tr>
    <td>
	<table width="99%" border="1" align="center" cellpadding="3" cellspacing="0" bordercolorlight="#cccccc" bordercolordark="#FFFFFF">
        <tr bgcolor="#EFEFEF">
          <td align="left">选择</td>
          <td align="left">企业名称</td>
          </tr>
<%   set rs= Server.CreateObject("ADODB.Recordset")
  rs.open("select * from SMT_yp where SMT_coname like '%"&cokey&"%'"),conn,1,1
  if not rs.eof or not rs.bof then
  rs.pagesize=20
  if page>rs.pagecount then page=rs.pagecount
  rs.absolutepage=page 
  do while not rs.eof
 %>     <tr>
          <td width="4%" align="left"><input type="radio" name="ypid" value="<%= rs("SMT_id") %>"></td>
          <td align="left"><%= rs("SMT_Coname") %>&nbsp;</td>
          </tr>
  <% rs.movenext
  loop
  else%>
         <tr>
          <td colspan="2" align="right">没有找到企业</td>
        </tr>
  <%end if %>
    </table>
      <div align="center"><br>
        <input type="submit" name="Submit" value="确定">
      </div></td>
  </tr></form>
  <% End If %>
</table>
</body>
</html>

⌨️ 快捷键说明

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