Discussion :

[road-runner]

Bonjour,
J'ai un message de warning lors de la compilation sur Httwebrequest, c'est obsolète par quoi je pourrais le remplacer?
merci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Public Function Fct_GetResponse(ByRef URL As String) As HttpWebResponse
 
    'Create a web request
 
    Me.Refresh()
 
    Dim web As HttpWebRequest = HttpWebRequest.Create(URL)
 
    web.Timeout = 25000   '25 sec
    web.Method = "GET"
 
    Try
        'Return web.GetResponse()
 
        reponse = web.GetResponse()
 
    Catch ex As System.Net.WebException
        REM If ex.Status = WebExceptionStatus.ProtocolError Then
        If ex.Status <> 0 Then
            'Return ex.Response
            'Return ex.Status
            sw_web_ok = False
            reponse_fct_status = ex.Status
            reponse_fct_message = ex.Message
            REM MsgBox(ex.Status & " : " & ex.Message)
        End If
    End Try
 
    Return Nothing
End Function

[Pol63]

c'est écrit si tu passes ta souris dessus, ca doit être httpclient

[umfred]

c'est aussi marqué sur la doc officielle dans un cadre "Remarques" https://learn.microsoft.com/en-us/do...t?view=net-8.0