出来るのだＡＳＰ Ｑ＆Ａ掲示板（過去ＬＯＧ） 　訪問数 52046 昨日 889 今日 776
     【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。
Topに戻る 掲示板に戻る 検索 削除 管理者
[704] Re:リロードについて
投稿者：YasNet(管理人)さん 2001/10/11 1:44:41
こんにちは　ＹａｓＮｅｔです。
　
> 表示をさせたいのですが、自分自身をactionで再読み込みすると親ウィンドウより引き継いだ
受け取った値をhidden にセットしておくとだめ？ですか？

ほかは、アクションの時にクッキーに渡すとか・・・

これで、役に立ったのだろうか・・・不安だ・・・
　
では　では
> データが消えてしまいます。これを、消さずにおきたのですが可能なのでしょうか？
> また、データを取得する良い方法がありましたら教えてください。
>
> ちょっと長いですがソースです・・・
> 親ウィンドウ
> ----------------------
> <FORM id="form1" name="form1">
> <TABLE bgcolor="#FFFFFF" border="1" width="700" cellspacing="0" cellpadding="5">
> <TR BGCOLOR="#ffffff">
> <TD bgcolor="#CCFFFF">
> <INPUT type="checkbox" name="c" value="1">
> </TD>
> <TD bgcolor="#FFFFFF">あああ</TD>
> </TR>
> <TR BGCOLOR="#ffffff">
> <TD bgcolor="#CCFFFF">
> <INPUT type="checkbox" name="c" value="2">
> </TD>
> <TD bgcolor="#FFFFFF">いいい</TD>
> </TR>
> <TR BGCOLOR="#ffffff">
> <TD bgcolor="#CCFFFF">
> <INPUT type="checkbox" name="c" value="3">
> </TD>
> <TD bgcolor="#FFFFFF">ううう</TD>
> </TR>
> </TABLE>
> <INPUT type="button" name="qa" value="問合せ" onclick="JavaScript:PF_QA(4)">
> <INPUT type="reset" name="reset" value="リセット"></CENTER>
> </FORM>
> ----------------------
>
> 子ウィンドウ
> ----------------------
> <!--#INCLUDE FILE="./include/dbcom.inc"-->
> <!--#INCLUDE FILE="./include/Page.inc"-->
> <!--#INCLUDE FILE="./include/session.inc"-->
> <!--#INCLUDE FILE="./include/qa_sub.inc"-->
> <%
>
> main
>
> dim WTB
> '*************************************************************************************************
> ' メイン
> '*************************************************************************************************
> sub main
>
> %>
> <html><head>
> <meta http-equiv="Content-Type" content="text/html; charset=Shift_JIS">
> <SCRIPT language="JavaScript">
> <!--
> function CloseWin(){
> window.close();
> }
>
> function PF_Tenki()
> {
> ----ここでデータを見つけにいけばいいのかな・・？
> }
> // -->
> </SCRIPT>
> </head>
>
> <!--ボディ-->
> <body bgcolor="#FFFFFF" text="#000000">
> <table width="565" border="0" cellspacing="0" cellpadding="0">
> <%
> call set_key1()
> %>
> </table>
> <FORM name="toiawase" id="toiawase"><center>
> <TABLE>
> <tr>
> <TD>
> <TABLE border="0" cellpadding="5" cellspacing="0">
> <TR>
> <TD>
> <INPUT type="text" name="kai_code" size="11">
> </TD>
> </TR>
> <TR>
> <TD>
> <INPUT type="button" value="転記" onclick="JavaScript:PF_Tenki()">
> </TD>
> </TR>
> <TR>
> <TD>
> <INPUT type="text" name="namae" size="18">
> </TD>
> </TR>
> <TR>
> <TD>
> <INPUT type="text" name="email" size="34">
> </TD>
> </TR>
> </TABLE>
> </TD>
> </TR>
> </TABLE>
> </FORM>
> </body>
> </html>
> <%
> dbClose
> end sub
> %>
> ----------------------
> include
> ----------------------
> <%
> sub set_key1()
> dim w_no
> dim w_cd
> dim i
> m_cnt = 0
> For i = 1 To Request.Form("c").Count
> m_cnt = m_cnt + 1
> P_NO = Request.Form("c")(i)
> w_no = Null2Zero(P_NO)
> w_cd = "sCD" & cstr(w_no)
> session("F_FIND_KEYS") = session(w_cd)
> call data_get1(m_cnt)
> Next
> end sub
> '--------------------------
> sub data_get1(cnt)
> SQL = "SELECT "
> SQL = SQL & "kai_name, kai_code"
> SQL = SQL & " FROM member"
> SQL = SQL & " WHERE " & "kai_code = '" & session("F_FIND_KEYS") & "'"
> Set TB = objConn.Execute(SQL,clng(0))
> if NOT TB.BOF then
> call sub_table(TB("kai_name").value,TB("kai_code").value,cnt)
> else
> Response.write "エラーです。"
> end If
> TB.close
> Set TB=Nothing
> end sub
> %>
リロードについて 　 Trapさん [2001/10/11 0:02:31] [701]
　 Re:リロードについて 　 YasNet(管理人)さん [2001/10/11 1:44:41] [704]

TreeBBS For ASP V.0.1.3
Program By ＹａｓＮｅｔ