Re: Обработка ошибок

Написал wOxxOm в 18/03/2008 20:36:17

sFileName="d:\sjdhgsjdhg\sdsdsd.jpg"
if dir(sFileName)="" then
  msgbox "No file"
else
  ActiveLayer.Import sFileName
endif

либо так:

on error resume next
err.clear
ActiveLayer.Import sFileName
if err.number then
  msgbox "No file"
endif