28,390
社区成员
发帖
与我相关
我的任务
分享
<%
dim str,sourcepath
str=Trim(Request.Form("textfield"))
sourcepath=Server.MapPath(str)
if len(str)>0 then
dim fso
SET fso=Server.CreateObject("scripting.filesystemobject")
if fso.fileexists(str) then
fso.deletfile(sourcepath)
Response.Write("文件已删除")
end if
else
Response.Write("请输入您要删除的文件名")
end if
set fso=nothing
%>
TRY THIS AGAIN, SHOULD BE WORKING