Правильная обработка обратной косой черты в имени папок.

При вызове свойства Path объекта App оно возвращает значение, содержащее "\" на конце или не содержащее в зависимости от того, где находится директория приложения (в первом случае в корне диска). Подобные ситуации могут возникнуть и при работе с другими объектами.

Выход из ситуации лежит в использовании малюсенькой функции:

Public Function RightPath$(Path$)
 RightPath=IIf(Right$(Path,1)="\",Path,Path + "\")
End Function

Юрасов Михаил