怎么用编程方式将新浪微博页面内容保存成TXT或mht格式文件

如何用编程方式将新浪微博页面内容保存成TXT或mht格式文件
如何用编程方式将多个新浪微博
（如：http://weibo.com/u/2531528405
  http://weibo.com/u/1407219330
  http://weibo.com/u/1867903025
  http://weibo.com/u/2433634244
  。。。。。
）
页面内容保存成TXT或mht格式文件

------解决方案--------------------
http://dkfdtf.blogbus.com/logs/20284731.html
------解决方案--------------------
可能是需要登录成功才有内容吧
下面这个简化一点，试试有没有内容

cUrl = 'http://weibo.com/u/2531528405'
...
cdo = CreateObject('CDO.Message')
cdo.CreateMHTMLBody(cUrl, 0, '', '')

ado = cdo.GetStream()
ado.SaveToFile('c:ttt.mht', 2)
StrToFile(Strconv(cdo.HTMLBody,9), 'c:ttt.htm', 4)
StrToFile(cdo.TextBody, 'c:ttt.txt')