Dim words() As String = Response.Split(New Char() {","c})
Dim pic_url As String = ""
Dim urs() As String = Response.Split("""profile_pic_url""")
Dim locationn As String = "C:\picture.jpg"
For Each picurl As String In urs
If picurl.Contains(".jpg") Then
pic_url = picurl
Else
End If
Next
Dim fileExists As Boolean
fileExists = My.Computer.FileSystem.FileExists("C:\picture.jpg")
If fileExists = True Then
My.Computer.FileSystem.DeleteFile("C:\picture.jpg", FileIO.UIOption.AllDialogs, FileIO.RecycleOption.SendToRecycleBin)
Else
Try
Dim picture As New WebClient()
picture.DownloadFile(pic_url, locationn)
PictureBox2.Load(locationn)
Catch ex As Exception
MsgBox(ex.Message)
End Try
End If
Je voudrai récupérer la photo de profil mais je reçois un message d'erreur 403 accès interdit. Pourriez-vous m'aider s'il vous plait ?
Vous vous mangez l système d'authentification du site Web.
Il y a de grandes chances que ce que vous tentez de faire est interdit par les CGU du site. Sinon, le site devrait fournir une API web (REST, ...) qui ne vous obligerai pas à toutes ces acrobaties.
- Edité par bacelar 14 mars 2021 à 21:12:31
Je recherche un CDI/CDD/mission freelance comme Architecte Logiciel/ Expert Technique sur technologies Microsoft.
Je m'y penche, merci en tout cas de la piste proposée !
------------------------
Respectueusement, Kévin TURPIN
403 Acces Forbiden - Récupération image
× Après avoir cliqué sur "Répondre" vous serez invité à vous connecter pour que votre message soit publié.
× Attention, ce sujet est très ancien. Le déterrer n'est pas forcément approprié. Nous te conseillons de créer un nouveau sujet pour poser ta question.
------------------------
Respectueusement, Kévin TURPIN
------------------------
Respectueusement, Kévin TURPIN
------------------------
Respectueusement, Kévin TURPIN