急~~~~求VBA在excel中自动登录网站，自动写入数据的方法，自动导出网页数据的方法。

   大家好。我这有个课题如下：运用VBA在EXCEL中实现自动登录网页；再运用VBA自动从EXCEL表格中把数据写入到网页中。再自动把在网页中读取的数据导入EXCCEL。
    我登录了一个化妆品网站，然后在EXCEL表格第一行第一列输入了搜索条件“香水”，现在我想把“香水”运用VBA自动写入到网页的搜索框里。以下是我的代码：
  Sub test()
With CreateObject("InternetExplorer.Application")
    .Visible = True
    .navigate "http://www.sephora.cn/?rsour=baidu&rmeth=brandzone&rterm=title&rcamp=title&_sv_code=36_1938477_134848278|{creative}|{domain}"
    DoEvents
    While .busy
        DoEvents
    Wend
    With .Document
        .GetElementById("username").Value = "hyangyang0613"
        .GetElementById("password").Value = "hyy379509"
        .GetElementById("loginsubmit").Click
    End With
End With
End Sub
 
   之前有人给了我一种方法，我按照步骤之后执行不成功。以下是别人给的方法：
 
 假设你用的IE对象，   假设你在sheet1的第1行1列输入，   假设网页搜索元素ID为SearchId，   你可以参考一下下面的： ie.Document.all( "SearchID ").Value   =   Sheets1.Cells(1,   1) 这是一句VBA的代码 
你可以按下面步骤做 1、添加一个窗体 
2、添加一个webbrower控件和1个按钮 
3、按钮的Capiton属性设置为 "登录 ",   webbrowser的name设置 "ie " 
4、Form_load事件里头添加 
ie.navigate   "about:blank "   '初始化的 
ie.navigate   "www.baidu.com "   '直接打开百度 
5、按钮的Click事件里头添加 
ie.navigate   url   'url是你需要登录的站点 
'------------------以下3行中的idname,idpwd,idlogin分别为你登录的网页源码里头找到的用户密码和登录按钮的id或者name属性，   如果看网页源码不会，   那我估计你看这个会非常费劲-------------- 
ie.document.all(idname).value=用户名 
ie.document.all(idpwd).value=用户密码 
ie.document.all(idlogin).click   '登录  请各位大侠过目，并留下宝贵的建议。希望也可以借鉴别的方法。
   谢谢各位了！！！