0

これが私のコードです。URLからメールをスクレイピングしたい。指定された URL が画像の URL である場合、500 エラーが発生することがあります。関数が文字列のリストに戻るかどうかを判断するために、そのエラーを取り除きたいです。

       Try
        Dim inStream As StreamReader
        Dim webRequest As WebRequest
        Dim webresponse As WebResponse
        Dim contents As String
        webRequest = webRequest.Create(url)
        webresponse = webRequest.GetResponse()
        inStream = New StreamReader(webresponse.GetResponseStream())
        contents = inStream.ReadToEnd()

        Dim adrRx As Regex = New Regex("\b[a-z0-9._%+-]+@[a-z0-9.-]+\.[a-z]{2,4}\b")
        Dim emails As New List(Of String)
        For Each item As Match In adrRx.Matches(contents.ToLower)
            emails.Add(item.ToString)
        Next
        Return emails
    Catch ex As Exception
        Return False
    End Try
4

1 に答える 1