[VServer] NT4 error 10093

[Igor Gomon]

Hi Erich,

> on checkserver
>    global ghostname
>    cnt = void
>    myserver = new(xtra "Vserver", ghostname, myAdmin, myPassword)
>    myerror = ValentinaError()
>    put "checkserver error" && myerror
>    if myerror <> 0 then
>      if VErrorHandler(myerror) then
>        myserver = void
>        return void
>      end if
>    end if
>    OpenSession(myserver)
>    myerror = ValentinaError()
>    if myerror <> 0 then
>      if VErrorHandler(myerror) then
>        myserver = void
>        return void
>      end if
>    end if
>    cnt = GetConnectionCount(myserver)
>    CloseSession(myserver)
>    myserver = void
>    return cnt
> end
You code is totally lacks ValentinaInit() call!

> 
> 
> And this is what I get in the message window:
> 
> gdebugkey = 1
> valentinadebuglevel(2,1)
> * V4MD *: ValentinaSetDebugMode...done
> -- "1 0"
> * V4MD *: new VServer...done
> * V4MD *: ValentinaError...done
> -- "checkserver error 0"
> * V4MD *: OpenSession...error 10093
> * V4MD *: ValentinaError...error 10093
> * V4MD *: VServer_Destroy...done
And the log is confirmed that.

-- 
Best regards,
Igor Gomon
-------------------------------------------------------------
e-mail: giv_ua at inbox.ru
web: http://www.paradigmasoft.com

To subscribe to the Valentina mail list go to:
http://listserv.macserve.net/mailman/listinfo/valentina