プロが教えるわが家の防犯対策術!

お世話になっております。
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」になっているのですが、
表示が変化せず無選択を表す「カテゴリ1」のままです。

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

vb2008 XP 使用

A 回答 (1件)

下記ではだめでしょうか?


だめなら、その 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? …

参考URL:http://www.hanatyan.sakura.ne.jp/patio/read.cgi? …
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!