admindown.asp

图文管理。1,新闻动态 2,网址导航(含有60个著名设计网址) 3,图片展示 4,会员注册管理等

   %>
         <tr>
           <td align="center"><%=rs("classname")%></td>
		   <td align="center"><%=rs("class")%></td>
		   <td align="center"><a href="?type=editclass&id=<%=rs("id")%>">修改</a>&nbsp;&nbsp;<a href="?action=delclass&id=<%=rs("id")%>">删除</a></td>
         </tr>
		 	  <% 
   rs.movenext
   loop
   set rs =nothing%>
</table>
	   
	   <form id="form1" name="form1" method="post" action="?action=addclass">
	   <table width="200" border="1" cellspacing="0" cellpadding="0">
         <tr>
           <td>
             <label>
               分类名称:<input name="classname" type="text" class="wubian" id="classname" size="20" />
&nbsp;        </label>
 <label>
             分类class值:<input name="class" type="text" class="wubian" id="class" size="4" />
&nbsp;              </label>
             <label>
             <input name="Submit" type="submit" class="wubian" value="添 加" />
             </label>           </td>
         </tr>
       </table></form>
	   
	   <%elseif request("type")="editclass" then
set rs1=server.CreateObject("adodb.recordset")
sql1="select * from downclass where id="&request("id")
rs1.open sql1,cn,1,3%>
  	<br /><form id="form3" name="form3" method="post" action="?action=cngclass&id=<%=rs1("id")%>">
	   <table width="200" border="1" cellspacing="0" cellpadding="0">
         <tr>
           <td>分类名称:
             
               <label>
                 <input name="classname" type="text" value="<%=rs1("classname")%>" class="wubian" size="12" />
               </label>
               *</td>
         </tr>
         <tr>
           <td>分类class值:
             <input name="class" type="text" value=<%=rs1("class")%> class="wubian" size="8" />
             *数字</td>
         </tr>
         <tr>
           <td align="center"><label>
             <input name="Submit3" type="submit" class="wubian" value="修 改" />
           </label></td>
         </tr>
       </table></form>
	   
    <%rs1.close
set rs1=nothing

elseif request("type")="adddown" then%>
	   <table  align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d  id=updown style="position:absolute;left:270;top:40;display:none">
<tr onMouseDown="MDown(updown)" style="cursor:move" height=22><td colspan="2" class=uptitle><b>&nbsp;<img src=images/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;上传文件</b>
<img onClick="document.all.updown.style.display=(document.all.updown.style.display=='none')?'':'none'" style="position:absolute;right:2;top:5;cursor:hand" border="0" src="images/close.gif" align=absMiddle></td></tr>
<tr class=bg>
<td align=center height=30><iframe frameborder=0 width=290 height=35 scrolling=no src="up.asp?action=down"></iframe></td>
</tr>
</table>
<table  align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d  id=updownpic style="position:absolute;left:270;top:40;display:none">
<tr onMouseDown="MDown(updown)" style="cursor:move" height=22><td colspan="2" class=uptitle><b>&nbsp;<img src=images/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;上传文件缩图</b>
<img onClick="document.all.updownpic.style.display=(document.all.updownpic.style.display=='none')?'':'none'" style="position:absolute;right:2;top:5;cursor:hand" border="0" src="images/close.gif" align=absMiddle></td></tr>
<tr class=bg>
<td align=center height=30><iframe frameborder=0 width=290 height=35 scrolling=no src="up.asp?action=downpic"></iframe></td>
</tr>
</table>
	   <form id="form2" name="form2"  method="post" onSubmit="return chk();" action="?action=add">
&nbsp;&nbsp;文件标题:
<label>
<input name="title" type="text" class="wubian" id="title" size="46" />
</label>
<br />
&nbsp;&nbsp;文件地址:
<input name="url1" type="text" class="wubian" id="url1" size="40" />
&nbsp;
<button onClick="document.all.updown.style.display=(document.all.updown.style.display=='none')?'':'none'" class=wubian>上传文件</button>
<br />
&nbsp;&nbsp;文件缩图:
<input name="pic" type="text" class="wubian" id="pic" size="40" />
&nbsp;
<button onClick="document.all.updownpic.style.display=(document.all.updownpic.style.display=='none')?'':'none'" class=wubian>上传文件缩图</button>
<br />
&nbsp;&nbsp;文件分类:&nbsp;
<%call newclass("downclass")%>
<br />
&nbsp;&nbsp;文件大小:
<input name="size" type="text" class="wubian" id="size" size="16" />
<label>推荐指数:
<select name="commend" class=wubian>
  <option value="★☆☆☆☆">★☆☆☆☆</option>
  <option value="★★☆☆☆">★★☆☆☆</option>
  <option value="★★★☆☆" selected="selected">★★★☆☆</option>
  <option value="★★★★☆">★★★★☆</option>
  <option value="★★★★★">★★★★★</option>
</select>
</label>
<br/>
&nbsp;&nbsp;是否推荐：
<input name="best" type="radio" value="true" >
&nbsp;推荐&nbsp;
<input name="best" type="radio" value="false" checked>
&nbsp;不推荐
<%call html()%>
	   <br/>
	   &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<textarea name="content" id="content" style=display:none></textarea> <input name="new" type="submit" class="wubian" id="new" value="添 加">&nbsp;<input name="Submit2" type="reset" class="wubian" value="清 空" onClick="ClearReset()">
	  </form>
	   <script language="javascript">
function chk(){
document.all("content").value=IframeID.document.body.innerHTML;
if(document.form2.title.value==""){
alert("文件标题不能为空");
document.form.title.focus();
return false;}
if(IframeID.document.body.innerHTML==""){
alert("文件内容不能为空");
IframeID.document.body.focus();
return false;}
return true;}
</Script>
	   <%elseif request("type")="editdown" then
	   set rs1=server.CreateObject("adodb.recordset")
sql1="select * from down where id="&request("id")
rs1.open sql1,cn,1,2
	   %>
	     <table  align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d  id=updown style="position:absolute;left:270;top:40;display:none">
<tr onMouseDown="MDown(updown)" style="cursor:move" height=22><td colspan="2" class=uptitle><b>&nbsp;<img src=images/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;上传文件图片</b>
<img onClick="document.all.updown.style.display=(document.all.updown.style.display=='none')?'':'none'" style="position:absolute;right:2;top:5;cursor:hand" border="0" src="images/close.gif" align=absMiddle></td></tr>
<tr >
<td align=center height=30><iframe frameborder=0 width=290 height=35 scrolling=no src="up.asp?action=down"></iframe></td>
</tr>
</table>
<table  align=center border="0" cellpadding="0" cellspacing="0" rules=none class=3d  id=updownpic style="position:absolute;left:270;top:40;display:none">
<tr onMouseDown="MDown(updown)" style="cursor:move" height=22><td colspan="2" class=uptitle><b>&nbsp;<img src=images/ie.gif border=0 width=15 height=15 align=absMiddle>&nbsp;上传文件缩图</b>
<img onClick="document.all.updownpic.style.display=(document.all.updownpic.style.display=='none')?'':'none'" style="position:absolute;right:2;top:5;cursor:hand" border="0" src="images/close.gif" align=absMiddle></td></tr>
<tr class=bg>
<td align=center height=30><iframe frameborder=0 width=290 height=35 scrolling=no src="up.asp?action=downpic"></iframe></td>
</tr>
</table>
	   <form id="form2" name="form2" method="post" onSubmit="return chk();" action="?action=cng&id=<%=rs1("id")%>">
&nbsp;&nbsp;文件标题:
<label>
<input name="title" type="text" class="wubian" value="<%=rs1("title")%>" id="title" size="46" />
</label>
<br />
&nbsp;&nbsp;文件地址:
<input name="url1" type="text" class="wubian" value="<%=rs1("url1")%>" id="url1" size="40" />
&nbsp;
<button onClick="document.all.updown.style.display=(document.all.updown.style.display=='none')?'':'none'" class=wubian>上传文件</button>
<br />
&nbsp;&nbsp;文件缩图:
<input name="pic" type="text" class="wubian" value="<%=rs1("pic")%>" id="pic" size="40" />
&nbsp;
<button onClick="document.all.updownpic.style.display=(document.all.updownpic.style.display=='none')?'':'none'" class="wubian">上传文件缩图</button>
<br />
&nbsp;&nbsp;文件分类:&nbsp;
<%call editclass("downclass",rs1("class"))%>
<br />
&nbsp;&nbsp;文件大小:
<input name="size" type="text" class="wubian" id="size" value="<%=rs1("size")%>" size="16" />
推荐指数:
<label>
<select name="commend" class="wubian">
<option value="★☆☆☆☆" <%if rs1("commend")="★☆☆☆☆" then response.write "selected"%>>★☆☆☆☆</option>
<option value="★★☆☆☆" <%if rs1("commend")="★★☆☆☆" then response.write "selected"%>>★★☆☆☆</option>
<option value="★★★☆☆" <%if rs1("commend")="★★★☆☆" then response.write "selected"%>>★★★☆☆</option>
<option value="★★★★☆" <%if rs1("commend")="★★★★☆" then response.write "selected"%>>★★★★☆</option>
<option value="★★★★★" <%if rs1("commend")="★★★★★" then response.write "selected"%>>★★★★★</option>
</select>
</label>
<br/>
&nbsp;&nbsp;是否推荐：
<input name="best" type="radio" value="true" <%if rs1("best")=true then response.write "checked" end if%>>
&nbsp;推荐&nbsp;
<input name="best" type="radio" value="false" <%if rs1("best")=false then response.write "checked" end if%>>
&nbsp;不推荐
<%call html()%>
	   <br/>
	   &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<input name="new" type="submit" class="wubian" id="new" value="修 改">&nbsp;<input name="Submit2" type="reset" class="wubian" value="重 写" onClick="ClearReset()">
   <textarea name="content" id="content" style=display:none><%=Server.HtmlEncode(rs1("content"))%></textarea>
   </form>
   <script language="javascript">
function ax(){
IframeID.document.body.innerHTML=document.all("content").value;
document.all("content").value="";
}
function chk(){
document.all("content").value=IframeID.document.body.innerHTML;
if(document.form2.title.value==""){
alert("文件标题不能为空");
document.form.title.focus();
return false;}
if(IframeID.document.body.innerHTML==""){
alert("文件内容不能为空");
IframeID.document.body.focus();
return false;}
return true;}
</Script> 
    <%rs1.close
set rs1=nothing
end if%></td>
  </tr>
</table>
<!--#include file="bottom.asp"-->
 </body>
</html>