Question

vb webbrowser自动填表问题

用VB的Webbrowser实现百度空间评论的自动填表功能，就内容那个地方无法实现自动填，其他地方都可以。高手帮看看如何实现，测试可以用后把代码发上，谢谢。
我的代码是：
If vTag.Name = "spBlogCmtText" Then
vTag.Value = "value"
End If
直接提交不成功，附上网址，可以直接到这个网址测试：http://hi.baidu.com/xxhan001/blog/item/da69aa191dfc580d34fa4154.html
网页里的代码是这样的：
<td valign="top" class="f14" id="reTitle">内 容： </td>
<td> <textarea name="spBlogCmtText" id="spBlogCmtText" style="width:520px;height:155px" onFocus="hidErr(3);" > </textarea>

Answer 1

这不是普通的textarea ，是网页编辑器，用网页实现的，没法这么赋值，你可以用遨游、GreenBrowser等的智能填表测试下看看，这些软件同样不能填表

下面是摘得一部分代码，实现部分代码更多，这只是调用部分

var editor=null;

try{

editor=new BdEditor("spBlogCmtText",{width:"100%",height:"155px"});

editor.onfocus = function(){hidErr(3);}

editor.render();

}catch(e){

var spBlogCmtText = document.getElementById("spBlogCmtText");

var p = spBlogCmtText.previousSibling;

while(p && p.nodeType != 1) p = p.previousSibling;

if(p && /bdeditor_container/.test(p.id)){

p.parentNode.removeChild(p);

}

spBlogCmtText.style.display = '';

editor=null;

}

<iframe width="100%" height="155px" frameborder="0" src="javascript:void(0)">
</iframe>
—————————————————————————————
它是用iframe来实现输入框的，赋值可能在输入框中显示不出来，你直接提交试试，看看能成功不

Answer 2

这是样式表，要对样式里进行写入才行，你用f vTag.Name = "spBlogCmtText" Then
vTag.Value = "value"
End If是不行的，因为这个只是对，窗体里的

同时你可以试一下查询所有textarea然后在找到对应spBlogCmtText进入写入，
最好的方法还是进入样式表后在进行

Answer 3

VB还是VB.NET ？
VB的话比较麻烦
VB.NET 就比较简单了~~~~
你能用VB.NET 么？

Answer 4

<textarea name="spBlogCmtText" id="spBlogCmtText" style="width:520px;height:155px" onFocus="hidErr(3);" >
多加一个value 属性。value=<%=你预设的值%>

Answer 5

是个麻烦事。不过，就是提交了也需要人工干预呀，还有最麻烦的验证码需要输入呢。

Answer 6

内容框控件跟上面的不是一样属性，，