'================================================================
اسم الوظيفة: CheckFile
"الوظيفة: تحقق مما إذا كان هناك ملف
'المعلمة: اسم الملف ------- عنوان الملف مثل: /swf/1.swf
'قيمة الإرجاع: خطأ --- صحيح
'================================================================
PublicFunctionCheckfile (اسم الملف)
onerrorresumenext
dimfsoobj
setFsoObj = server.createObject ("scripting.filesystemObject")
ifnotfsoobj.filexists (server.mappath (اسم الملف)) ثم
checkFile = false
exitfunction
Endif
CheckFile = true: setFsoObj = لا شيء
الوظيفية