Here is a snippet of code to retrieve information from IMDB, afterwards you would have to parse it.
Imports System.Net
Imports System.IO
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim searchString As String = "da+vinci+code" 'example search keyword for a movie
'URL to search for a movie
Dim request As WebRequest = WebRequest.Create("http://www.imdb.com/find?s=all&q=" & searchString)
'URL to get detailed information for a movie
'Dim request As WebRequest = WebRequest.Create("http://www.imdb.com/title/tt0382625/")
request.Credentials = CredentialCache.DefaultCredentials
Dim response As HttpWebResponse = CType(request.GetResponse(), HttpWebResponse)
Dim dataStream As Stream = response.GetResponseStream()
Dim reader As New StreamReader(dataStream)
'responseFromServer contains the HTML code for the page retrieved
Dim responseFromServer As String = reader.ReadToEnd()
dataStream.Close()
response.Close()
End Sub
End Class |