- ベストアンサー
vbscriptでIE自動入力(コンボボックス選択について)
- vbscriptを使用してIEのフォームに自動入力する方法について質問です。
- 特に、コンボボックスの選択や、disabled属性の解除について困っています。
- 現在のコードではコンボボックスの値は入力できますが、disabled属性が解除されません。解決策を教えてください。
- みんなの回答 (1)
- 専門家の回答
質問者が選んだベストアンサー
正しい使い方かどうかわかりませんが、下記のスクリプトのようにするとonChangeが発生し、手動のような動きになると思います。 Windows XP Pro SP2 + IE6 で試しました。 -----テスト用 combo.htmlファイル <HTML><HEAD> <TITLE>combo change</TITLE> </HEAD><BODY> <SCRIPT> function F(){ //alert ("F()が呼び出されました"); if (form1.combo1.value=="あ") form1.text1.disabled=false; else form1.text1.disabled=true; } </SCRIPT> <FORM name="form1"> <SELECT name="combo1" onChange="F()"> <OPTION value="あ">あ</OPTION> <OPTION value="い">い</OPTION> <OPTION value="う" selected>う</OPTION> </SELECT> <P><BR></P> <INPUT size="20" type="text" name="text1" value="default" disabled> </FORM> </BODY></HTML> ----- ----- スクリプト set IE=WScript.CreateObject("InternetExplorer.Application") IE.Navigate("C:\TOOL\SCRIPT\Test\combo.html") '★combo.htmlファイルのフルパス IE.Visible=true WScript.Echo "IEのブロックを解除してから実行して下さい。" IE.document.form1.combo1.selectedIndex=0 IE.document.form1.combo1.onChange 'これを書くとonChangeが発生します IE.document.form1.text1.value="変更できます" -----
お礼
動かなかったサイトに合わせて回答通りに書き換えると バッチリ動きました。大変助かりました。 どうもありがとうございました。