Obsługa wyjątków asynchronicznych w języku F #

Question

Próbuję napisać kod nieblokujący w języku F #. Muszę pobrać stronę internetową, ale czasami ta strona nie istnieje i generowany jest wyjątek (404 Not Found) AsyncDownloadString. Próbowałem kodu poniżej, ale nie kompiluje.

Jak obsługiwać wyjątek od AsyncDownloadString?

Jak mam sobie radzić z wyjątkiem tutaj? Jeśli zostanie zgłoszony błąd, po prostu chcę zwrócić pusty ciąg lub ciąg z komunikatem.

Answer 1

Wystarczy dodać słowa kluczowego return po powrocie swój ciąg błędzie:

let downloadPage(url: System.Uri) = async { 
    try 
     use webClient = new System.Net.WebClient() 
     return! webClient.AsyncDownloadString(url) 
    with error -> return "Error" 
} 

IMO lepszym rozwiązaniem byłoby wykorzystanie Async.Catch zamiast wrócić ciąg błędzie:

let downloadPageImpl (url: System.Uri) = async { 
    use webClient = new System.Net.WebClient() 
    return! webClient.AsyncDownloadString(url) 
} 

let downloadPage url = 
    Async.Catch (downloadPageImpl url)