Problem updating to Workgroup PDM 2016 - API

I have been using for a few years a VB program to access Workgroup PDM using its API.

It starts like this:

    Public Sub main()

        On Error GoTo errorHandler

        Dim fileName, newName, TempFile, extension, Pathedrawings, TextoError As String, punto As Integer

        TextoError = "No puede definir conexión a PDM"

        Dim connection As PDMWorks.PDMWConnection

        fileName = My.Computer.FileSystem.ReadAllText("C:\\DRWTMP\\NUMPLANO.TXT")

        Pathedrawings = My.Computer.FileSystem.ReadAllText("C:\\DRWTMP\\RutaEdrawings.TXT")

        TextoError = "No puede crear conexión a PDM"

        connection = CreateObject("PDMWorks.PDMWConnection")

        TextoError = "No puede hacer login a PDM"

        connection.Login("pdmwadmin", "pdmwadmin", "10.0.1.24")

It is giving me an error when it attemps the connection.Login

I have checked the user, password and vault address are correct.

I just installed Workgroup PDM 2016 and it stopped working.

Any idea of what may be causing the problem?

SolidworksApi macros