إجراءات الوظيفة:
نسخة الكود كما يلي:
<٪
'Del.asp
Dimfso ، tmpfolder ، tmpsubfolder ، tmpfile ، tmpfiles
setfso = server.createObject ("scripting.filesystemObject")
Subdelfolder (Spath)
if (fso.folderexists (server.mappath (Spath))) ثم
SESTMPFOLDER = fso.getfolder (server.mappath (Spath))
SESTMPFILES = tmpfolder.files
foreachtmpfileintmpfiles
fso.deletefile (tmpfile)
التالي
SettMpsubfolder = tmpfolder.subfolders
foreachtmpfolderintmpsubfolder
Response.writespath & "/" & tmpfolder.name & "<br>"
Delfolder (Spath & "/" & tmpfolder.name)
التالي
fso.deletefolder (server.mappath (Spath))
Endif
ينتهي
٪>
طريقة الاتصال:
نسخة الكود كما يلي:
<٪
مثال اتصل
يتم وضع Del.asp على نفس مستوى الدليل الذي سيتم حذفه. يوجد الدليل المراد حذفه وهناك العديد من الدلائل الفرعية والملفات تحتها. يجب أن يكون لديك أذونات التعديل للدليل.
Delfolder ("اسم الدليل")
٪>