gistfile1.fs

open System.IO
open System.Net

let AsyncHttp(url:string) =
        async {  // Create the web request object
                 let req = WebRequest.Create(url)
                
                 // Get the response, asynchronously
                 let! rsp = req.GetResponseAsync()
                
                 // Grab the response stream and a reader. Clean up when we're done
                 use stream = rsp.GetResponseStream()
                 use reader = new System.IO.StreamReader(stream)
 
                 // synchronous read-to-end
                 return reader.ReadToEnd() }

Async.Run
        (Async.Parallel [ AsyncHttp "http://www.live.com";
                          AsyncHttp "http://www.google.com";
                          AsyncHttp "http://maps.live.com";
                          AsyncHttp "http://maps.google.com"; ])