www.gusucode.com > 共享世纪内容管理系统 2.1 build 080704 全站开源版 > admin/down_cx_add1.asp
<%Admin="DownAdd"%> <!--#include file="check.asp"--> <% if request("addok")="" then if request("k")="" then response.write "请输入查找内容" response.end else if request("d")<>"add" then response.redirect "down_sort.asp?k="&request("k")&"&id="&request("id")&"" response.end end if %> <!--#include file="mdb_path_down.asp"--> <% set rs=server.CreateObject("ADODB.RecordSet") rs.open "select id,cxn,cxv,reg from down where cxn like '%"&request("k")&"%' order by date desc",conn,1,1 if not rs.eof then do while not rs.EOF oldcx=oldcx&"[<a target=""_blank"" href=""../d/"&rs("id")&".html"">HTM页</a>][<a href=""javascript:makeHTML("&rs("id")&")"">生成</a>]·<a href=down_cx_edit.asp?id="&rs("id")&">"&rs("cxn")&" "&rs("cxv")&"</a>" if rs("reg")<>"" then oldcx=oldcx&"<font color=""#FF0000"">(有注册连接)</font>" end if oldcx=oldcx&"<br>" rs.MoveNext loop else rs.close set rs=nothing conn.close set conn=nothing response.redirect "down_cx_add.asp?cxn="&request("k")&"&id="&request("id")&"" end if rs.close set rs=nothing conn.close set conn=nothing end if end if %> <html> <head> <title>管理中心 -共享世纪新闻文章管理系统</title> <meta copy="WWW.2KY.CN 共享世纪"> <link rel="stylesheet" href="admin.css" type="text/css"> <script language="javascript"> function makeHTML(id) {window.open("down_makesoft.asp?type=page&id="+id,"","width=200,height=100,resizable=yes,scrollbars=yes,status=yes,toolbar=no,menubar=no,location=no");} </script> </head> <body topmargin="1" leftmargin="1"> <p align="center"> <form action="down_cx_add1.asp?d=add&id=<%=request("id")%>" method=post> <%if request("addok")<>"" then%> <table border="0" cellpadding="0" class="tableBorder" cellspacing="0" width="98%" align=center height="26"> <tr> <td width="100%" bgcolor="#7B9AE7" class="tableHeaderText" height="26">·<font color="#FF0000"><b><%=request("addok")%></b></font></td> </tr> </table> <%end if%> <table border="0" width="98%" cellspacing="1" align=center class="tableBorder" height="80"> <tr> <td width="200%" class="tableHeaderText" bgcolor="#7B9AE7" height="24"><font color="#FFFFFF"><b>添加软件 1/2</b></font></td> </tr> <tr> <td width="200%" align="right" bgcolor="#FFFFFF" height="22"> <p align="center">软件名称:<input type="text" size=40 name="k" value="<%=request("k")%>"> <input name="change" value="重新查找" type="submit"> <input type="button" onclick="location.href='down_cx_add.asp?cxn=<%=request("k")%>&id=<%=request("id")%>'" value="添加软件"></td> </tr> <%if oldcx<>"" then%> <tr> <td width="200%" bgcolor="#7B9AE7" class="tableHeaderText" height="23"><font color="#000080"><b>查找到数据库中已有相同的软件名</b></font></td> </tr> <tr> <td width="200%" height="1"><%=oldcx%></td> </tr> <tr> <td width="200%" class="tableHeaderText" bgcolor="#7B9AE7" height="24"></td> </tr> <%end if%> </table> </form> </body> </html>