アクセス！ＳＱＬ！ヘルプ！教えて！
■ アクセス！ＳＱＬ！ヘルプ！教えて！
1投稿者：もょもと 　投稿日：2003年04月08日(火) 18時44分03秒
商品テーブル（主キー：商品コード、フィールドに仕入先コードあり）
仕入先テーブル（主キー：仕入先コード）

の二つのテーブルがあり、商品テーブルにある商品コードを選択するときは
コンボボックスを用いて一覧から選択できる処理をしています。
なんですが、先に仕入先コードを決定したとき、参照される商品コードの範囲
に対応させたいというのがわたしの切実な願いなんです。

多分、こんな感じになるとおもうんですけど、ＳＱＬマンいませんか？

SELECT [商品].[商品コード], [商品].[商品名], [商品].[梱包単位], [商品].[販売単価] FROM 商品 WHERE <仕入先コードの一致>ORDER BY [商品].[商品コード];
2投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 18時44分25秒
何のこと？
3投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 18時45分06秒
もょもとのくせに俺がわからないような話するな
4投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 18時45分21秒
諦めて上司に辞表を託す。
5投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 18時45分29秒
昔ちょっとだけかじったな>SQL
6投稿者：もょもと 　投稿日：2003年04月08日(火) 18時47分06秒
もう、だめだ。
アクセスがわかりづらい。

これだったら最初からＳＱＬの勉強してりゃぁよかった。
誰か助けて･･･
7投稿者：もょもと 　投稿日：2003年04月08日(火) 18時57分28秒
なんて冷たいやつらだ！！

嘘でもいいから「いまちょっとやってるからもうちょっとまってね。」
ぐらい書けよ、いややっぱ嘘じゃだめだ。
8投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 18時58分19秒
♪俺は！もょもとを助けない（ダダッダー！）
9投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 18時59分29秒
ゲロに助けてもらへ。
10投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 19時10分59秒
アプせれ
11投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 19時13分36秒
♪ハンサムだから！美男子だから！（ダダッダー！）
12投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 19時21分57秒
アクセスで辛い思いしていらいあの手のは他人任せ。
13投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 19時30分16秒
ちょっとまってね。
14投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 19時30分47秒
いまちょっとやってるからもうちょっとまってね。」
15投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 19時31分37秒
試してみようかと思ったけど家のＰＣにはどっちもいれてなかった。
16投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 19時32分25秒
いまやってる所だからあと150年ぐらい待っててね。
17投稿者：もょもと 　投稿日：2003年04月08日(火) 19時36分26秒
協力者がいっぱいだ。うれしいなぁ。
18投稿者：毒鮪 　投稿日：2003年04月08日(火) 19時38分32秒
１は自己解決になってないのか
19投稿者：もょもと 　投稿日：2003年04月08日(火) 19時38分34秒
しかしアクセス、恐ろしいほどにファイルサイズが大きくなっていきます。
気が付けば８Ｍを越えてます。なんじゃこりゃ。
アップできんわ。
20投稿者：寿司 　投稿日：2003年04月08日(火) 19時40分20秒
アクセスの厚さ６センチくらいある教本、会社からかっぱらいましたけど、
一回も開いてないですよ。なんでですかね。
21投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 19時41分23秒
最適化しろよ
22投稿者：もょもと 　投稿日：2003年04月08日(火) 19時42分16秒
>>18
<>の中身を頼む。

ちなみに、今こうやったら中途半端に動いた。
仕入先を更新しても商品リストの一覧できる情報がついてこない。
つかえない･･･。

SELECT [商品].[商品コード], [商品].[商品名] FROM 商品 WHERE (([商品].[仕入先コード]) Like [forms]![見積書].[仕入先コード]) ORDER BY [商品].[商品コード];
23投稿者：毒鮪 　投稿日：2003年04月08日(火) 19時42分32秒
潰れそうにないメーカーの売れ筋ソフトですから拒否反応が起こったんじゃないですか
24投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 19時42分50秒
そういうの、見ないよね。でも薄いやつだと、これぐらいだったら
ネットにいくらでも転がってるし、って内容だし。
25投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 19時43分02秒
８年前に買ったアクセス97のJETをバージョンアップしてませんけど大丈夫ですよね？
26投稿者：もょもと 　投稿日：2003年04月08日(火) 19時45分42秒
やりたいことはＳＱＬなので、アクセスのバージョンに問題はないと思います。ただ、バグがなければ。ですけど。

その他、対応の仕方が変わったとか。なんかはやってみないとわかんないですね。
27投稿者：毒鮪 　投稿日：2003年04月08日(火) 19時45分54秒
[商品].[仕入先コード] IN　(SELECT [見積書][仕入れ先コード]　FROM [見積書])

ぜんぜんもょもとさんの話を読んでませんがこんな感じですか？
28投稿者：もょもと 　投稿日：2003年04月08日(火) 19時48分17秒
>>27
それをWHEREの後ろに入れればいいんでしょうか？
SELECTのネストっすか。
29投稿者：毒鮪 　投稿日：2003年04月08日(火) 19時51分33秒
[商品][仕入先コード]＝[見積書].[仕入先コード]
が本命なんですがもしかしたら見積書に仕入先が複数あるのかと思って
30投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 19時52分35秒
もう少し詳しく説明してくんないとわからん
31投稿者：もょもと 　投稿日：2003年04月08日(火) 19時54分20秒
すいません、これ見積じゃなくて仕入票をつくっているのです。
メインフォームで先に仕入先コードを指定して、
サブフォームの商品選択のときにメインフォームにある仕入先コード
を参照したいんです。
全部商品がでてくると多すぎて選択するのが面倒なんですよ。
32投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 19時58分09秒
Form_SF原価B明細.原価BID.Value = Form_SF原価A明細.原価AID.Value
= Form_SF原価A明細!仕入先コード
Form_SF原価B明細![項目] = Form_SF原価A明細![項目]
Form_SF原価B明細![単位] = Form_SF原価A明細![単位]
Form_SF原価B明細.Recordset.Update
Form_SF原価B明細.Recordset.AddNew
Form_SF原価A明細.Recordset.MoveNext
33投稿者：毒鮪 　投稿日：2003年04月08日(火) 20時00分23秒
[商品][仕入先コード]＝　メインフォームの仕入先コード　でいいじゃん
34投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 20時01分03秒
ＶＢＡつかっちゃだめか？
35投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 20時01分14秒
VBAとSQLの区別が付いてないヤツがいるな（←それは俺）
36投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 20時02分09秒
つか、早くアップしろ
37投稿者：34 　投稿日：2003年04月08日(火) 20時04分28秒
仕入先のコンボボックスをc1、商品のコンボボックスをc2とする。
c1の更新後処理のところでイベントプロシージャ。
テーブルは簡素化して仕入先は仕入先コードshi1のみ。
商品は商品コード、商品名、仕入先コードでsho1,sho2,sho3。
とかんがえてください。
38投稿者：34 　投稿日：2003年04月08日(火) 20時06分31秒
そうすると
Private Sub c1_AfterUpdate()
というイベントが出来上がってるのでそこに
c2.RowSource = "SELECT [商品].[sho1], [商品].[sho2] FROM [商品] WHERE [商品].[sho3]=" & c1.Value
とかく。コードはもょもとの環境に直してください。
これで今試してみてたずねてるようなことは出来ましたが。どうでしょう？
39投稿者：もょもと 　投稿日：2003年04月08日(火) 20時10分16秒
いまリロードしました。
試してみます。ありがとうございます。
40投稿者：もょもと 　投稿日：2003年04月08日(火) 20時11分42秒
>>33
やりたいことはそうなのだが、素直にできないんだよ。
アクセスは！！
41投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 20時13分02秒
いいから、さっさと最適化して圧縮してアップしろよ
42投稿者：34 　投稿日：2003年04月08日(火) 20時13分56秒
あー。c1.valueじゃだめだなぁ。ちょっとまって。
43投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 20時16分29秒
仕入先コードを選択したら、商品の中から仕入先コードが一致したのだけ表示
させたいってことか？
44投稿者：34 　投稿日：2003年04月08日(火) 20時18分13秒
やっぱりvalueでとれたや。
45投稿者：毒鮪 　投稿日：2003年04月08日(火) 20時21分20秒
>>43 そういことらしいが>>40のレスのように怒られたよ。
カラム指定するとかそんな姑息な技が必要なのかもしれないな。
46投稿者：34 　投稿日：2003年04月08日(火) 20時22分08秒
あーでも仕入先一度選ぶと商品全部表示できなくなるなぁ。ｿﾚも書いちゃえばよいんだけど。
47投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 20時22分18秒
ﾃｰﾌﾞﾙって何だ、DBｿﾌﾄにﾌｧｲﾙ作ってそれを操作してるってことか。
ﾃｰﾌﾞﾙという名称にしているからには2次元3次元で何やら操作しようということか。
アクセスというDBｿﾌﾄ使って構築したDBのﾃﾞｰﾀを
SQLという言語で操作しようということか？
48投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 20時23分36秒
おまえは入ってくんな
49投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 20時24分23秒
いや、だからもょもとの現状がわからんと答えようがない
50投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 20時26分08秒
>>48
入ってくんな、って掲示板で言われてもな・・
でも、まーｺﾞﾒﾝ　さいなら
51投稿者：毒鮪 　投稿日：2003年04月08日(火) 20時26分31秒
もょもとさんの現状を創造していろいろ役にたたないアドバイスをするというのが
このスレの趣旨じゃないのか。
52投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 20時27分45秒
まず、急いで窓から放り投げろ
53投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 20時28分30秒
つまらん
54投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 20時28分38秒
SELECT 商品テーブル.商品コード, 仕入先テーブル.名前, 仕入先テーブル.仕入先コード
FROM 仕入先テーブル INNER JOIN 商品テーブル ON 仕入先テーブル.仕入先コード = 商品テーブル.仕入先コード
WHERE (((商品テーブル.仕入先コード)=[仕入先テーブル]![仕入先コード]));

こんな感じ
55投稿者：34 　投稿日：2003年04月08日(火) 20時28分59秒
音沙汰がないな。できてるのかな？
56投稿者：もょもと 　投稿日：2003年04月08日(火) 20時31分36秒
>>34は天才。師匠とよばせてください。
大衆酒場で一杯ごちらせてほしいです。

メルアドだしてよー。
57投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 20時31分44秒
SELECT 商品テーブル.商品コード, 仕入先テーブル.名前
FROM 仕入先テーブル INNER JOIN 商品テーブル ON 仕入先テーブル.仕入先コード = 商品テーブル.仕入先コード
WHERE (((商品テーブル.仕入先コード)=フォームの仕入先コンボボックスの値));

これを使えば出来るはず
58投稿者：もょもと 　投稿日：2003年04月08日(火) 20時33分54秒
おお、次から次へと、いろんなアドバイスが。
みんなすごいよ、もう嬉しいよ、ぼくは。
毒鮪さんも>>57さんもありがとう。
59投稿者：毒鮪 　投稿日：2003年04月08日(火) 20時35分12秒
結論：SQLとか難しいことを考えずにF1キーを押す謙虚さがもょもとさんには必要。
60投稿者：もょもと 　投稿日：2003年04月08日(火) 20時37分42秒
>>47
テーブルっていうデータベースでいうところの一つないし複数のフィール
ドをもつデータ、という考え方でいいと思います。
フィールドはそれぞれ個別にデータ型（テキスト、数値、日付など）を
定義づけして･･･あぁもう頭こんがらがったやろうが！！
61投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 20時37分58秒
print "hello moyomoto";
62投稿者：34 　投稿日：2003年04月08日(火) 20時38分12秒
>もょもと
ｓｑｌマンていうからアレだったんだよねー。
むしろアクセスうぜーで攻めればもちっと解答はやかったかも。
これくらいで恐縮なのですがおごってもらいたいので
今晩メールおくります。
63投稿者：もょもと 　投稿日：2003年04月08日(火) 20時38分40秒
>>59
ヘルプみまくったよ、理解できるほど洗練されてかつ学習能力の高い脳を
もちあわせていないから、悩んでいたのだ。
64投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月08日(火) 20時39分36秒
コンボボックスって言う時点でSQLちゃうやん
65投稿者：もょもと 　投稿日：2003年04月08日(火) 20時39分37秒
>>34　>>62
katsuma@mx1.ttcn.ne.jp

です、どうぞ、どうぞ。
66投稿者：34 　投稿日：2003年04月08日(火) 20時40分13秒
携帯の方に送るよ。
67投稿者：もょもと 　投稿日：2003年04月08日(火) 20時41分49秒
コンボボックスはアクセスだけどさ･･
コントロールソースはＳＱＬだべさ。

いや、ＶＢＡで解決してくれたけども。
そうだ！>>57さんの素敵アドバイスも明日試してみるぞ！
きゃっほーぃ！
68投稿者：57 　投稿日：2003年04月08日(火) 20時44分45秒
俺のは多分出来ないな
69投稿者：57 　投稿日：2003年04月08日(火) 20時47分14秒
正確に言うともょもとには出来ないな、だな
70投稿者：もょもと 　投稿日：2003年04月08日(火) 20時47分22秒
ペンタゴン！？
だったらひさしぶりだね。
アドレスがかわっているもだぞ。
ハラミの後ろに.karubiがつきました。
71投稿者：34 　投稿日：2003年04月08日(火) 20時49分44秒
大当たりー。アドレス了解。
72投稿者：毒鮪 　投稿日：2003年04月08日(火) 20時49分57秒
素敵アドバイスはJOINとWHEREが被っているぞ。
73投稿者：57 　投稿日：2003年04月08日(火) 20時52分25秒
まあ気にするな
74投稿者：もょもと 　投稿日：2003年04月08日(火) 20時56分30秒
よし、これからオレもアクセスマスターだな。
うひゃひゃひゃ。ぼちぼち帰ります。

ありがとうございました。
協力してくれた方達に感謝します。
75投稿者：入（☆）人 　投稿日：2003年04月11日(金) 12時36分45秒
ageです。
76投稿者：もょもと 　投稿日：2003年04月11日(金) 12時38分18秒
Dlookup関数はどうやら数値だけではなかったみたいです。
すいません。すいません。
77投稿者：入（☆） 　投稿日：2003年04月11日(金) 12時40分17秒
あ、もうよかったですか。ちなみにこんなのありました。
http://support.microsoft.com/default.aspx?scid=kb;ja;JP285866
78投稿者：もょもと 　投稿日：2003年04月11日(金) 12時43分11秒
テーブルのフィールド名の主キーに〜xxxIDってつけまくってたら、
どうも半角、全角が混在しまくってえらいことになってしまった。
全部半角で入れてたつもりだったんだけど、インポートとかエクスポート
とかやってるうちに全角にされたんじゃないかなぁ。
それとも最初に入力したときに全角でいれちゃったんだろうか。
F9おしたら次にF8押して半角にする癖がついてるオレが！！

でxxIDをxxコードってかたっぱしから名前変更してたら連動していた
動作が･･。くそう、また最初からつくろうかな。
79投稿者：もょもと 　投稿日：2003年04月11日(金) 12時45分36秒
>>77
ありがとう。
しかし、なんてわかりづらいんだ。
マイクロソフトのこんちきしょうめ！
80投稿者：入（☆） 　投稿日：2003年04月11日(金) 12時46分29秒
。。たいへんだなぁ。
81投稿者：電。 　投稿日：2003年04月11日(金) 12時48分18秒
ログ読んでないんですけど、アクセスは糞なので使いません。
オラクルはもっと糞ですけど。
82投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月11日(金) 12時49分43秒
つか、数値型にしておけば全角にならないと思うんだけど
83投稿者：もょもと 　投稿日：2003年04月11日(金) 12時50分43秒
この前は、アクセスおもしろいとかいってたじゃんかよ！！
84投稿者：もょもと 　投稿日：2003年04月11日(金) 12時51分15秒
>>82
違うの、レコードデータじゃなくて、フィールド名なの。
85投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月11日(金) 12時52分24秒
じゃあ、別にどうでもいいじゃん
86投稿者：水谷わひょみ 　投稿日：2003年04月11日(金) 12時52分26秒
もしくはIME入力モードの設定を半角に指定しておけば？
87投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月11日(金) 12時52分51秒
＞オラクルはもっと糞
ここは同意だが、オラクル犬はかなりかわいい。
88投稿者：電。 　投稿日：2003年04月11日(金) 12時55分05秒
>>87
なんか10年モノのモップみたいじゃないですか、アレ。
ライコス犬のがいいです。
89投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月11日(金) 13時58分01秒
元オラクル犬
http://www.zdnet.co.jp/news/0302/06/oracle1.jpg
現オラクル犬
http://www.oracle.co.jp/press/wendy/image/wendy_top.jpg
http://www.zdnet.co.jp/news/0302/06/oracle6.jpg

どっちもかわいいなぁ。
90投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月11日(金) 14時00分43秒
ノミとダニと毛で痒い
91投稿者：もょもと 　投稿日：2003年04月11日(金) 17時37分47秒
>>77がものすごく参考になった。ありがとう。
比較するフィールドが数値でなく文字列であるときは「'」が必要だった
ってことがわかったよ。まったくこまった関数だよ、こんにゃろめ。
92投稿者：もょもと 　投稿日：2003年04月22日(火) 20時07分14秒
今度の壁は一段とでかい。
まいった。さっぱり思いつかないよ。
93投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月22日(火) 20時08分27秒
なら辞めてしまえ
94投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月22日(火) 20時10分00秒
そして俺と一緒に事業を始めないか
95投稿者：もょもと 　投稿日：2003年04月22日(火) 20時11分44秒
現時点では誰かもわからない人と一緒に再スタートするには
リスクが未知数でなんとも。

で、今回も質問したいんだが、さてどうやってやりたいことを説明
していいものか･･･、うーん。
96投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月22日(火) 20時19分02秒
諦めろ
97投稿者：五反田 　投稿日：2003年04月22日(火) 20時21分00秒
今から読むね。
98投稿者：五反田 　投稿日：2003年04月22日(火) 20時22分01秒
ちゃんと>>95を読むべきだった。
99投稿者：もょもと 　投稿日：2003年04月22日(火) 21時13分24秒
すいません、どっかにdbファイルをアップしたいのですけど、
アップできるところないでしょうか？

ちなみにやりたいことは、
出庫フォームから製品名コードを選択したときサブフォームに使用される部品を自動的にエントリーさせたいのです。
エントリーされた部品は出庫しなかった場合、マニュアルで削除する可能性も
あります。うーん、まずはアップしないと･･･
100投稿者：もょもと 　投稿日：2003年04月22日(火) 21時13分46秒
サンプルデータを作成するのに１時間かかってしまったよ。
101投稿者：五反田 　投稿日：2003年04月22日(火) 21時16分12秒
あーものがあればすぐできるかもしれないなぁ。こっちも目下頭パンク状態で。
102投稿者：もょもと 　投稿日：2003年04月22日(火) 21時18分11秒
ファイル拡張子はmdbにしてくださいませ。（Access2000版）

http://www.chemistra.net/zurubon1/source/up4103.xxx
103投稿者：もょもと 　投稿日：2003年04月22日(火) 21時19分37秒
なんて頼もしい即レスだ！！感激です！！

とりあえず、わたし、お腹すいたので、そろそろ、帰ります･･･。
帰ったあと、わたし、ネットに接続、アクセス、起動、してみます。
わたしも、がんばります。
104投稿者：こうは 　投稿日：2003年04月22日(火) 21時22分12秒
ニチコンくさい文章だ
105投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月22日(火) 21時24分06秒
残念だ、俺のアクセスは97だった
106投稿者：五反田 　投稿日：2003年04月22日(火) 21時24分31秒
更新後処理に書いてるね。どうしよう。５分くらいじゃできそうにないな。
107投稿者：もょもと 　投稿日：2003年04月22日(火) 21時25分52秒
全然５分どころか、１週間ぐらい待たせていただきますよ。
いや、やっていただけるなら、いくらでも待たせていただきます。
108投稿者：もょもと 　投稿日：2003年04月22日(火) 21時30分15秒
>>105
旧バージョンです、どうぞ。
http://www.chemistra.net/zurubon1/source/up4107.xxx

>>106
あと、今の更新処理を消していただいても問題ないです。
わたしの天才的頭脳で応用をきかせます、ﾀﾞｲｼﾞｮﾌﾞ！！！
109投稿者：五反田 　投稿日：2003年04月22日(火) 21時30分31秒
ういー。。
110投稿者：もょもと 　投稿日：2003年04月22日(火) 21時37分04秒
一旦帰宅します！帰路につきます！
111投稿者：もょもと 　投稿日：2003年04月22日(火) 22時48分23秒
やっと帰ってこれた。眠い、ひたすらに眠い。すぐに落ちてしまいそう。
112投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月22日(火) 22時50分22秒
約一時間、ノーレスってのがいいな
113投稿者：もょもと 　投稿日：2003年04月22日(火) 22時52分20秒
わたしは電車にのっていたから、そして、きっとほかのみんなは
シンキングタイムだったんだ！！！

しかし、今回のやりたいことはちょっと難しい。
どういうふうな処理をしたらいいのか考え中です。
114投稿者：毒鮪 　投稿日：2003年04月22日(火) 22時58分13秒
テキストエディターで見ても分からないな。
115投稿者：もょもと 　投稿日：2003年04月22日(火) 22時59分54秒
>>114
ええ、無理だと思います。
116投稿者：毒鮪 　投稿日：2003年04月22日(火) 23時03分41秒
>>99　を見ながら推測しよう。「製品」と「部品」は1対多の関係ですか。
117投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月22日(火) 23時09分41秒
ところで解決したんですか？
私はSQLでは日本で５本の指に入るんですけど。
118投稿者：もょもと 　投稿日：2003年04月22日(火) 23時11分51秒
>>117
こんなところ（こんなとこ呼ばわり禁止！）ですごい人がでてきました。
今回のことはともかくとして、ぜひお近づきになりたいです。
119投稿者：毒鮪 　投稿日：2003年04月22日(火) 23時13分57秒
5本の指に入る人がでてきたんじゃ、私の出る瀬がないな。117様にすべてまかせよう。
120投稿者：Fe 　投稿日：2003年04月22日(火) 23時14分33秒
5本も指が入るのか
121投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月22日(火) 23時15分33秒
ところで解決したんですか？
私はSEXでは日本で５本の指が入るんですけど。
122投稿者：もょもと 　投稿日：2003年04月22日(火) 23時17分33秒
>>116
言葉で説明するのはとても難しいのだ。わたしにとっては。
まず部品テーブルがあって、部品情報があります。
製品テーブルがあって、複数の部品が使用されています。
出庫処理をする出庫フォームで、製品を指定したときに、
製品に使用されている部品を全部エントリさせたいんです。
ちなみに、出庫フォームには出庫コード、日付、製品コードがあり、
サブフォームは出庫サブコードを主キーに設け、出庫コードでリンクを
とることで、一つの出庫レコードに複数の部品が任意の数だけ選定できる
ようになっています。
この環境下で出庫フォームで製品を指定したときに、出庫サブフォームに
製品に使用されている部品をエントリさせたいのですよ。
123投稿者：もょもと 　投稿日：2003年04月22日(火) 23時19分38秒
ちなみにこの処理はアクセスに対応しているＳＱＬだけでは
多分無理だとおもわれます。
使ってみてそんな気がしました。
ＶＢＡを使わなければいけないっぽいです。
124投稿者：毒鮪 　投稿日：2003年04月22日(火) 23時27分24秒
SELECT * FROM 部品　WHERE 部品.コード IN (SELECT 部品.コード FROM 製品　WHERE　製品コード= :製品コード）
みたいな感じでは駄目か

125投稿者：もょもと 　投稿日：2003年04月22日(火) 23時36分04秒
製品に使用される部品を表示させることは難しくはないんですよね。
ただ、手動でやる作業を自動化させたくて･･。
人手で集合ソースから一つずつ部品を選定するのが面倒ってのも大きいのだけども、実際に使用するときに人為的なミスが発生する確率を下げたいって理由もあるんです。

>>124
ごめん、すぐには解析できないのですが、これで部品がエントリされることは
ないと思います。集合ソースの定義（アクセスでいうところのクエリ）は
できるかもしれません。しかしながら、クエリはもうできているのです。
エントリ方法が！、エントリ方法がぁぁあああああ！！！

毒鮪さんにはぜひ実際にアクセスを使ってもらいたいです。
多分、こういう作業にむいてます。
126投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月22日(火) 23時45分47秒
出庫サブコードでなくて製品コードをサブフォームの主キーにするとか。
アクセス忘れたので、かなり適当に言ってるけど。
127投稿者：毒鮪 　投稿日：2003年04月22日(火) 23時46分35秒
＞人手で集合ソースから一つずつ部品を選定するのが面倒ってのも大きいのだけども、実際に使用するときに人為的なミスが発生する確率を下げたいって理由もあるんです。

ここまでは出来ているんですか？
要するにこの場合のクエリは
SELECT * FROM 部品
で後は製品に含まれている部品に絞るだけだと思うのですが
128投稿者：もょもと 　投稿日：2003年04月22日(火) 23時51分39秒
だめだ、眠くてちっとも頭がまわらない。
すいません、また明日やり直します。
最近寝不足で･･。

すんまへん、すんまへん。
129投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月22日(火) 23時52分19秒
寝不足で顔が歪んでますよ
130投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月23日(水) 04時09分40秒
http://www.terminator3.com/content/desktop_downloads/desktop_lg/t3_desktop_a01_1280.jpg
c言語？
131投稿者：五反田 　投稿日：2003年04月23日(水) 10時39分23秒
一応最低限の機能で作ってみたけどどうしようか？＞もょもと
132投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月23日(水) 10時56分20秒
130は何がいいたかったんだろう
133投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月23日(水) 10時56分51秒
画像の右端にCらしきコードがって話だと思います
134投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月23日(水) 10時57分34秒
いやだから、なぜこのスレに
135投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月23日(水) 11時02分18秒
似たような話題だと思ったのかも
136投稿者：もょもと 　投稿日：2003年04月23日(水) 12時07分49秒
どうも発想が悪いような気がしてきました。

製品コードを選択して、サブフォームに表示される部品を選定するっていうのが
よくないんじゃないかと。
まず、最初に全部品が表示される形にして、製品コードをが選択されたら表示される
部品群にフィルタをかける。

エントリさせるのではなくて、除外する方向でいけばいいかな。
でも、これをすると出庫しない場合の部品をエントリから外すことはできなくなるかもなー。
むむむ。

と、あれ、五反田さんだ。
どっかにアプしてくたんですか？
137投稿者：五反田 　投稿日：2003年04月23日(水) 12時50分32秒
あめざーねっとアップローダにあげようか？
やってることがあってるかどうかわからんし
万が一のこともあるからデータはバックアップとって試してください。
えーと。。
うｐしようとしたけどできないな。。
138投稿者：もょもと 　投稿日：2003年04月23日(水) 12時53分31秒
うっひゃほう！！
ありがとうです、ありがとうです。

なぬ、ここにある謎のあぷろだではだめでした？
139投稿者：五反田 　投稿日：2003年04月23日(水) 12時54分48秒
そうそこでできない。なんでだろ？
140投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月23日(水) 12時56分28秒
拡張子制限があるんでないの？
141投稿者：五反田 　投稿日：2003年04月23日(水) 12時56分47秒
リロードされてるだけって感じ。ほかどっかないすか？
142投稿者：もょもと 　投稿日：2003年04月23日(水) 12時56分56秒
コメントをつけて、拡張子はmdbファイルなら指定はしないで、
サイズが１Mbyte以下なら、きっと大丈夫なはず。
143投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月23日(水) 12時57分55秒
・・・メールで送れば？
144投稿者：五反田 　投稿日：2003年04月23日(水) 12時58分06秒
拡張子はいろいろ変えてるんだけどできないなぁ。。
145投稿者：五反田 　投稿日：2003年04月23日(水) 12時59分16秒
サイズは４００ｋちょい。メールで送ろうか？
146投稿者：もょもと 　投稿日：2003年04月23日(水) 13時03分36秒
アドレスいま撮ってきました。すいません、こちらにお願いします。

momoharami@hotmail.com
147投稿者：五反田 　投稿日：2003年04月23日(水) 13時08分23秒
おくったよーん。
148投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月23日(水) 13時10分11秒
俺も送った
149投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月23日(水) 13時10分39秒
俺も送ろう
150投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月23日(水) 13時11分20秒
何送ろうかな
151投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月23日(水) 13時11分44秒
僕も挨拶代わりのメールボムを送ろう。
152投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月23日(水) 13時12分12秒
毎日来るSPAMを転送してやろう
153投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月23日(水) 13時13分02秒
冷蔵庫で腐りかけてたなめたけでも送っておこうか
154投稿者：もょもと 　投稿日：2003年04月23日(水) 18時09分43秒
>>147
試してみました。ありがとうございます。やりたいことができております。

しかしながら、当方ADOを使ったことがないために解析がかなり
困難であります。これを応用して、出庫処理ができてばやりたい
ことの７割はできたことになります。
その後は在庫移動などの在庫区分情報の処理をやらなければいかんたい。
155投稿者：五反田 　投稿日：2003年04月23日(水) 18時47分02秒
それはよかった。これってどういう意味ってコード載せてもらえれば答えるよ。
しかし先は長いな。
156投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月23日(水) 18時51分20秒
自分でやらせな意味はなかろう。
157投稿者：五反田 　投稿日：2003年04月23日(水) 18時54分31秒
そうか。。
158投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月23日(水) 19時04分30秒
がっかい。。
159投稿者：もょもと 　投稿日：2003年04月23日(水) 19時28分45秒
うーむ、解析がなかなかはかどらないな。
一つ、一つのブロックの動作はなんとなくわかるのだが、
カスタマイズしようとすると、途端に動かなくなってしまう。

なんか自分に対してちいと自信がなくなってきちゃったよ。
160投稿者：もょもと 　投稿日：2003年04月23日(水) 19時32分36秒
>>158からざぶとん１０億枚没収だ。
161投稿者：ヾ(ﾟдﾟ)ﾉ゛ﾊﾞｶｰ 　投稿日：2003年04月23日(水) 19時33分24秒
その顔で自信があったら困るけどな
162投稿者：もょもと 　投稿日：2003年04月23日(水) 19時34分51秒
>>161にざぶとん３５枚。
163投稿者：もょもと 　投稿日：2003年04月23日(水) 19時47分40秒
だんだんわかっってきたぞ。
条件判断の後に実行クエリを実行していると。
ADOってこういう使い方ができるのか。なるほどのぉ。
164投稿者：五反田 　投稿日：2003年04月23日(水) 19時54分27秒
あーいいかんじそうですな。
165投稿者：毒鮪 　投稿日：2003年04月23日(水) 19時55分19秒
ログを読むとSQLが解決にはならないスレッドだな。
166投稿者：もょもと 　投稿日：2003年04月23日(水) 20時01分20秒
>>164
ありがとう、でも、もうちっと時間がかかりそうだ。
>>165
そうですね、SQLだけではなんとも。
わたし自身がSQLのことについてあまり知識を持っていないってのも
ありますが、アクセスで使用できる範囲のSQLでは限界があるようです。
そんなことより、毒鮪さんははやくアクセスを入れてください。
167投稿者：毒鮪 　投稿日：2003年04月23日(水) 20時06分28秒
買ってくれよ。
僕のために。
どうでもいいがnewがあるからC++だと思う。>>130
168投稿者：五反田 　投稿日：2003年04月23日(水) 20時11分42秒
ちょっと早くなるかもしれないので簡単に説明を。
フォームロード時に
　　　データベースと接続し、処理のあいだその接続を保つ。
出庫コード更新後に
　　　現在のレコードが新規レコードかをチェックする。
　　　新規でなければ今回必要とした処理は行わない。
製品名コード更新時に
　　　出庫サブテーブルから現在のレコードの出庫コードの情報を削除する
　　　これは製品名コード変更時の対応
　　　製品サブテーブルから選択製品名コードに該当する部品をセレクト
　　　セレクトしたレコードで一件ずつ出庫サブテーブルにインサート
でした。
ここまで書いてつけてた方がいいコードが抜けてたのでＶＢＡのエディタに
下のコードをぺったんこしてください。
169投稿者：五反田 　投稿日：2003年04月23日(水) 20時12分53秒
Private Sub Form_Unload(Cancel As Integer)

con.Close

End Sub
170投稿者：毒鮪 　投稿日：2003年04月23日(水) 20時16分14秒
終了時にカーソルをクローズしないとおかしくなるのか
171投稿者：もょもと 　投稿日：2003年04月23日(水) 20時18分33秒
ですね、処理の流れは私にも解析できました。
出庫フォームの出庫コード
　変更されていれば、フラグを立てる
出庫フォームの製品名コード
　フラグがたっていれば、製品コードの製品情報をアクションクエリ
　をつかってエントリさせる。
　アクションクエリは、
　１．現在のサブフォームにある部品レコードを削除（デリート）
　２．製品に登録されている部品の情報を取得
　３．For文をつかって部品レコートの数だけエントリ（インサート）

ここから、カスタマイズするにあたって、どうもなかなか･･･
172投稿者：五反田 　投稿日：2003年04月23日(水) 20時20分07秒
>>170
そんなに大人数で共有して使用する感じではなかったし
問題は起こらないだろうけど
一応こういう後始末は明示的にしっかりやりましょうということで。。
173投稿者：もょもと 　投稿日：2003年04月23日(水) 20時21分21秒
>>170
ありがとうです。
ちなみにこれは、サブフォームが読み込まれなかったときに
実行されるやつなのでしょうか？
ですよね。そうですよね。はっはっは。
174投稿者：五反田 　投稿日：2003年04月23日(水) 20時22分58秒
>>171
あとはスレタイどおりのＳＱＬでＧＯですよ。
ＳＱＬというよりデータベース構造をしっかり把握というとこかな？
175投稿者：五反田 　投稿日：2003年04月23日(水) 20時24分37秒
もょもとつまんない。
176投稿者：毒鮪 　投稿日：2003年04月23日(水) 20時29分13秒
開けたドアは閉めるんだよ。マッピーで学習しただろう？
177投稿者：もょもと 　投稿日：2003年04月23日(水) 20時29分18秒
あぁ、>>173

レス番間違えてますね。>>169へでした。
178投稿者：もょもと 　投稿日：2003年04月23日(水) 20時29分51秒
わたしはエレベータアクションで学習した。
179投稿者：毒鮪 　投稿日：2003年04月23日(水) 20時34分24秒
Destroyにしないアクセスが悪いんだよ。もょもとさんは悪くない。悪くない。
180投稿者：もょもと 　投稿日：2003年04月24日(木) 18時12分21秒
ＶＢＡの解析をしながらアクションクエリをいろいろ試していってたら、
アクションクエリと単純なコマンドの組み合わせマクロでやりたいことが
できてきてしまった。
すごいぞ、オレ！ありがとう、五反田！アクセス買え！毒鮪！
181投稿者：五反田 　投稿日：2003年04月24日(木) 18時43分16秒
おおおおよかったよかった。
投稿者 メール
(ﾟДﾟ) ＜