各位。VB登录新浪微薄 哪位高手有代码

各位。VB登录新浪微薄 谁有代码！
各位。VB登录新浪微薄 谁有代码！

麻烦给我一份！或者介绍点经验给我谢谢

[解决办法]
到JS中找到加密算法，转换成VB写法就OK了。
[解决办法]
打开页面，找到相关元素，填写，提交

VB code

Private Sub Command1_Click()With wb1.Document    .getelementbyid("loginname").Value = "123@163.com" '填写 用户名    .getelementbyid("password").Value = "12345678" '填写 密码    .getelementbyid("login_submit_btn").Click '点击登陆按钮End WithEnd SubPrivate Sub Form_Load()wb1.Navigate2 "http://weibo.com/"End Sub