'==========================================================================
'Имя функции: CheckFile
'Function: проверьте, существует ли файл
'Параметр: имя файла ------- Адрес файла, такой как: /swf/1.swf
'Return Value: false --- true
'==========================================================================
PublicfunctionCheckfile (имя файла)
OnerRorResumenext
Dimfsoobj
Setfsoobj = server.createObject ("scripting.filesystemobject")
Ifnotfsoobj.fileexists (server.mappath (имя файла))
CheckFile = false
Выходная функция
Эндиф
Checkfile = true: setfsoobj = ничего
Конечная функция