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

📄 type.asp

📁 全球商务网站系统介绍 GLOBALEC.COM.CN[生成HTML版] 系统概述: 软件名称:全球商务网站系统 当前版本:V1.0 最新版本:V1.1 运行环境:WINNT+(IIS)
💻 ASP
字号:
<%@ codepage ="936" %>
<%
if Request.Cookies("globalec")("globalecmaster")="" or Request.Cookies("globalec")("masterflag")="" then
response.write "<script language='javascript'>"
response.write"this.location.href='../login.asp';</SCRIPT>" 
response.end
end if
if instr(Request.Cookies("globalec")("masterflag"),"72")=0 then
response.redirect "../err.asp"
response.end
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>类别管理</title>
<link rel="stylesheet" type="text/css" href="../css/style.css">
<!--#include file="../../conn/conn.asp" -->
</HEAD>
<table width="98%" border="0" cellspacing="0" cellpadding="0" align=center class="tableBorder"> 
  <tr> 
     <th height=25 colspan="2" class="tableHeaderText">商业信息管理 </th> 
  </tr> 
  <tr> 
     <td colspan="2" class="forumRowHighlight"><p><B>注意</B>:<BR> 
         ①类别直接与发布的信息相关联,删除类别可能会影响到以前发布的专项商机信息。<BR> </td> 
  </tr> 
  <tr> 
     <td width="10%" height=25 class="forumRowHighlight"> <B>操作选项</B></td> 
         <FORM name=searchForm action="index.asp" method=post onsubmit="javascript:if(doSearch()==false) return false;"><td class="forumRowHighlight">
       关键字:<input name="keywords" type="text" value="<%=keywords%>">
&nbsp;所属类别:
<select name="typeid" size="1">  
<%
set rs1=conn.execute("select * from newsType")
do while not rs1.eof
response.write "<option value='"&rs1("typeid")&"'>"&rs1("type")&" 类信息</option>"&chr(13)+chr(10)
rs1.movenext
loop
rs1.close
%>
</select> <input type="submit" value="立刻查找" id=submit name=submit>
         </td></form>
  </tr>
  <tr>
    <td height=25 class="forumRowHighlight">&nbsp;</td>
	 <td class="forumRowHighlight"><a href="index.asp">管理商业信息</a> | <a href="addinfo.asp">添加商业信息</a> | <a href="type.asp">管理信息类别</a> | <a href="Class_Ok.asp?action=add_class_1">添加信息类别</a> | [<a href="javascript:location.reload()">刷新页面</a>] </td> 
  </tr> 
</table>
<%
set rssort=server.createobject("adodb.recordset")
sql="select * from newstype"
rssort.open sql,conn,1,1
%>
<br>
<table width="95%" border="0" cellspacing="1" cellpadding="3"  align=center class="tableBorder">
	<tr> 
	<th height="22">商业信息类别列表</th>
	</tr>
	<tr>
	  <td class="Forumrow"><TABLE border="0" width="100%" cellpadding="0">
        <TR>   
          <%
		  if rssort.eof then
response.Write"<br><br><div align='center'>暂无类别请<a href=class_ok.asp?action=add_class_1>添加</a></div><br><br>"
else
		  j=1
          do while not rssort.eof
          %>
          <td width="28%" height="25"><p style="line-height: 150%"><IMG src="../images_new/plus.gif" width="9" height="9"> <%=rssort("type")%> 〖<a href=class_ok.asp?action=edit_class_1&id=<%=rssort("typeid")%>><font color=#ff0000>修改</font></a>│<a href='class_ok.asp?action=del_class_1&id=<%=rssort("typeid")%>'><font color=#ff0000>删除</font></a>〗</td>
          <%if j mod 3 = 0 then %></tr><tr ><%end if%>
          <% rssort.movenext
             j=j+1
             loop
             rssort.close
             set rssort=nothing
			 end if
          %>
      </TABLE></td>
	</tr>
</table>
<br>
<!--#include file="../copy.asp" -->

⌨️ 快捷键说明

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