Получите эскизы img из Vimeo без API

Пытается очистить миниатюру от идентификатора видеоплеера vimeo, но не получает ответа или кода ошибки. Я знаю, что есть API, но это действительно работает, как и 3 месяца назад, теперь мое маленькое приложение не работает, так что я делаю не так?

Private Function RequestToVimeo(ByVal VimeoVideoID As String, ByVal views As Boolean, rndAgent As Boolean, referer As String, Proxy As WebProxy) As Boolean



ReDownloadJson:

        Dim ResponseString As String = GetJson(VimeoVideoID, Proxy)


       Try
                Thistoken = Newtonsoft.Json.JsonConvert.DeserializeObject(Of VimeoJson)(ResponseString)
            Catch ex1 As Exception
                Try
                    Thistoken = Newtonsoft.Json.JsonConvert.DeserializeObject(Of OtherJson.VimeoJson)(ResponseString)
                Catch ex As Exception
                    Proxy = Nothing
                    GoTo ReDownloadJson
                End Try
        End Try

        If PreviewBox.ImageLocation Is Nothing OrElse PreviewBox.ImageLocation = String.Empty Then
            PreviewBox.ImageLocation = Thistoken.video.thumbs.base + "_640.jpg"
        End If




            If response IsNot Nothing Then
                response.Close()
            End If
            Return False
        End Try


    End Function