aspºÍfsoʵÏÖɾ³ýÎļþ»òÎļþ¼Ð
'--------------------------------------------------------------------------------------1.asp
<!--#include file="function.asp" -->
<script>
function checkAll(){
for (i=0;i<document.forms[1].length;i++){
if (document.forms[1][i].tagName=="INPUT"){
if (document.forms[1][i].type=="checkbox")
{document.forms[1][i].checked="checked"}
}
}
}
</script>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<form name="form2" action="delf.asp" method="post" onsubmit="if (confirm('ÊÇ·ñɾ³ýÑ¡ÔñµÄÎļþ»òÎļþ¼Ð')) {return true} else {return false}">
<input type="hidden" name="whatdo" value="DelFiles"/>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td bgcolor="#ff9600" colspan="5"height="2"></td>
</tr><%
AttPath=Request.QueryString("AttPath")
if len(AttPath)<1 then
AttPath="uploadfile"
elseif bc(server.mapPath(AttPath),server.mapPath("uploadfile")) then
AttPath="uploadfile"
end If
ArrFolders=split(getPathList(AttPath)(0),"*")
Arrfiles=split(getPathList(AttPath)(1),"*")
'response.write (AttPath&"<br>")
if AttPath<>"uploadfile" then
arrUpFolders=split(AttPath,"/")
for i=0 to ubound(arrUpFolders)-1
arrUpFolder=arrUpFolder&TempF&arrUpFolders(i)
TempF="/"
next
end if%>
<tr>
<td height="30" align="left" valign="middle"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr> <td width="9%" align="center"><a href="keshikongjian.asp"><img src="images
Ïà¹ØÎĵµ£º
µÚÈý¸öÀà,ÊÇÊý¾Ý¿âÁ¬½ÓÀà,Õâ¸ö¿ÉÒÔ¿´×öÊǸºÔð×îµ×²ãµÄÊý¾Ý¿â·ÃÎʵÄÒ»¸ö¶ÔÏó,²¢²»ÊôÓÚÊý¾Ý²ã. ËüÖ»ÊÇÒ»¸ö¹¤¾ß,¶ø²»Éæ¼°µ½ÈκιØÓÚÊý¾Ý¿âÄÚÈݵÄÂß¼.
ÔÙ´ÎÖØÉêÒ»ÏÂ,ÕâÈý¸öÀà,Ö»ÊÇÔÚASPÈý²ã¼Ü¹¹ÖеÄÈý´ó»ù±¾¶ÔÏó,ÏóÕâÖÖ¶ÔÏó,ÎÒÔÚ¾ßÌåµÄÒµÎñ ......
Win2003ÏÂAsp¡¢IISÅäÖü¼ÇÉ
¡¡¡¡windows 2003·ÛÄ«µÇ³¡£¬ºÜ¶à¸Ïʱ÷ÖµÄÓû§ÒѾÔç¾ÍÊÔÓÃÁË£¬µ«¾¡¹Ü2003ºÅ³Æ°²È«ÐÔÓкܴóÍ»ÆÆ£¬µ«ÆäĬÈÏÖ§³Ö.net¼Ü¹¹£¬¶øÅ×ÆúʹÓÃÁ˺ܾõĴóÖÚ»¯µÄAspµÄ·Ïßȱ±¥ÊÜÖÊÒÉ£¬ÐèÒªÎÒÃÇÊÖ¶¯È¥ÅäÖúܶණÎ÷¡£
¡¡¡¡ÔÚ IIS 6.0 ÖУ¬Ä¬ÈÏÉèÖÃÊÇÌرðÑϸñºÍ°²È«µÄ£¬ÕâÑù¿ÉÒÔ×î´óÏ޶ȵ ......
<%
Response.Buffer = true
Response.Clear
dim url
Dim fso,fl,flsize
dim Dname
Dim objStream,ContentType,flName,isre,url1
Dim strFileName
strFileName=replace(replace(Request("file"),"\",""),"/","") '´«²Î
strFileName="/files/"&strFileName ' ¸Ä³ÉÄãÄãÎļþµÄ´æ ......
µ¥Î»ÓÐһ̨ÏÐÖÃµÄ¾É IBM Netfinity 7000 µÄ·þÎñÆ÷£¬Ë« Pentium Pro 200 MHz CPU£¬512 MB Äڴ棬һ¸ö 9.1 GB ºÍÎå¸ö 4.5 GB µÄ SCSI Ó²ÅÌ¡£ÎÒÏ뽫Æä·ÏÎïÀûÓÃһϣ¬ÓÚÊÇ£º
1. µ½ http://tw.releases.ubuntu.com/edgy/ ÏÂÔØ PC (Intel x86) server install CD £¬½«ÏÂÔصõ½µÄ ubuntu-6.10-server-i386.iso Îļþ¿Ì¼һÕÅ ......
±¾»úip[¿Í»§¶Ë]:
request.servervariables("remote_addr")
´ÓÄĸöÒ³Ãæתµ½µ±Ç°Ò³ÃæµÄ£º
Request.ServerVariables("HTTP_REFERER")
µÃµ½±¾Ò³µØÖ·£º
<%="http://" + Request.ServerVariables("SERVER_NAME") + ":" + Request.ServerVariables("SERVER_PORT") + reques ......