Что нового

[Ошибки] Ошибка при использовании скрипта на другом ПК "FF.au3"

ini

Новичок
Сообщения
55
Репутация
0
Приветствую, уважаемые гуру.
Есть скрипт работает на библиотеке <FF.au3>, запускаю скомпилированный скрипт на моём 1-м ПК, отрабатывает отлично, на втором компе работает с ошибками, выскакивает окошко:
Заголовок - FF.au3 Error:
Текст - _FFWaitForRepl ====> Error TCPSend/TCPRecv TCPRecv-1
и несколько других, на втором компе MozRepl установлен, FF версии одинаковые.

Подскажите в чем может быть проблема? :scratch:
 
Автор
I

ini

Новичок
Сообщения
55
Репутация
0
Re: Ошибка при использовании скрипта на другом ПК "FF.au3"

Проблема решена изменением функции в библиотеке
Код:
Func __FFWaitForRepl($iTimeOut)
    Local Const $sFuncName = @CRLF & "__FFWaitForRepl"

    Local $recv, $sRet = "", $TimeOutTimer = TimerInit()
    If $iTimeOut < 200 Then $iTimeOut = 200

    While TimerDiff($TimeOutTimer) < $iTimeOut

        ; connection delay
        Sleep($_FF_CON_DELAY)

        $recv = TCPRecv($_FF_GLOBAL_SOCKET, 4096)
        ;ConsoleWrite($recv & @CRLF)
        ; TCP error
        If @error > 0 Then;If @error Then  <<<<----------------------------------------------------------------------------
            SetError(__FFError($sFuncName, $_FF_ERROR_SendRecv, "TCPRecv :" & @error))
            Return ""
        EndIf
        $sRet &= $recv

        ; error from MozRepl
        If StringRegExp($recv, "!!!(.*?)(TypeError|Exception|ReferenceError):?") Then
            $recv = StringLeft($recv, StringInStr($recv, "location") - 1)
            Sleep(200)
            SetError(__FFError($sFuncName, $_FF_ERROR_ReplException, StringStripWS($recv, 3)))
            __FFSend(";") ; MozRepl-Reset
            Sleep(200)
            Return ""
        ElseIf StringInStr($recv, "....>") Then
            __FFSend(";") ; MozRepl-Reset
            Sleep(200)
            SetError(__FFError($sFuncName, $_FF_ERROR_RetValue, "MozRepl ....>"))
            Return ""
        ElseIf StringInStr($recv, "beginning of the line to force evaluation") Then
            Sleep(500) ; first connection delay
        EndIf

        ; multiple connections to MozRepl (e.g repl2?> ...)
        If StringRegExp($recv, "repl[\d]*>") Then Return StringRegExpReplace($sRet, "repl[\d]*>", "")
    WEnd

    ; Timeout
    SetError(__FFError($sFuncName, $_FF_ERROR_Timeout, Round(TimerDiff($TimeOutTimer)) & "ms > " & $iTimeOut & "ms $iTimeOut"))
    Return ""

EndFunc   ;==>__FFWaitForRepl
 
Верх