出来るのだＡＳＰＱ＆Ａ掲示板（過去ＬＯＧ）

出来るのだＡＳＰＱ＆Ａ掲示板（過去ＬＯＧ） 　訪問数 52046 昨日 889 今日 776
【PR】パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。

Topに戻る

掲示板に戻る

検索

削除

管理者

[277] Re:コンボBOXの値を次の画面へ引継ぎたい

コメントする

投稿者：YasNet(管理人)さん 01/06/13 15:12:24

こんにちはＹａｓＮｅｔです

> > > コンボboxの値を変更した時点ではRequest.QueryString("SELECT")には値が入っています。
> > > いざ検索ボタンを押した時にRequest.QueryString("SELECT")に値が引き継がれていない事が確認できました。
> > >
> > > コンボboxの値を変更した時にlocation=this.options[this.selectedIndex].valueとやっているのですが、これが関係あるのでしょうか？
> >
> > えっとですね、処理が今一つ見えていないのですが、検索ボタンと、OPTION の
> > フォームが別になっているのでは、無いでしょうか？
> >
> > 出来ればＨＴＭＬソースそのままあれば回答しやすいです
>
>
> 検索ボタンとoptionのフォームは同じにしています。
> わかりにくいかもしれませんが、以下にコードを書きます。
>
> <FORM name="MITSUMORI" method="post" action="xxx.asp">
> <INPUT height="27" type="submit" name="ACTION" value="検索">
> <INPUT height="27" type="submit" name="ACTION" value="登録">
> <FONT color=Tomato size=+1><%=DmStrMessage%><BR></FONT>
> <BR><BR>
>
> <TR>
> <TD height="26" align=right><NOBR>カート：</TD>
> <SELECT name="CART_NO"onChange="location=this.optionsthis.selectedIndex].value">
> <%
> DmStrSQL = "SELECT CART_NO, CART_NAME "・・・・・・
> dbからデータを取得
>
> If DmOraDs.RecordCount > 0 Then
> For i=0 To DmOraDs.RecordCount
> If DmOraDs("CART_NO") = DmStrCart_No Then
> %>
> <OPTION value="xxx.asp?SELECT=<%=DmOraDs("CART_NO") & ":" & DmOraDs("CART_NAME")%>" selected><%=DmOraDs("CART_NO") & ":" & DmOraDs("CART_NAME")%></OPTION>
> <%
> Else
> %>
> <OPTION value="xxx.asp?SELECT=<%=DmOraDs("CART_NO") & ":" & DmOraDs("CART_NAME")%>"><%=DmOraDs("CART_NO") & ":" & DmOraDs("CART_NAME")%></OPTION>
> <%
> End If
> DmOraDs.DbMoveNext
> If DmOraDs.EOF Then
> Exit For
> End If
> Next
> End If
> Set DmOraDs=Nothing
> Set PbOraDB=Nothing
> %>
> </SELECT>
> </TR>
> </FORM>
>
> などとしています。
> 私もコンボboxを使うのが初めてなので、トンチンカンな事をやっているかもしれませんので
> ご指摘をお願いします。
答えが出ました。
サブミットの内容を取得するには、ＦＯＲＭ（”MITSUMORI”）を使わないと駄目ですね。

locationを使うときはQueryStringで良いですが・・・

ではでは

削除する