如何选择网络浏览器的下拉菜单项?Visual Basic 2008 2010

Question

大家好，我的朋友和读者们。我正在创建一个应用程序，我需要在其中选择Webbrowser的组合框/下拉列表选项。实际上，我的程序的工作是，它应该匿名评论（发送/提交文本）到我的blogspot页面（一个隐藏页面）。我将在我的其他程序中使用这种方法来向我发送反馈。我不想使用电子邮件服务，因为有些防病毒软件可以检测到它，有些专家可能会破解我的电子邮件密码。所以我决定用这个方法。

我的问题是，博客评论框选择的项目是"谷歌帐户"或"选择一个选项"我想将所选项目更改为"ANONYMOUSLY"。我已经在谷歌上搜索并尝试了许多代码示例。但是：-（

这是我的代码：

Public Class Form1
 Dim pagepathh As String = "C:UsersusernameDesktopsample.htm"
Dim posturl As String = "<iframe allowtransparency=""true"" class=""blogger-iframe-colorize blogger-comment-from-post"" frameborder=""0"" height=""234px"" id=""comment-editor"" name=""comment-editor"" src=""http://www.blogger.com/comment-iframe.g?blogID=8713182853230782541&amp;pageID=4831696032518082948&amp;blogspotRpcToken=9354446#%7B%22color%22%3A%22rgb(255%2C%20255%2C%20255)%22%2C%22backgroundColor%22%3A%22rgb(20%2C%2020%2C%2020)%22%2C%22unvisitedLinkColor%22%3A%22rgb(136%2C%20136%2C%20136)%22%2C%22fontFamily%22%3A%22Arial%2C%20Tahoma%2C%20Helvetica%2C%20FreeSans%2C%20sans-serif%22%7D"" width=""100%""></iframe>"
'This Is Bloger Comment Body Url.

Form1加载：

My.Computer.FileSystem.WriteAllText(pagepathh, posturl, False)
    wb1.Navigate(pagepathh) 'WB1 is my webbrowser.

按钮1（发布按钮）点击：

wb1.Document.GetElementById("commentBodyField").SetAttribute("Value", tb_comment.Text) ' tb_Comment is comment textbox.

I want To Place Some Code Here To Set Combobox Selected Item "anonymously".

    wb1.Document.GetElementById("postCommentSubmit").InvokeMember("click")

这里是Blogspot下拉列表HTML代码：

<select id="identityMenu" name="identityMenu" dir="ltr" onchange="BLOG_CMT_onSelectorChange()" style="display: inline; ">
<option value="NONE" disabled="">Select profile...</option>
<option value="NONE" disabled=""> </option>
<option value="GOOGLE">Google Account</option>
<option value="NONE">LiveJournal</option>
<option value="NONE">WordPress</option>
<option value="NONE">TypePad</option>
<option value="NONE">AIM</option>
<option value="OPENID">OpenID</option>
<option value="NONE" disabled=""> </option>
<option value="NAMEURL">Name/URL</option>
<option value="ANON">Anonymous</option>

附加信息：

Platform: Visual Basic Express 2010
.Net Framework is 2.0
Webpage Dropdown List Id: "identityMenu"
Webpage Button Submit Id: "postCommentSubmit"
Webpage Comment Textbox Id: "commentBodyField"

请真的真的为我糟糕的英语拼写和语法错误道歉。

Answer 1

您需要做的是在HTML中使用select的id，即"identityMenu"，然后将"value"属性设置为"ANON"，即您要选择的Anonymous选项的值。您可以使用以下代码执行此操作。希望这能有所帮助。

wb1.Document.GetElementById("identityMenu").SetAttribute("value","ANON")