WebBrowser表单问题?碰到HTM编辑器如何办?

Question

表单地址如下:
http://bt1xia.com/test/
原代码中根本找不到TEXTAREA,,只是用JS调用HTM编辑器,,这个内容该如何填写?下面是我写的代码Set vDoc = WebBrowser1.Document
For i = 0 To vDoc.All.length - 1 
If UCase(vDoc.All(i).tagName) = "INPUT" Then 
        Set vTag = vDoc.All(i)
    If vTag.Type = "text" Then
        Select Case vTag.Name
            Case "ttitle"
            vTag.Value = "标题内容"
         End Select
    End If
End If
If UCase(vDoc.All(i).tagName) = "TEXTAREA" Then 
Set vTag = vDoc.All(i)
If vTag.Name = "body" Then
vTag.Value = "文章内容"
End If
End If
If UCase(vDoc.All(i).tagName) = "INPUT" Then 
    Set vTag = vDoc.All(i)
    If vTag.Type = "submit" And vTag.Value = "立即发表" Then
       vTag.Click
    End If
End If
Next i 

Answer 1

它没有使用TEXTAREA（提交的时候用到）而是用了IFRAME嵌入一个HTML文件，其DESIGNMODE是ON的，发表的时候把文件内容给了TEXTAREA，但TEXTAREA你看不见，被IFRAME挡住了。大概如此，看着很累啊。

Answer 2

LZ不知道我的想法可不可以，
找到那个FRAME，然后令doc.all.item("frame1").body.innerHTML = "发贴内容"
最后令整个表单提交 doc.all.item("form1").submit

Answer 3

POST表单数据就可以了。你可以找下，用关键字“VB Wininet Post”
可以找到一堆一样的代码，加以小小的改动就能用了，偶改了一个用在动网的登陆是OK的（偶在网吧，机子上没有代码传你）

Answer 4

其实只要仔细看看,你就会发现很简单的,以ewebeditor为例,当镶嵌在网页上的时候你要得到数据的话只需要用window.frame(iframename).window.frame(iframename).document.documentElement 或者是
window.frame(iframename).window.frame(iframename).document.getElementsByTagName("body")(0).innerHTML