vb操作网页的N个问题，急急急

Question

一、用VB给网页中文本框赋值
调用ASP页面正常。
WebBrowser1.Navigate2 "http://www.csdn.net/member/login.asp"
Do While WebBrowser1.Busy
    DoEvents
Loop
WebBrowser1.Document.All("login_name").Value = "aaa"
WebBrowser1.Document.All("password").Value = "bbb"
下面我调用了一个PHP的页面，出现“对象变理或WITH块变量未设置”
WebBrowser1.Navigate2 "http://www.singbet3.com"
Do While WebBrowser1.Busy
    DoEvents
Loop
WebBrowser1.Document.All("username").Value = "aaa"
WebBrowser1.Document.All("passwd").Value = "bbb"
其中网页中元素的名称都是通过查看源文件得到。
请帮帮忙吧。
二、用VB模拟一个过程“新建记事本，打开，然后粘贴，保存”请帮帮忙了。。

Answer 1

第二问
Private Sub Command1_Click()
Shell "notepad.exe", vbNormalFocus
SendKeys "^v"
SendKeys "%fs"
End Sub

Answer 2

下面我调用了一个PHP的页面，出现“对象变理或WITH块变量未设置”
WebBrowser1.Navigate2 "http://www.singbet3.com"
Do While WebBrowser1.Busy
    DoEvents
Loop
WebBrowser1.Document.All("username").Value = "aaa"
WebBrowser1.Document.All("passwd").Value = "bbb"
使用了框架，当然找不到"username"了。