Добрый день!
Необходимо выгнать пользователей в серверном варианте. Есть юзвери в терминале. Сам выгоняю через "Cерверы 1С Предприятия 1с8.1". А как настроить автоматом?

АК-74

"Блокировка начала сеансов включена" включи.

(2) включил https://cloud.mail.ru/public/4QZm7TwnM2K3/img-2016-02-26-16-03-04.png - пользователи также заходят, хотелось бы выкидывать всех в полночь каждый день.

написать скрипт на vbs из 5 строк

(3) Что значит так же заходят?

(5) да, также.

(3) время поставь

(7) да, заработало!
(4) а можете примером скрипта бросить?

сам такое нарыл:

'Процедура закрытия соединений. Создастся служебные пользователи администратора COM.По завершении процедуры они убьются сами
Sub CloseConnection()
    Dim Connector, Agent, Cluster, WorkProcess, WorkProcessConnection, Base, Connections, i, CurrentConnection
    Dim BaseList

    'Идентификаторы баз в кластере серверов
    BaseName = "zarp"

    Set Connector = CreateObject("V81.COMConnector")

    'Селект текущего кластера серверов
    Set Agent = Connector.ConnectAgent("127.0.0.1")
    Set Cluster = Agent.GetClusters()(0)


    Agent.Authenticate Cluster, "aleksei", "7344"

    'Получение рабочего процесса кластера
    For Each WorkProcess In Agent.GetWorkingProcesses(Cluster)

            ConnectString = WorkProcess.HostName & ":" & WorkProcess.MainPort

            Set WorkProcessConnection = Connector.ConnectWorkingProcess(ConnectString)

            'Установка аутентификации в базах. В бухгалтерии и зарплате создан логин "Алексей"
            WorkProcessConnection.AddAuthentication "Алексей", "tystik1233"

           'Получение списков баз на сервере    
            BaseList = WorkProcessConnection.GetInfoBases()

            'Отключение пользователей из Зарплаты
            For i = LBound(BaseList) To UBound(BaseList)
                If BaseList(i).Name = BaseName Then
                        Set Base = BaseList(i)

                        'Получение соединений с базой, отрубаем всех ктоме COM-Администраторов, он вырубится когда закончится скрипт        
                        Connections = WorkProcessConnection.GetInfoBaseConnections(Base)

                        For j = LBound(Connections) To UBound(Connections)
                            Set CurrentConnection = Connections(j)
                            If CurrentConnection.AppID <> "COMConsole" Then
                         'MSGBOX "Пользователь зарплаты : " & CurrentConnection.UserName
                         WorkProcessConnection.Disconnect CurrentConnection
                            End If
                        Next

                   End If
  
                End If
            Next    

    Next
End Sub

net stop "1C:Enterprise 8.3 Server Agent (x86-64)"
timeout 120
net start "1C:Enterprise 8.3 Server Agent (x86-64)"

тоже вариант...

(9) а можете полный вариант выложить, а то на эти строчки ругается синтаксис

net stop "1C:Enterprise 8.3 Server Agent (x86-64)"
timeout 120
net start "1C:Enterprise 8.3 Server Agent (x86-64)"

(11) Вообщето, это батник, который стопит, ждет и стартит службу сервера 1С, который нужно загнать в виндовый шедулер.
"1C:Enterprise 8.3 Server Agent (x86-64)" нужно заменить на твое имя службы.

<закладко>