• 締切済み

ASP間でレコードセット情報を渡せる？

お世話になります。ASP初心者です。 レコードセットの結果を表示するASPで直接Select文を投げれば話は早いのですが、 開発規定により、どうしてもA.ASPが結果セットを取得し、それを表示用:B.ASPに横流し して、B.ASPはA.ASPから受け取った結果セットを表示するだけ、という二つのASPを作らなければなりません。 ・レコードセットを他のASPに渡す方法、 ・それを受け取る方法 この二つについて、ご存知の方いらっしゃいましたらご回答の程、よろしくお願いします。

みんなの回答

  • yanmaa
  • ベストアンサー率45% (207/457)
回答No.1

値は渡せるのはご存知ですよね。↓こう言うの http://www.okweb.ne.jp/kotaeru.php3?q=72654 でもレコードセットそのものは渡せないじゃないの？ やった事無いのでそのあたりは曖昧ですので信じないで下さい。 Aが条件入力でその結果がBを出すという画面を作るなら普通は最初に提示した方法を取るのでしょうね。

uinona
質問者

お礼

サイトを教えて頂いてありがとうございます。 このKOTAERUのように、Sessionでやりとりすれば、レコードセットも 渡せるということが分かりました。 どうもありがとうございました。

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Microsoft ASP

関連するQ&A

  • ASP レコードセットしたオブジェクトを戻り値に出来ませんか？

    ASPは本当にドキュメントが少なく困っています。 ---Main.asp---------------------------------- Dim RetRec 'DB接続 Call DBOpen() 'SQL文 strSQL = "SELECT・・・・" 'レコードオープン実行 Set RetRec = RecOpen(strSQL) 'レコードカウント取得 RecCnt = RetRet.RecordCount 　・ 　・ 　・ --DBCon.asp-------------------------- Public Function RecOpen(SQLPrm) 'オブジェクト宣言 Set G_RecMap = Server.CreateObject("ADODB.Recordset") 'レコードオープン G_RecMap.Open SQLPrm, G_Conn, 3, 3, 1 '復帰値作成 RecOpen = G_RecMap Exit Function End Function ----------------------------------------- エラー内容 オブジェクトでサポートされていないプロパティまたはメソッドです。: 'RecordCount' ・・・当然のことながら、復帰値をオブジェクトとして 拾っていないので、上記エラーが表示された。 ------------------------------------------- 上記のようにレコードセットしたオブジェクトは返せますでしょうか？同じ要領で行うと上手く行かないのですが。。。お手数ですが、よろしくお願いします Sessionの使用は禁止となっています。

  • レコードセットからレコードセットって作れますか？

    WindowsXP,VB6,SP5,で開発しています。 タイトルそのままなのですが、 ある事情で、まずはデータベース(Access)からレコードセットを作成しています。 そのレコードセットをもとに色々と抽出したいんです。 もし、データベースからSQL文で抽出するときみたいに、そのレコードセットを、 SUM(～とかGROUP化したりとかできればいいなあと思っているのですが、 その方法がわからず、2,3回遠回りしてレコードセットを作成してます。 レコードセットからレコードセットを作成することってできないのでしょうか？ わかりにくくてすみませんが、どうぞよろしくお願いしますm(_ _)m

  • VB上でのレコードセットの扱いについて

    お世話になっています。 現在VB6+SQLSERVERで開発をしているんですが、SQLで取得したレコードセットオブジェクトの扱いについての質問です。 取得したレコードセットオブジェクトをループ文等で使う場合、一旦配列に代入して使うのと、そのままMoveNext文で使うのでは、速さでは違いはありますか？

  • レコードセットの結合

    A.MDBからRS_Aというレコードセット、B.MDBからRS_Bというレコードセットを作成し、このふたつのレコードセットを一つにしたいと思います。 これは可能でしょうか? どのような方法を採ればよろしいでしょうか? とりあえずはDAOで予定しています。 よろしくお願いします。

  • DAOレコードセットから更に絞込みしたい

    VBAで質問です。あるレコードセットXをsqlで取得しました。さらにこのレコードセットにSQLを投げて絞り込みたいと思っています。例えばSQLでA,B,C列を取得しました。このA、B、C列があるレコードセットにwhereで絞り込みたいと思ってます。レコードセットXに向けて、select * from X where...というコードは投げれるのでしょうか？

  • Classic ASP で切断されたレコードセットを使う

    http://www.4guysfromrolla.com/webtech/080101-1.shtml 上記のサイトを参考に切断されたレコードセットを利用しようといたしましたが、 ADODB.Recordset エラー '800a0e78' オブジェクトが閉じている場合は、操作は許可されません。 とエラーが発生してしまいます。 レコードセットを取得してくるFunctionの中の、上記サイトでいうoRS.Closeの部分をコメントアウトするとコードは通ります。 いったい何が問題なのでしょうか？上記記事が古いのでもうこの方法は使えないということなのでしょうか。 ご教示のほどよろしくお願い申し上げます。

  • レコードセット抽出後、エラーが出てカーソルの移動ができません。

    SQLServer2000を利用して、ASPで開発を行なっています。 ２つのテーブルA,Bがあり、Aに対するクエリをサブクエリとした、Bへのクエリを実行した結果をレコードセットとして取得し、カーソルの移動を行なおうとしたところ、 「カーソルが宣言された後にテーブル スキーマが変更されたので、カーソル操作を完了できませんでした。」とのエラーが表示され、カーソルの移動が行なえない状態となっています。 このエラーは、サブクエリの結果によって、出る、出ないがあるのですが、データ的には、出るデータと出ないデータの差異はほとんどありません。 （中に入っているデータは若干異なっていますが、型としては全く同じです。） また、検証用に設置した別の表領域で処理を行なったところ、一切エラーは表示されていません。 そもそも、このエラーはどのような原因で発生し、どういった方法で解決することができるのでしょうか。 よろしくお願いいたします。 なお、下に、その際に使用したクエリの概要を記します。 select fldB1, fldB2, case when (select fldA1 from TBL_A where fldA2 = ***) then 1 else '' end as fldAB1 from TBL_B where fldB3 = ****

  • レコードセット検索

    excel　vbaでレコードセットの中身を検索して レコードセット内の別フィールドのデータを取得する方法がわかりません。やりたいことは、 ｜店舗名称｜店番号｜ 　渋谷店　　　01 　池袋店　　　02 　目黒店　　　03 というレコードセットがあって渋谷店を コンボボックスで選択したときに、店番号の"01"が 別のコンボボックスで表示されるようにしたいのですが うまくいきません。どなたか分かる方教えてください。 お願いします。

  • ASP　レコードセットオブジェクト

    コレクションにFieldsからAddし、展開するとエラーが発生します。（エラーは下記） レコードが単純に取得できていないと見せかけて、Recordcountはしっかりと取れてますし、仮にコレクションAdd前に変数に置き換えると問題なくAddされています。 この現象について何か問題は考えられますか？ 補足につきましては徹夜作業につき随時行います。 ソースが長すぎて、個別で送ります。 例） 　(1)'オブジェクト直接からのAddの場合 MSTCol.Add "ID", PrmRec.Fields("ID")・・・× 　(2)'変数に置き換えてからのAddの場合 S_ID = PrmRec.Fields("ID") MSTCol.Add "ID", S_ID　・・・○ --ソース---------------------------------------- 2|SQL = "SELECT ID, NAME, TEL FROM MST_PEOPLE ORDER BY ID" 3| 'DB接続＆レコードセット 4| Set RetRec = DBCon_RecSet(SQL) 5| 'レコード置き換え処理実行 6| Set RetListObj = CreateListObj(G_RecSearch) 7|'確認としての処理（テスト段階） 8|Set Item_NO = RetListObj(1) 9|value1 = Item_NO.Item("TEL") 10|Response.Write(Value1) エラー タイプ ADODB.Field (0x800A0BCD) BOF と EOF のいずれかが True になっているか、または現在のレコードが削除されています。要求された操作には、現在のレコードが必要です。 エラー行数13行目

  • ACCESS レコードセット

    非連結フォーム(frm_B)のOPEN時にADOレコードセットでデータを表示させ、更新ボタンを押すと、追加クエリでそのフォーム上で表示されたデータをテーブル(tbl_B)に新規登録させ、さらにその非連結フォームには別のフォームの内容を表示させるVBAを書きましたが、最後に別のフォームの内容で非連結フォームにデータをセットしたとき？にテーブルのデータも更新されてしまいます。最初にテーブルに追加したデータとは切り離したいのですがどうすればうまくいくのでしょうか。 ・フォームfrm_BをOPEN 'DAOレコードセット Dim dbDAO As DAO.Database Dim rsDAO As DAO.Recordset Dim stSQL As String stSQL = "SELECT No.,規格No.,改訂No. FROM tbl_B " _ & "WHERE 規格No. ='" & Forms![frm_A].[規格No.] & "'" _ & "AND 改訂No. =" & Forms![frm_A].[改訂No.] & "" 'DAOレコードセット Set dbDAO = CurrentDb Set rsDAO = dbDAO.OpenRecordset(stSQL) Set Me.Recordset = rsDAO Me![No.].ControlSource = "No." Me![規格No.].ControlSource = "規格No." Me![改訂No.].ControlSource = "改訂No." 'DAOレコードセットクローズ Set rsDAO = Nothing Set dbDAO = Nothing ・更新ボタンクリック Private Sub cb_kaitei_Click() Dim stDocName As String 　　'追加クエリ stDocName = "q_B" DoCmd.OpenQuery stDocName, acNormal, acEdit Forms![frm_B].SetFocus Me![No.] = Forms![frm_A].[No.] Me![規格No.] = Forms![frm_A].[規格No.] Me![改訂No.] = Forms![frm_A].[改訂No.] ・ このときにレコードセットで追加したレコードのほうも更新されてしまいます。これを別のレコードと判断させたいのです。よろしくお願いします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する