Twitter post from ASP.Net - Getting Error

See more:

ASP.NET

HI Thanks for the immediate reply..

As you have asked , i have given mypost message, my username and paswword ,

Following is the code i am using

Sub TwitIt(ByVal strUser As String, ByVal strPass As String, ByVal strMessage As String)
       'this subroutine requires your ASP.NET page to have a label control with an ID of lblStatus
       'create post variable for tweet
       Dim strTweet As String = "status=" & Server.HtmlEncode(strMessage)
       'convert post variable to byte array for transmission purposes
       Dim bRequest As Byte() = System.Text.Encoding.ASCII.GetBytes(strTweet)
       Try
           'create HttpWebRequest to status update API resource
           Dim objRequest As HttpWebRequest = WebRequest.Create("http://twitter.com/statuses/update.xml")
           'pass basic authentication credentials
           objRequest.Credentials = New NetworkCredential(strUser, strPass)
           'set method to post and pass request as a form
           objRequest.Method = "POST"
           objRequest.ContentType = "application/x-www-form-urlencoded"
           'tell the server it will not receive a 100 Continue HTTP response
           objRequest.ServicePoint.Expect100Continue = False
           'set content length of request
           objRequest.ContentLength = bRequest.Length
           'capture the stream (content) of the request
           Dim objStream As Stream = objRequest.GetRequestStream()
           'put the bytes into request
           objStream.Write(bRequest, 0, bRequest.Length)
           'close the stream to complete the request
           objStream.Close()
           'uncomment line below to report success
           'lblStatus.Text = "Tweet sent!"
           'You can also capture the XML response Twitter sends back
           'uncomment lines below to capture responses
           Dim objResponse As WebResponse = objRequest.GetResponse()
           Dim objReader As New StreamReader(objResponse.GetResponseStream())
           lblStatus.Text = objReader.ReadToEnd()
       Catch ex As Exception
           'uncomment line below to report ASP.NET errors
           lblStatus.Text = ex.Message
       End Try
   End Sub

Pls help on this..where i went wrong or what needs to be done with the IIS settings.

[edit]Code block added - OriginalGriff[/edit]