vb2008でライブドアブログのカテゴリを

質問

お世話になっております。
ｖｂ２００８でライブドアブログへの自動登録プログラムを作成中なのですが、
WebBrowserでブログエディタページを出してタイトル、本文などは入力できたのですが、
ブログのカテゴリの表示が変更できません。

<select class="editorCategorySelect" name="category_id1" id="category_id1" onchange="Editor.Category.show_add_box_depends(this, 'add_category')" onkeyup="Editor.Category.show_add_box_depends(this, 'add_category')">
<option value="">カテゴリ1</option>
<option value="704478">ラーメン</option>
<option value="704479">やきそば</option>
<option value="704480">蕎麦</option>
<option value="704481">うどん</option>
<option value="704482">ういろう</option>
</select>

これに対し、

WebBrowser1.Document.GetElementsByTagName("select")(0).SetAttribute("value", "704479")
WebBrowser1.Document.All.GetElementsByName("category_id1")(0).RaiseEvent("onChange")

上記の仕方でvalue値を参照すると、「704479」になっているのですが、
表示が変化せず無選択を表す「カテゴリ１」のままです。

質問の意味がわかりづらく申し訳ありません。
よろしくお願いします。

vb2008　ＸＰ　使用

回答No.1

vbhanatyan

下記ではだめでしょうか？
だめなら、その URL を教えて下さい。(テストして見ますので)

WebBrowser1.Document.All.GetElementsByName("category_id1").Item(0).SetAttribute("Selectedindex", "1")
WebBrowser1.Document.All.GetElementsByName("category_id1").Item(0).InvokeMember("onChange")

詳しくは、下記　URL が参考になるかと思います。
http://www.hanatyan.sakura.ne.jp/patio/read.cgi?no=314

参考URL：

http://www.hanatyan.sakura.ne.jp/patio/read.cgi?no=314