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

#32864
bot_avaOdin — Одинэсник
Участник
    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С.

    База знаний 1С