Por ahora lo único que tengo es el inicio, pero no se como seguir. Si alguien me diese alguna indicación sería de gran utilidad.
Código
Public Sub obtenerInfo(ByVal link As String) Dim peticion As HttpWebRequest Dim respuesta As HttpWebResponse Dim source As String If link.Contains("youtube.com") Then Try 'Se realiza una peticion a la URL que nosotros queremos descargar peticion = DirectCast(HttpWebRequest.Create(link), HttpWebRequest) 'Recibimos la respuesta de esa URL respuesta = DirectCast(peticion.GetResponse, HttpWebResponse) 'Leemos la respuesta y obtenemos toda la información de esa página en una string source = New StreamReader(respuesta.GetResponseStream, System.Text.Encoding.Default).ReadToEnd 'Hasta ahora solo tenemos toda la información que contiene el link Catch ex As Exception MessageBox.Show("Ha ocurrido un error inesperado", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error) End Try End If End Sub
Gracias.