Just make it into a file! , suggest the owner add essence! Keywords: Use FSO to browse file directories by file size and delete operations-as
Source: Internet
Author: User
<%@ Language=vbscript%>
<%Server.ScriptTimeout=50000%>
<HTML>
<HEAD>
<meta name= "generator" content= "Microsoft Visual Studio 6.0" >
<meta http-equiv= "Content-type" content= "text/html; charset=gb2312 ">
</HEAD>
<BODY>
<%
function Judgepararegular (IntID)
If intid<> "" and IsNumeric (IntID) Then
Judgepararegular=intid
Else
Response.Write "Input Error!" "
Response.End
End If
End Function
Intfilesize=judgepararegular (Request.QueryString ("Intfilesize"))
Strpath=request.querystring ("strpath")
If InStr (strpath, ":") =0 then Strpath=server. MapPath (strpath)
%>
<%
function Deletefiles (path)
On Error Resume Next
Set fs=server.createobject ("Scripting.FileSystemObject")
If Fs. FileExists (PATH) Then
Fs. DeleteFile Path,true
Response.Write "Successfully deleted" &path
Else
Response.Write "File does not exist!"
End If
Set fs=nothing
If Err.number<>0 then Response.Write err.number
End Function
Strfile=request ("strfile")
If Request ("strfile") <> "then
Deletefiles strfile
The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion;
products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the
content of the page makes you feel confusing, please write us an email, we will handle the problem
within 5 days after receiving your email.
If you find any instances of plagiarism from the community, please send an email to:
info-contact@alibabacloud.com
and provide relevant evidence. A staff member will contact you within 5 working days.