• 締切済み

ASP(VBScript)で自動連番

こんばんは。 伝票番号を客先ごとに自動連番にしたいのですが、どうしたら良いか解りません。 私がやりたいのは、 (1)リストボックスで客先を選択する。 (2)DBを見にいく。 (3)フォームに客先ごと連番を表示する。 できますでしょうか。是非ともよろしくお願いします。

みんなの回答

noname#102878
noname#102878
回答No.2

ASPというよりはデータベース設計の話ですよね？ 全ての客先の最終番号を管理するテーブルを作ってはどうでしょうか。 顧客ID、その顧客の最終番号、以上２つのフィールドを持っていれば良いかと。 新規伝票を保存するタイミングで最終番号管理テーブルから客先コードでレコードを取得し、その最終番号+1の数値を伝票に付与して伝票を保存。最終番号管理テーブルの該当レコードの数値も+1して更新。 てな感じでどうでしょうか。 伝票保存～最終番号増加までは他のユーザーによる更新をロックする必要があると思いますが。

  • Te-Sho
  • ベストアンサー率52% (247/472)
回答No.1

ちょっとわかりづらいですが私なりに取った意味で解説します。 1)リストボックスを選ぶとonsubmitイベントなにかでブラウザからサーバにhttpリクエストを掛けなければならないですね。 2)リクエストを受けたaspがDBを検索 3)連番でテーブルに表示 <% dim no no = 0 -DBのアクセスの定義とSQL　レコードセットrstのオープン- do while Not rst.eof%> <tr> <% no = no + 1 %> <td><%=no%></td> <td><%=rst.fields("項目名1")%></td> <td><%=rst.fields("項目名2")%></td> テーブル編集 </tr> <%loop%> これでダメですか？

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

関連するQ&A

  • アクセスで新規にレコードを追加する際自動的に番号を付けたい。

    アクセス2000で売上の管理をしています。 「管理番号」を使って伝票の処理をしているのですが、 フォームに新規に伝票を入力するとき、自動的に番号を付けたいんです。 できたら、フォーム上に「伝票新規」のボタンを作って、そのボタンを押したら テキストボックスに番号を表示させるようにしたいのですが、 どうしたらよいのかわからないんです！ どなたか教えていただけませんか？ よろしくお願いします。

  • ACCESS2000でグループごとに連番を振りたい

    ACCESSで登録フォームを作成し、 そこで、下記のようなテーブルを作ろうとしてます。 伝票番号　明細番号　商品 　　１　　　１　　　りんご 　　１　　　２　　　みかん 　　２　　　１　　　すいか 　　２　　　２　　　かき 　　１　　　３　　　なし 　　３　　　１　　　くり 伝票番号ごとに連番を振って行きたいのですが、 オートナンバー型にしてしまうと、伝票番号に 関係なく、連番を振ってしまいます。 この場合の解決方法を教えていただけないでしょうか。

  • Ａｃｃｅｓｓ2000　連番の振り方

    次のようなテーブルに対して連番を振りたいのです。 伝票番号　　日付　　　行番号　　　金額 00001　　　2007/01/01　　1　　　　1000 00001　　　2007/01/01　　2　　　　1000 00001　　　2007/01/01　　3　　　　1000 00002　　　2007/01/02　　1　　　　1000 00002　　　2007/01/02　　2　　　　1000 00002　　　2007/01/02　　3　　　　1000 以下はこのような状態で続く。 ここで知りたいのは、同日のデータに対しては伝票番号は同じ番号で 行番号のみ連番を振る。 日が変われば伝票番号は次の番号になり、行番号は新たに1から 振りなおすというものです。 クエリーでこのようなことは可能でしょうか。 やはりVBAで組まないと出来ないのでしょうか。 この方法を教えていただきたくお願いいたします。

  • ACCESSで日付ごとに自動連番（日付＋連番）する方法

    ACCESSで日付ごとに自動連番（日付＋連番）する方法 ACCESSとvba、共に初心者です。 ACCESS2003を使用しています。日付ごとに自動連番する方法が知りたくいろいろ調べていたところ過去ログ（http://okwave.jp/qa/q726921.html）のベストアンサーさんの回答にたどりつきました。 とりあえず勉強と思い紹介されている通りにテーブル作成からフォームのレコード移動時へのコード貼り付けまで一通り行ってみましたが、自動連番とならず同じ番号のままとなってしまいます。（日付はパソコンの日付更新時にちゃんと反映されています。） 自動連番されないのは何が原因なのでしょうか。どなたかご教授の程よろしくお願いします。 例）DATEが5月5日の場合のIDへの記載値 　0505001 　0505001←ここが001のまま0505002にしたい。 　0506001←日付が変われば0506（5月6日）に変わる。 以上、よろしくお願いいたします。

  • Excel2007での自動連番の振り方

    Excel初心者です。 自動連番の振り方を教えて下さい。 宜しくお願いします! A列に連番 B列に文章 を入力したいのですが A1のセルが「1」として B1のセルに文字を入力したときに A2のセルに自動的に「2」と表示される B2のセルに文字を入力したときに A3のセルに自動的に「3」と表示される ↓ 以下、同じ方式で自動的に連番が振られていく・・・ この方法をご存じの方がいらっしゃいましたら、 ご回答宜しくお願いいたします。

  • エクセルの連番について

    例えばＡ列が商品コード番号を入力する行でＢ列が伝票番号を入力する行だとします。Ａ列に入力すると自動的にＢ列に連番が入るようにしたいのですが・・・ 　　Ａ　　Ｂ １ １１　 １ ２ ２３　 ２ ３ ５４　 ３ こんな感じですが。

  • 【続続】Access2002で連番のついた納品書を出力したい

    1. http://oshiete1.goo.ne.jp/qa5243829.html 2. http://oshiete1.goo.ne.jp/qa5257035.html 上記のように、質問してまいりまして、後一歩まで参りました。 これまでの経緯は下記のとおりです。 1.複数の注文をまとめ、それにユニークな連番を振って納品書を作りたい（これが大元の要望でした） 2.上記質問の中でいただいた回答で、フォームを使って納品書番号をオートナンバーで振ることは成功（私の理解不足で回答者様を振り回してしまいましたが、思うような連番（納品書番号）を自動的に振ることに成功しました） 3.フォームのサブウィンドウ(？）を用いて、納品対象の注文を選択したい（ここでとまっています） テーブルは下記のとおりです。（計４つ） 1.従業員マスタ（データ投入済み） ・従業員コード（テキスト） ・従業員名（テキスト） ・従業員名カナ（テキスト） 2.納品書番号（データはフォームから自動生成） ・納品書番号（オートナンバー） ・納品日付（日付） ・従業員コード（テキスト） 3.注文情報（データ投入済み） ・注文番号（テキスト） ・従業員コード（テキスト） ・商品ID（テキスト） ・数量（数値） ・納品書番号（数値） 4.商品マスタ（データ投入済み） ・商品ID（テキスト） ・商品名（テキスト） ・単価（数値） 以上の4つのテーブルでテストDBを作っています。 上述したとおり、フォームで、 1.新規レコードの作製 2.納品日付入力 3.コンボボックス（従業員名、カナ）をコンボボックスで選択 という手順を踏み、納品書番号が自動的に振られるフォームまで作成できました。（画像添付） 次の段階ですが、フォームの中にサブフォーム(？）を作成し、「どの注文で発生した商品を」納品するのか、注文情報テーブルから選択し、レポートにして打ち出したいのです。 納品書の基本単位は従業員ごとですが、納品がバラバラに行なわれることが多く（例：Aさんが１、２、３と注文したとしても、２、だけ先に納品され、１、３が別の日に納品される）、注文情報から「注文番号」で選択できれば。。。と思っています。 前の質問でもお答えはいただいたのですが、私の知識不足でうまく実現できませんでした。 他に、必要な情報がございましたら提示いたしますので、よろしくお願いします。 何卒よろしくお願いします。

  • ACCESS フォームに自動連番をふる

    Accessでテーブル→クエリ→フォームと作成し、フォームから特定条件を指定して データを抽出しました。 その抽出したデータに自動連番をつける方法を教えてください。

  • VBScriptでMsgBoxのYesNoボックスを自動的にクリックしたい

    VBScriptであるボタンをクリックして表示された、MsgBoxの表示されたYes Noボックスを自動的にクリックしたいと考えています。 下記のように、VBScriptでボタンやコンボボックスを選んだりクリックした後にMsgBoxで”はい”、”いいえ”が表示されて、その表示されたMsgBoxで”はい”をクリックしたいのですが、コマンドが分からず困っています。 IEオブジェクト.Document.フォーム名.コンボボックス名.selectedIndex = 0からの番号

  • クエリで自動連番のふり方

    　次のようなテーブル（T_連番）が元となったクエリ（Q_連番）があります。 テーブル：T_連番 　氏名 　あああ　あああ 　いいい　いいい 　ううう　ううう 　えええ　えええ 　いうえ　いうえ 　あかさ　あかさ 　えおか　えおか クエリ：Q_連番 　氏名 　あああ　あああ 　いいい　いいい 　ううう　ううう 　えええ　えええ 　いうえ　いうえ 　あかさ　あかさ 　えおか　えおか 　Q_連番では、T_連番をそのままフィールドに入れていますので、 同じ並びで表示となります。この同じ並びとなったものに、下記のように自動で連番を ふりたいと考えています。 クエリ：Q_連番 　氏名　　　　　　　　連番 　あああ　あああ　　　1 　いいい　いいい　　　2 　ううう　ううう　　　3 　えええ　えええ　　　4 　いうえ　いうえ　　　5 　あかさ　あかさ　　　6 　えおか　えおか　　　7 　インターネットで色々検索しましたが分かりませんでしたので、ご教示をお願いいたします。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

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

質問する