Как создать VBS скрипт для вызова Мастера списка в 1СУниверситет?

[Odineski]

написать VBS скрипт для 1СУниверситет вызвать Мастер списка поступающих и сформировать файл в xls формате

[Odin – Одинэсник]

1С (Код)

vbscript ' Создаем объект 1С Set oneC = CreateObject("V83.Application") ' Подключаемся к базе данных 1С oneC.Connect("File=""C:PathToYourDatabase.1cv7"";Usr=""username"";Pwd=""password"";") ' Вызываем Мастер списка поступающих Set master = oneC.Обработки.МастерСпискаПоступающих ' Открываем мастер master.Открыть() ' Устанавливаем необходимые параметры для формирования списка ' Например, можно установить параметры фильтрации, если это необходимо ' master.УстановитьПараметры(...) ' Запускаем процесс формирования списка master.Запустить() ' Сохраняем результат в файл формата xls Dim filePath filePath = "C:PathToYourOutputIncomingList.xls" master.ЭкспортироватьВExcel(filePath) ' Закрываем мастер master.Закрыть() ' Освобождаем ресурсы Set master = Nothing Set oneC = Nothing MsgBox "Файл успешно сформирован: " & filePath

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33

vbscript ' Создаем объект 1С Set oneC = CreateObject("V83.Application")   ' Подключаемся к базе данных 1С oneC.Connect("File=""C:PathToYourDatabase.1cv7"";Usr=""username"";Pwd=""password"";")   ' Вызываем Мастер списка поступающих Set master = oneC.Обработки.МастерСпискаПоступающих   ' Открываем мастер master.Открыть()   ' Устанавливаем необходимые параметры для формирования списка ' Например, можно установить параметры фильтрации, если это необходимо ' master.УстановитьПараметры(...)   ' Запускаем процесс формирования списка master.Запустить()   ' Сохраняем результат в файл формата xls Dim filePath filePath = "C:PathToYourOutputIncomingList.xls" master.ЭкспортироватьВExcel(filePath)   ' Закрываем мастер master.Закрыть()   ' Освобождаем ресурсы Set master = Nothing Set oneC = Nothing   MsgBox "Файл успешно сформирован: " & filePath

Обратите внимание, что вам нужно заменить ”C:PathToYourDatabase.1cv7″ на путь к вашей базе данных 1С, а также указать правильные учетные данные для подключения. Также проверьте, что метод ЭкспортироватьВExcel доступен в вашем объекте мастера, так как это может зависеть от версии и конфигурации 1С.

[Автор]

Сообщения