Bitrix: выгрузка ссылок на карточки и фото

1. Добавить скрипт в папку /quad/ в корне сайта. Если папки нет, то создать ее.

Скрипт link_export.php - можете переименовать этот файл, чтобы кто-нибудь случайно не смог получить доступ к этому скрипту, зная что вы используете программу QuadCRM. Например назвать файл link_export432123.php , где в конце случайный набор цифр.

2. Отредактируйте скрипт, укажите в нем тип инфоблока каталога товаров

Тип инфоблока можно посмотреть здесь:

Сохраните скрипт.

3. В программе QuadX создайте группу действий “Импорт ссылок” в Quad.Magic. Или назовите ее так, как вам будет понятно, что этой группой будут загружаться ссылки на карточки товаров и фото с сайта.

Quad.Magic

4. Добавьте действие с типом “Выполнить ссылки”

Назовите его “скачать товары сайта”.

В Настройка 1 укажите ссылку на скрипт и файл, в который сохранить полученный файл.

Пример настройки:

https://site.com/quad/link_export777.php|{%APPFOLDER%}\files\1_ main\links.csv

можете использовать данную настройку, только замените site.com на ваш сайт, и link_export777.php на ваше название скрипта.

Файл сохранится в папку Quad Solutions\files\1_ main и будет называться links.csv

5. Добавьте настройку прайса, которой будет загружаться этот файл в программу. Тип прайса должен быть “Основной”. Настройки прайса такие:

Для загрузки информации вам понадобится добавить 2 пользовательских поля Добавление пользовательского поля - Фото 1 с типом Строка и ID Site тип Строка, в которые загрузится ссылка на фото и ид товара на сайте. Такие поля обычно уже созданы в программе, поэтому поищите их в списке полей, перед тем как создавать новые.

Добавьте такой макрос в настройку этого прайса:

 With ActiveSheet.QueryTables.Add(Connection:= _ 
 "TEXT;###FILE###", Destination:=Range("$A$1")) 
 .Name = "links" 
 .FieldNames = True 
 .RowNumbers = False 
 .FillAdjacentFormulas = False 
 .PreserveFormatting = True 
 .RefreshOnFileOpen = False 
 .RefreshStyle = xlInsertDeleteCells 
 .SavePassword = False 
 .SaveData = True 
 .AdjustColumnWidth = True 
 .RefreshPeriod = 0 
 .TextFilePromptOnRefresh = False 
 .TextFilePlatform = 1251 
 .TextFileStartRow = 1 
 .TextFileParseType = xlDelimited 
 .TextFileTextQualifier = xlTextQualifierDoubleQuote 
 .TextFileConsecutiveDelimiter = False 
 .TextFileTabDelimiter = False 
 .TextFileSemicolonDelimiter = True 
 .TextFileCommaDelimiter = False 
 .TextFileSpaceDelimiter = False 
 .TextFileColumnDataTypes = Array(2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2) 
 .TextFileTrailingMinusNumbers = True 
 .Refresh BackgroundQuery:=False 
 End With 
SHEET_INDEX = 1 
PRICE_COLUMN = 10 
CHECK_COLUMN = 1 
for i = 2 to sheets(SHEET_INDEX).UsedRange.Rows.Count 
 if sheets(SHEET_INDEX).cells(i, CHECK_COLUMN).Value <> "" Then 
  sheets(SHEET_INDEX).cells(i, PRICE_COLUMN).Value = 0 
 end if 
next i

А так же поставьте такие птички в настройках, чтобы в основном прайсе обновилась только информация из файла.

6. Добавьте действие, которым будет загружаться прайс

После загрузки прайса можно будет переходить по ссылкам на карточки товаров сайта - кнопка S в поле Название товара.

Загруженная информация в карточке: