problemas con HttpWebResponse

[gerard_a]

Buenas a tod@s,

Tengo una función que cada vez que subo la dll me funciona pero las siguientes ejecuciones no me copia el fichero. En si esta función se encarga de copiarme un fichero pdf en mi maquina y adjuntarlo para un email.

Supongo que hay algo que queda sin cerrar, de ahi el problema, pero no se que es lo que falla.

Código:

Dim webrequest As System.Net.HttpWebRequest = CType(System.Net.WebRequest.Create("http://url/PDF/" & _Id & ".pdf"), Net.HttpWebRequest)
webrequest.Timeout = 30000
Dim respuesta As System.Net.HttpWebResponse

Try
respuesta = CType(webrequest.GetResponse(), Net.HttpWebResponse)
While (respuesta.StatusDescription <> System.Net.HttpStatusCode.OK.ToString() And respuesta.StatusDescription <> System.Net.HttpStatusCode.RequestTimeout.ToString())
End While

If respuesta.StatusDescription = System.Net.HttpStatusCode.OK.ToString() Then
Dim saveTo As String = "C:\" + _Id + ".pdf"
Dim writeStream As FileStream = New FileStream(saveTo, FileMode.Create, FileAccess.Write)
ReadWriteStream(webrequest.GetResponse().GetResponseStream(), writeStream)
EMail.AddAttachment(saveTo)
writeStream.Close()
End If

respuesta.Close()
webrequest.Connection = "Close"
Catch
End Try

Gracias de antemano y un saludo