none
winHTTP errore Connessione al server interrotta in modo anomalo RRS feed

  • Domanda

  • Buongiorno,

    effettuo una chiamata tramite winHTTP da vba con un codice tipo questo qui sotto:

    Function dst_service()
    
        Dim sURL As String
        Dim sUser As String
        Dim sPsw As String
        Dim sBody As String
        Dim w As New WinHttpRequest   
    
    sUser = "xxxxxxx"
    sPsw = "xxxxxxx"
    sBody = [a1].Value
    sURL = "https://xxxxxxxxxxxxxxxxxxx"
    
    w.Open "get", sURL, False
    w.setRequestHeader "Authorization", "Basic " & Base64Encode(sUser & ":" & sPsw)
    w.setRequestHeader "Content-Type", "application/json"
    w.send sBody
    dst_service = w.responseText
    End Function

    Su vari pc con window 10 funziona, su quelli con windows 7 enterprice restituisce un errore:

    Connessione al server interrotta in modo anomalo

    Per risolvere ho provato le seguenti strade (come suggerito interpellando internet):

    - stoppare antivirus

    - verificare in windows update e scaricato tutti gli aggiornamenti

    - ho provato a settare w.option(4) e w.option(12) a false 

    - tentato anche con MSXML2.XMLHTTP

    - modificato le impostazioni internet riguardo uso di ssl

    Purtroppo nessuna di queste mi ha fatto risolvere il problema.

    Qualche idea?

    Grazie

    giovedì 25 giugno 2020 15:25

Tutte le risposte