This VB6 example program shows how to download and access blog posts:
' Get recent posts.
Dim b1 As New Blogger1
b1.Login = "MyLogin"
b1.Password = "MyPassword"
b1.ServiceUrl = "http://www.livejournal.com/interface/blogger"
' Get the blog ID of the 1st blog for this account.
Dim blogId As String
success = b1.GetUsersBlogs()
If (success = 1 And (b1.NumBlogs > 0)) Then
blogId = b1.GetBlogId(0)
Else
MsgBox "Failed to get users blogs!"
End If
' Get the recent posts for blogId (max of 10)
postCount = b1.GetRecentPosts(blogId, 10)
' It is possible to access the recent post data as XML.
' You could load it into an XML parser and then work with it as you wish.
' This example simply retrieves the XML string and displays it in a text box.
Text1.Text = b1.RecentPostsToXml()
' You could iterate over the title/content of each post...
Dim s As String
For i = 0 To postCount - 1
s = s + "----------------------" + vbCrLf + b1.GetPostTitle(i) + vbCrLf + b1.GetPostDescription(i) + vbCrLf
Next
MsgBox s
' Or we could get each post as an object and get more detailed information:
Dim post As BlogPost1
For i = 0 To postCount - 1
Set post = b1.GetPost(i)
List1.AddItem post.postId
List1.AddItem post.DateCreated
List1.AddItem post.Title
List1.AddItem post.Description
List1.AddItem "---------------------"
Next