Как я могу проверить в VBScript в компоненте отчета, если файл изображения существует?

Question

У меня есть база данных с 2-мя альтернативными именами изображений pic1 и pic2. Если первый файл изображения не существует, я хочу напечатать второй.

в событии onFormat отчета я хочу сделать что-то вроде:

if FileExists (pic1) Тогда article.Picture=pic1 Остальное article.Picture=Pic2 EndIf

Но у меня ничего не получается, так как компонент one vbscript не так хорошо документирован

Answer 1

ОБНОВИТЬ

Движок C1Report VBScrit не поддерживает CreateObject, поэтому он не поддерживается в конструкторе отчетов.

---

В VBScript нет встроенных команд ввода-вывода. Вместо этого вы можете использовать FileSystemObject, чтобы проверить это. Используйте эту функцию, чтобы определить, существует ли файл:

Функция FileExists(filePath)
      Dim fso, существует Установите fso = CreateObject("Scripting.FileSystemObject")
      If (fso.FileExists(filePath)) Тогда существует = True Остальное существует = False
      End если FileExists = существует End Function

Используйте эту функцию в вашем редакторе VBScript