Тема: Ошибка "Файл не найден!" в процедуре IDocFiles.AddFile
Имя файла содержит символ "пробел".
Перед добавлением файла в документ обрамляю полный путь к файлу кавычками (пробовал и одинарные, и двойные):
If InStr(FileName, " ") > 0 Then FileName = """" & FileName & """" End If ' If InStr(FileName, " ")
Во время выполнения кода
Set DocFiles = NewDoc.Properties("FILES").AsIDispatch If Not DocFiles Is Nothing Then Err.Clear On Error Resume Next Call DocFiles.AddFile(FileName, -1) If Err Then TCSApp.ShowErrorMessage "Ошибка:" & vbNewLine & Err.Description End If On Error Goto 0 End If ' If Not DocFiles Is Nothing Set DocFiles = Nothing
Возникает ошибка
Файл '"C:\Import\ОСТ 92-0021-87.pdf"' не найден
Пробовал варианты и с AddFileEx - аналогичная ситуация.
Если передавать полный путь к файлу, содержащий пробел, без обрамления кавычками, на AddFile возникает ошибка
Ошибка при работе с файловым сервером
Такое поведение обнаружено в TechnologiCS v.5.7.0.0(10968), оно же повторяется
в TechnologiCS v.6.2.0.0(15917)
Подскажите, пожалуйста, как правильно добавлять в файловый состав документа файлы, содержащие пробел?
P.S. Понятное дело, что можно обойти эту особенность, копируя или переименовывая такие файлы с заменой символа "пробел" символом "подчёркивание". Но это лишняя возня с файлами... А если и путь к файлу содержит "пробел"?