Установлен аппаратный ключ на сервер + аппаратная лицензия на 10 раб.мест. Установлен менеджер лицензий. Все компьютеры видят лицензию, но периодически (практически каждый день) при запуске программа ругается, что недостаточно лицензий, хотя количество одновременно работающих пользователей не больше 5, т.е. не превышает максимально допустимые 10. Помогает перезапуск службы Hasp Loader.
Подскажите,пожалуйста, в чем может быть причина?Как исправить?

Платформа 8.2.19.83

База файловая. Может, кто сталкивался?

Нашел скрипт:
Option Explicit
On Error Resume Next
Dim objNetwork
Dim strComputerName,WshShell
Dim body,ts,fs,fsget,KeyWork
    Set WshShell = WScript.CreateObject("WScript.Shell")
    RetCode = WshShell.Run("taskkill /F /IM getinfo.exe", 0, True)
    RetCode = WshShell.Run("taskkill /F /IM aksmon.exe", 0, True)
    Wscript.Sleep 2000
    RetCode = WshShell.Run("GetInfo.exe", 0, True)
    Set objNetwork = CreateObject("WScript.Network")
    strComputerName = Ucase(objNetwork.ComputerName)
    Set fs = CreateObject("Scripting.FileSystemObject")
    body = ""
    KeyWork = 0
    Set ts = fs.OpenTextFile("Out.txt",1)  
        While Not ts.AtEndOfStream
            body = Ucase(ts.readline())
            If Instr(1,body,strComputerName)>0 then
                KeyWork = 1
            End if
        Wend
    If KeyWork=0 Then
        RetCode = WshShell.Run("net stop ""HASP Loader""", 0, True)
        Wscript.Sleep 2000
        RetCode = WshShell.Run("net start ""HASP Loader""", 0, True)
    End if

Если поместить его в назначенные задания, при выполнении будут вылетать пользователи из 1С?

up

Аладин монитор что показывает?
ЗЫ Отключите все протоколы в хаспе, кроме tcp/ip, а на клиентах пропишите жестко адрес менеджера лицензий в nethasp.ini.

(0) Поставь перезагрузку службы hasp в шедуллер по ночам.

(0) Есть у Платформы 8.2.19.83 такой косяк. Смени платформу, или как (6), но этот костыль плохо помогает.

(6) Почему по ночам? У меня каждый час перезапускается

(8) А клиенты не отваливаются?

(9) нет, с чего бы, там таймаут опроса где-то 2500 сек. а перезагрузка 1 сек

(10) Ну это зависит от алгоритма опроса. Пусть клиент получил лицензию при запуске, а дальше проверяет её наличие(доступность) на менеджере. Если сервис перезагружен, то все выданные лицензии теряются. Как отработает это клиент - вопрос открытый и недокументированный.. он может как заново запросить лицензию, так и вылететь.

(11) нечего не теряется, клиент продолжает работать до следующего опроса, при следующем опросе получает опять лицензии

(11) вот те статья с инфостата со скриптом на перезапуск каждые 5 минут
http://infostart.ru/public/74528/

(13) запускаю bat-файл с текстом скрипта, выходит ошибка:
Dim body,ts,fs,fsget,KeyWork
"Dim" не является внутренней или внешней командой, исполняемой программой или пакетным файлом.

так же ругается на "RetCode", "body", "While" и проч.

нужно в назначенные задания поместить перезагрузку службы "hasp loader"

Пробую другой вариант, в bat-файл помещаю 2 строки:
net stop "HASP Loader"
net start"HASP Loader"

Ошибка 5.
Отказано в доступе.

Запустил от имени администратора - помогло

(14) ну вы блин даете. Скрипт надо в .vbs файле сохранить.
а из бата запускать уже вот так:

wscript myfile.vbs