2つのSELECTボックスを用意し、1つ目のSELECTボックスの内容により
2つめのSELECTボックスの内容(項目数も含め)を変える方法を教えてください。
下記のようなHTMLを作ってみましたが、2つ目のSELECTボックスに項目がないため「オブジェクトがありません」のエラーが出ます。
-------------------------------------------------------
<html>
<head>
<SCRIPT language="vbscript">
<!--
option explicit
sub selchng()
dim strsel
strsel = sel1.selectedIndex
Select Case strsel
Case "1"
sel2.item(0).value = "1"
sel2.item(0).text = "1"
sel2.item(1).value = "2"
sel2.item(1).text = "2"
Case "2"
sel2.item(0).value = "a"
sel2.item(0).text = "a"
sel2.item(1).value = "b"
sel2.item(1).text = "b"
sel2.item(2).value = "c"
sel2.item(2).text = "c"
Case else
sel2.item(0).value = "A"
sel2.item(0).text = "A"
End Select
end sub
-->
</SCRIPT>
</head>
<body>
<select name="sel1" onchange=selchng()>
<option value="1" selected>1</option>
<option value="2" >2</option>
<option value="3" >3</option>
</select>
<select name="sel2">
</select>
</body>
</html>
No.3ベストアンサー
- 回答日時:
#1の方と同じですがVBScript版です。
strsel = sel1.selectedIndex はセレクトボックスの順番で取得(0~)
この場合Caseの設定は
case 0
case 1
case 2
となる
sstrsel = el1.value にするとオプションのValue値から取得
この場合Caseの設定は
case "1"
case "2"
case "3"
となる
<html>
<head>
<SCRIPT language="vbscript">
<!--
option explicit
sub selchng()
dim strsel
strsel = sel1.value
Select Case strsel
Case "1"
sel2.options.length = 2
sel2.options(0).value = "1"
sel2.options(0).text = "1"
sel2.options(1).value = "2"
sel2.options(1).text = "2"
Case "2"
sel2.options.length = 3
sel2.options(0).value = "a"
sel2.options(0).text = "a"
sel2.options(1).value = "b"
sel2.options(1).text = "b"
sel2.options(2).value = "c"
sel2.options(2).text = "c"
Case else
sel2.options.length = 1
sel2.options(0).value = "A"
sel2.options(0).text = "A"
End Select
end sub
-->
</SCRIPT>
</head>
<body>
<select name="sel1" onchange=selchng()>
<option value="1" selected>1</option>
<option value="2" >2</option>
<option value="3" >3</option>
</select>
<select name="sel2">
</select>
</body>
</html>
No.2
- 回答日時:
Case "1" の後に
sel2.options.length = 2
Case "2" の後に
sel2.options.length = 3
Case else の後に
sel2.options.length = 1
を挿入してオプション要素の数を指定してやればできます。
No.1
- 回答日時:
VBの関数が解らないのですが以下のソースなら動きます…
単に「sel2.length」のような指定をしていない可能性って無いですかね?
<html>
<head>
<SCRIPT language="JavaScript">
<!-- //
function func(zzzz){
switch(zzzz.sel1.selectedIndex){
case 0:
zzzz.sel2.length = 2;
zzzz.sel2.options[0].value = "1" ;
zzzz.sel2.options[0].text = "1" ;
zzzz.sel2.options[1].value = "2" ;
zzzz.sel2.options[1].text = "2" ;
break;
case 1:
zzzz.sel2.length = 3;
zzzz.sel2.options[0].value = "a" ;
zzzz.sel2.options[0].text = "a" ;
zzzz.sel2.options[1].value = "b" ;
zzzz.sel2.options[1].text = "b" ;
zzzz.sel2.options[2].value = "c" ;
zzzz.sel2.options[2].text = "c" ;
break;
case 2:
zzzz.sel2.length = 1;
zzzz.sel2.options[0].value = "A" ;
zzzz.sel2.options[0].text = "A" ;
break;
}
}
// -->
</SCRIPT>
</head>
<body onLoad="func(ffff)">
<form name="ffff">
<select name="sel1" onchange="func(ffff)">
<option value="1" selected>1</option>
<option value="2" >2</option>
<option value="3" >3</option>
</select>
<select name="sel2">
</select>
</form>
</body>
</html>
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- JavaScript 以前の質問だと、どの条件でも配列が表示されてしまいます。 1 2022/07/09 11:40
- JavaScript セレクトボックスを2つ選択してメッセージなどを表示するには。~運賃検索プログラムを完成させたい~ 1 2022/07/22 11:10
- JavaScript セレクトボックスを2つ設けて選択して初めてメッセを表示 1 2022/07/27 12:15
- JavaScript switch文のswitch(n)の部分を複数の値にするか、if文に変えてほしいです。 1 2022/07/27 17:18
- JavaScript JavascriptからSQLへ繋ぎ方が分からない 3 2022/07/07 00:27
- JavaScript console.logがどうしても2つ機能しないのでアドバイスをくださいお願いします 2 2022/07/07 22:13
- JavaScript セレクトボックスで配列を呼び出したい。 1 2022/07/08 20:14
- JavaScript 2段階プルダウンで1段階目の選択を終えた後に選択ボックスを見えなくしたい 2 2022/07/05 21:58
- JavaScript 電車の運賃を出すプログラムを作っています。 2 2022/06/22 09:36
- JavaScript 中百舌鳥駅と深井駅を入れ替えて選択しても同じ挙動にしたいです。 2 2022/06/24 18:45
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
VBScriptでHTMLのセレクトボックスで表示されている値に指定したい
その他(プログラミング・Web制作)
-
HTAのウィンドウを閉じるには・・。
ホームページ作成・プログラミング
-
javascriptでセレクトボックスのselected"を動的につ"
JavaScript
-
-
4
リクエストに応じたselectedの初期値設定方法
Java
-
5
VBSで変数の宣言はできないのですか?
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
onedrive にexcelファイルをア...
-
エクセルに張り付けた写真のフ...
-
ffftpでファイル取得が0バイト...
-
【VB.NET】App.configにファイ...
-
【VB.NET】Excelの最終行までの...
-
連想配列を配列に格納したいで...
-
Windows10にデュアルブートでXP...
-
aspxをhtmlに変換する方法について
-
LEDで電光掲示板に「A B C D E...
-
vba 空のデータをSplitする時の...
-
Accessのトグルボタンでサブフ...
-
Windowsで複数のファイルを同じ...
-
VBAでPDFを作成する際、同じ名...
-
”KINGSOFT WPSのVBエディタ画面...
-
discordについての質問です。久...
-
asp.netにてgridviewの列を動的...
-
バッチで当日日付で作成される...
-
VBA 複数のテキストボックスと...
-
グラフをC#のASP.net MVCで表示...
-
phpのファイルがブラウザで開か...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
SELECTボックスの内容を動的に...
-
リストボックスで未選択の項目...
-
リストボックスを、右クリック...
-
リストボックスのselectedindex...
-
select case文について
-
リストボックスでフリー入力したい
-
フォームで「年(西暦)」を今...
-
リストボックスから選んだ項目...
-
リストボックスの値の再表示
-
ASP.NET 2.0 『×』の表示について
-
MySQLから列を取得し、リストボ...
-
リストボックスの文字色を変更
-
HTMLの値の渡し方について質問...
-
ACCESSのレポートの表示...
-
フォームのtextareaにnl2brを使...
-
奇数・偶数の区別をプログラミング
-
遷移先のURLにパラメータを表示...
-
aspxでIFみたいなことがしたい
-
ASP.netで、CheckBoxListのSele...
-
phpの<br>\\nと\\nとエスケープ...
おすすめ情報