v8: Парсер гиперссылок
Приведен пример использования функций для работы со строковыми данными с помощью которых осуществляется разбор (парсинг) гиперссылки | Автор статьи: Neco | Редакторы: Гений 1С Последняя редакция №4 от 08.02.07 | |
Ключевые слова: Гиперссылка, парсить, HTTPСоединение, FTPСоединение
При написании конфигураций 1С, которые активно работают с Интернет часто возникает потребность разобрать гиперссылку. Предлагаемая функция парсит строку содержащую гиперссылку и возвращает в структуру имя сервера, протокол, имя файла и путь к файлу. Полезна для использования с объектами HTTPСоединение и FTPСоединение.
// Функция разбирает гиперссылку и возвращает структуру ссылки: // Сервер, Протокол, Имя файла и путь к файлу Функция ПарситьГиперссылку(Гиперссылка) Экспорт Возврат Новый Структура("Протокол,Сервер,ИмяФайла,ПутьКФайлу", // --- Протокол ?(Найти(Гиперссылка,"://")=0,"http",СтрПолучитьСтроку(СтрЗаменить(Гиперссылка,"://",Символы.ПС),1)), // --- Сервер ?(Найти(Гиперссылка,"://")=0, // если гиперссылка не полная СтрПолучитьСтроку(СтрЗаменить(Гиперссылка,"/",Символы.ПС),1), // если гипрессылка полная Сред(СтрПолучитьСтроку(СтрЗаменить(Гиперссылка,"://",Символы.ПС),2), 1, Найти(СтрПолучитьСтроку(СтрЗаменить(Гиперссылка,"://",Символы.ПС),2),"/") - 1)), // --- Имя файла СтрПолучитьСтроку(СтрЗаменить(Гиперссылка,"/",Символы.ПС),СтрЧислоСтрок(СтрЗаменить(Гиперссылка,"/",Символы.ПС))), // --- Путь к файлу ?(Найти(Гиперссылка,"://")=0, // если гиперссылка не полная СтрЗаменить(Гиперссылка,СтрПолучитьСтроку(СтрЗаменить(Гиперссылка,"/",Символы.ПС),1),""), // если гипрессылка полная Сред(СтрПолучитьСтроку(СтрЗаменить(Гиперссылка,"://",Символы.ПС),2), Найти(СтрПолучитьСтроку(СтрЗаменить(Гиперссылка,"://",Символы.ПС),2),"/"),СтрДлина(СтрПолучитьСтроку(СтрЗаменить(Гиперссылка,"://",Символы.ПС),2)))); КонецФункции
Также вышеприведенный код является примером того, что можно делать со строковыми функциями в 1С: Предприятие 8.0.