Recordsetの結果をラジオボタンに表示するには?

[上に] [前に] [次に]
ろみろみ [E-Mail] 2000/06/06(火) 16:43:21
こんにちは。また質問させて下さい。

ラジオボタン1、ラジオボタン2があり、
Recordsetの結果、Flg_Check = 0 なら、ラジオボタン1を選択状態に、
Flg_Check = 1 なら、ラジオボタン2を選択状態にする方法をどなたか
教えてください。

boolean 2000/06/06(火) 19:01:22
JavaScriptで、
document.FormName.RadioName[Flg_Check].click();
(onClickのイベントあり)
又は、
document.FormName.RadioName[Flg_Check].checked = true;
(onClickのイベントなし)
で可能ですけど、
# FormNameとRadioNameは変えてね。
>Recordsetの結果
って何ですか?

ろみろみ [E-Mail] 2000/06/07(水) 09:37:23
booleanさんありがとうございます。

私はVBScriptで書いているのですが、SQLでSELECT文を渡して、
その条件にあったものが抽出された結果がRecordsetに格納されて
いるみたいです。

そのRecordsetのうちのFlg_Check=0のときに、ラジオボタン1を
チェックした状態にしたかったのです。

booleanさんのアドバイスを参考に自分なりにやってみたのですが、
まだできてません。
もう少しがんばってみます。

ろみろみ [E-Mail] 2000/06/07(水) 11:04:27
はぁ、うまくいきません。

<% IF wRs.Fields("FLG_UKE") = true Then
Response.Write document.frm.tamawarisyo.checked
End If %>

このように書いてみたのですが、うまくいきません。
オブジェクトがありませんとエラーメッセージが出ます。

ろみろみ [E-Mail] 2000/06/07(水) 11:30:33
間違えました。

<% IF wRs.Fields("FLG_UKE") = true Then
document.frm.tamawarisyo.checked
End If %>

訂正します。

boolean 2000/06/07(水) 13:33:08
うっ…。VBScriptなんだ。
やったことないんだよね。
誰か詳しい人にタッチ。

と、これではあまりにも無責任なので…
> <% IF wRs.Fields("FLG_UKE") = true Then
> document.frm.tamawarisyo.checked
> End If %>
↑これが、FLG_UKEがtrue(Flg_Check=1)なら、
ラジオボタン1を選択状態にしたスクリプトを書く
と勝手に解釈して、
document.frm.tamawarisyo.checked

document.frm.tamawarisyo[1].checked = true ;
としたらどうなる?
それから、
>オブジェクトがありませんとエラーメッセージが出ます。
とのことなので、frmとかtamawarisyoとかがあってるかもチェックね。

あと、これJavaScriptのサンプルだから、なんとか頑張って。(結局無責任)

<HTML>
<HEAD>
<SCRIPT LANGUAGE="JavaScript">
<!--
function func1(flag){
    document.test.rd[flag].click() ;
}
function func2(flag){
    document.test.rd.checked
}
//-->
</SCRIPT>
</HEAD>

<BODY>
<FORM NAME="test">
<INPUT TYPE="radio" NAME="rd" VALUE="0" onClick="alert('button1')">button1
<INPUT TYPE="radio" NAME="rd" VALUE="1" onClick="alert('button2')">button2
<INPUT TYPE="button" NAME="bt1" VALUE="check1" onClick="func1(0)">
<INPUT TYPE="button" NAME="bt2" VALUE="check2" onClick="func2(1)">
</FORM>
</BODY>
</HTML>

boolean 2000/06/07(水) 13:35:03
>document.test.rd.checked
document.test.rd[flag].checked = true ;
の誤り。

ろみろみ [E-Mail] 2000/06/07(水) 14:01:42
[[解決]]
booleanさんどうもありがとうございます♪
なんて親切な人だぁ。。。感激!

IF wRs.Fields("FLG_UKE") = true Then
   <INPUT Type="checkbox" Name="aaa" checked>チェック1
Else
   <INPUT Type="checkbox" Name="aaa">チェック1
End IF
このように書けばうまくいきました。

ご迷惑おかけしました。
本当にどうもありがとうございました。

[上に] [前に] [次に]