www.gusucode.com > 中网景企业网站源码时尚版 2009.73码程序 > admin/catalog.asp
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="upload_del_file.asp" -->
<%
'管理员删除-----------
if Request.QueryString("del")="yes" then
del_img "../download/","catalog.rar"
Response.Write("<script>alert('删除成功');</script>")
end if
'删除结束---------------
function del_img(path,filename)
whichfile=server.mappath(path&filename)
Set fs = CreateObject("Scripting.FileSystemObject")
Set thisfile = fs.GetFile(whichfile)
thisfile.Delete True
end function
%>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="admin.css" rel="stylesheet" type="text/css">
<script language="JavaScript">
<!--
function cform(){
if(!confirm("您确认删除吗? 请注意删除后无法恢复!"))
return false;
}//-->
</script>
</head>
<body bgcolor="#FFFFFF" leftmargin="0" topmargin="0">
<div align="center">
<table width="96%" border="0" align="center" class="px14">
<tr>
<td> </td>
</tr>
<tr>
<td align="center" bgcolor="#669900"><font color="#FFFFFF">上传产品目录（catalog）</font></td>
</tr>
</table>
<table width="96%" border="0">
<tr>
<td valign="top">
<table width="100%" border="0" cellspacing="1">
<form method="post" name="form2" onSubmit="return validata_form()">
<tr bgcolor="#f0f0f0">
<td align="center">
<br>
请用WinRAR把文件压缩成.rar文件，然后点上传按钮<br>
<br>
注意：只能上传
.rar 格式文件，每次上传会把已存在的文件覆盖<br>
<br>
<br>
<input name="Submit44" type="button" class="input" onClick="window.open('catalog_upload.asp?formname=form1&editname=kucun&filelx=rar','','status=no,scrollbars=no,top=20,left=110,width=420,height=165')" value="上传"><br>
<br>
<br>
<a href="?del=yes" onClick="return cform()">删除已经上传的文件</a><br></td>
</tr>
</form>
</table></td>
</tr>
</table>
</div>
</body>
</html>