三流君 ken3のmemo置き場

三流プログラマーのメモ書きです。主にVBAやWindowsの話題が多いです

挨拶・自己紹介:
失敗続きのAB型の変わり者 :三流プログラマー Ken3です
フリーのエンジニア・個人事業主です・・と書くと聞こえはイイが(それとなくカッコよく聞こえるが)、 現在は小さな案件の受注請負 と 短期派遣 で 日々つつましく?ほそぼそと暮らしてます。

よく検索されるキーワード: [質問回答XXXXさんへ] [CreateObject] [VBA] [JRA競馬オッズ]

Access ダミーテーブル と つなげないクエリー で 行数を増やす(インチキ小細工です)

http://q.hatena.ne.jp/1247217484
の質問に、調子に乗って答えてみた。
が、
読み直すと、やばいなぁ。。。
あせらないで、投稿前に確認しないとなぁ。。
激しく外している予感がするが、回答後に消せないシステムなんだよなぁ。
早い者勝ちだけど不正確な回答しちゃまずいよねぇ。

なんて、前置き、牽制球は置いといて、
ここから、調子こいて作った回答です。。。


テーブル3をダミーで作ってください。
NO
1
2
3
4
5



100
とか、100個
1から連番で作ります。※行数が100以上あったらどうするの?と言われそうですが。。。
www.youtube.com
操作動画1 : http://www.youtube.com/watch?v=4eugTa77PjU
↑ダミーのテーブル作成

テーブル1と今作ったテーブル3で
テーブル同士を つなげないクエリー を作ります。
SELECT テーブル1.番号, テーブル1.行数
FROM テーブル1, テーブル3
すると、テーブル1 * テーブル3 の積で n個データが作られます。

www.youtube.com
操作動画2 : http://www.youtube.com/watch?v=NePK40e-hf4
↑つなげないクエリーと↓条件作成まで

このままでは、使えないので、
[no]<=[行数]
で、行数を絞り込みたいと思います。

SELECT テーブル1.番号, テーブル1.行数
FROM テーブル1, テーブル3
WHERE (((IIf([no]<=[行数],"OK","NG"))="OK"))
ORDER BY テーブル1.番号;

あとは、テーブル2に追加したいので、
INSERT INTO テーブル2 ( 番号, 行数)
SELECT テーブル1.番号, テーブル1.行数
FROM テーブル1, テーブル3
WHERE (((IIf([no]<=[行数],"OK","NG"))="OK"))
ORDER BY テーブル1.番号;

で、いいのかなぁ。

テーブル2の行数が余計ですが、こんな感じです。
(↑カッコつけて動画作ってから、あとから気が付きました(笑))

ダミーテーブルとSQL文を使ってみました。
何かの参考となれば幸いです。
( 手前味噌ページ http://www.ken3.org/vba/backno/vba147.html も見て笑ってください)

Ken3 ホームページ 目次

分類:HPを大きく分けると4つの柱(分類)です。

  1. [VBA・マクロ プログラミング]の解説
    当店の人気はVBA系のCreateObject("XXXXXX.application")で他のアプリケーションを操作するサンプルが人気です
  2. [プログラマーの愚痴]では、あまり見せたくない三流プログラマーの内面かな。
    三流君を踏み台にする
  3. [古いクラシック ASP(Active Server Pages)]の解説。
  4. [元コンビニ店長時代の話]が弟に巻き込まれ、失敗した脱サラ、畑違い?の仕事で失敗。
主に上記4つの分類でHP作成やメルマガの発行を行ってます。
※更新頻度が落ちていて情報の鮮度が悪いです。



本当に三流なんです(笑):たまにスゴイですねなんて言われることもありますが、
真実は→ [三流君の真実は...] ←を初めに見てくださるとわかると思います。
(からくりは、成功例↑しか載せてなくて ヒドイ失敗例はお蔵入り迷宮入りが多かったりします)