Microsoft Access

>>894
重量のデータ型を「通貨型」にするといいよ

>>894
浮動小数点型の仕様

式1:CDbl(Format([重量]*[出庫],"0.0"))
とかに汁

>895
>896
>897 ありがとうございました。とりあえず「通貨型」の結果で満足しました。
式1:CDbl(Format([重量]*[出庫],"0.0")) 　…　勉強になりました。またよろしくお願いします。

>>893
テメェでADOでSQLたたいてみたいってか
なら参考書見た方が早い希ｶﾞｽ…
ここで漏れ達が書いて教えるの、ﾂﾗいもんがあるぜ？
家に帰ったらやってみてもいいが

>>878
Office 2000 の CD-ROM から DAO360.CHM
を下記のディレクトリにコピーする。
C:\Program Files\Common Files\Microsoft Shared\DAO\

>>880 >>900
回答感謝。これから試してみます。

>899
それでSQL使ってやってみたのですが、

実行時エラー２３４２
ＲＵＮＳＱＬ／ＳＱＬの実行アクションを利用するにはＳＱＬスタートメント
からなる
引数が必要ですとでてしまうのですが・・・。

ちなみにソースプログラムは

Private Sub 合計_Click()



Dim sql As String

sql = "SELECT 顧客番号 FROM 合計金額 GROUP BY 顧客番号"

DoCmd.RunSQL sql

End Sub

>>902
>sql = "SELECT 顧客番号 FROM 合計金額 GROUP BY 顧客番号"
の最後に「;」がないよ

>903
それでもだめでした・・・。

>>904
まずはConnectionString教えれ。

俺にはただの選択クエリに見えるのだが

ConnectionStringですか？
これに関してはよくわからないのですが、記述はしていないです。

>>906の言うとおり、DoCmd.RunSQLで選択クエリ（要するにselect文)実行してどうする、
という話だと思われ

その集計の結果をどう使いまわすのかによって、やることは変わってくるが、
例えば集計の結果をレコードセットに取るなら
Set レコードセット　= Currentdb.Execute ( sql )　のような感じだし
集計の結果をフォームやレポートのソースにするなら
フォーム/レポート.recordsource = sql のような感じだし
新規クエリーを作りたいのなら
currentdb.createquerydef ("",sql)のような感じだし

とりあえず何がしたいのか書いてほしい。

>903
テーブルにある顧客番号をグループ化して
その顧客番号ごとの料金を合算させて合計金額を出すという処理を
やりたいんです。
クエリーでこの処理ができるのはわかっているのですが、
モジュールの記述にてテーブルを直接いじりたいというのがあるんです。

いまいちよく分からん。

元のテーブルがあって、それを顧客ごとに集計したクエリを作るというのは
よく分かるが、それを「テーブル上で集計して直接いじる」というのが良く分からん。
いくら集計しても、元のテーブルの内容は何ら変わらんでしょ？

�@元(テーブル)
顧客番号　料金　 日付
--------　----　----
顧客A　　　\100　5/26
顧客A　　　\150　5/27
顧客B　　　\200　5/26
顧客B　　　\250 5/27

　↓

�A集計(クエリ)
顧客番号　料金
--------　----
顧客A　　　\250
顧客B　　　\450

でしょ？この�Aを直接いじりたい、っていうことなの？

>>907
コネクションを設定してないからSQLが動いて無いのでは？

試しに
SELECT * FROM 合計金額 ;
みたいな簡単なSQLを実行してみそ。

それが成功したなら次はAccessのクエリ機能を使って本当に表示したいSQLを実行してみな。
どこでエラーが起きてるのか探すのが先決。

>908
いえ、�@のテーブルをいじって�Aのようにしようと思ったのです。
それはやっぱだめですか？

もとのテーブルを�Aのように変化させようとしたのです。

「変化」は無理だろう、普通に。いやしくもAccessはRDBだから、
テーブルの構造をほいほい変えたりは普通はやらない。
（ちなみに、クエリだって、元のテーブルをいじっているわけではない。
クエリというのはあくまで計算式だ。）

ただ、�@を元に�Aというテーブルを別個に作ることなら出来る。
それこそDocmd.RunSQL で
"select [顧客番号]、sum(料金) as [合計料金]
into [別テーブル名]
from [元テーブル]
group by [顧客番号]"
を実行すればよろしい。

"select 〜 into " は選択クエリの結果で新規テーブルを作るjet構文。

当然ながら、[別テーブル名]が既にデータベースにあったら、エラーに
なるから、「そのテーブルがデータベースにあったらdropする」という
手順が必要になることに留意。

>908、教えてくれた皆さん。
ありがとうございました。おかげさまで望んだ処理ができました。

エクセルで現在管理中のDBをアクセスで管理したいそうなのですが
アクセスは一度も触ったことが無くて容易にできるのかできないのか
解りません。　VBA等を使って自力でやってくれとのことなのですが
一応PGの経験は有りますがアクセス素人でも２〜３ヶ月あればできるでしょうか？

とんちんかんな質問ですが解る範囲でどなたかご教授くださいませ。

>>916
本買って集中して学習すればそれだけの時間があればなんとかなる。
ただし、少なくとも「容易」ではないぜよ。

よく知っている人が隣にいるとそれだけで大幅効率アップなんだけどな。

>916
Excelでやってる現在の業務の内容次第。
簡単な社員名簿ならAccess初心者でも1ヶ月もかかんないだろうし、逆に
販売管理なんぞを1から作るならとても3ヶ月じゃおさまらないと思ー

漏れの会社の営業のごみめらがアクセス使って顧客管理しているらしいが、
あたしって天才？？って大声で言ってたんだけど、
そんなに難しいモンなの？
そうとはおもえないんだけど、。
データベース設計もせずやってるみたいで、あとからあとから機能を追加しテルっぽい。
しょぼいシステム作ってそうなんだけど、みにいってやらない。

漏れの会社の営業のごみめらがアクセス使って顧客管理しているらしいが、
あたしって天才？？って大声で言ってたんだけど、
そんなに難しいモンなの？
そうとはおもえないんだけど、。
データベース設計もせずやってるみたいで、あとからあとから機能を追加しテルっぽい。
しょぼいシステム作ってそうなんだけど、みにいってやらない。

漏れの会社の営業のごみめらがアクセス使って顧客管理しているらしいが、
あたしって天才？？って大声で言ってたんだけど、
そんなに難しいモンなの？
そうとはおもえないんだけど、。
データベース設計もせずやってるみたいで、あとからあとから機能を追加しテルっぽい。
しょぼいシステム作ってそうなんだけど、みにいってやらない。

必要上から画像をリンクさせた
データベースを作ろうと思っているのだが
数千枚ある画像を一括して印刷出力なんぞできるんだろうか？
そんなの作ったことのある人いるかい？

必要上から画像をリンクさせた
データベースを作ろうと思っているのだが
数千枚ある画像を一括して印刷出力なんぞできるんだろうか？
そんなの作ったことのある人いるかい？

「やったことないけど、アクセスなんて簡単なんだろ？時間がないからやらないけど」→　一生ゴミ

>>919-921
乙カレー（ｗ
とりあえず昨日はJimﾀｿに感謝感謝

＞そんなに難しいモンなの？
使用目的によりけり。いくらでも難しくすることもできるしまた逆も然り。

＞データベース設計もせずやってるみたいで
正規化くらい覚えてからやれと。

>>922-923
＞必要上から画像をリンクさせた
＞データベースを作ろうと思っているのだが

もっと具体的に教えれ。
印刷したいだけなら、画像保存ファイルを呼び出して出力するコードを
ちゃちゃっと入れればいいだけ。

>923

んー良く分からん（当方も勉強中の身）けどたしか...
ttp://www2.moug.net/app/bbs/message.php?cat=acopr&id=20040116-000015

あたりを参考にちょい前に作ったことはありますよ。

ただ、（自分のやり方がマズったのか）

　「数百枚レベルで激重、むりやり印刷したら途中でオーバーフロー」

...って代物になっちゃいまして、結局そのときスワップメモリをやたらとってようやく
印刷はできました。
なんで...紹介しといてなんですがあまりこの方法はオススメできないのですが...。

＃役に立たなくてすみません。

Accessでショッピングサイトを製作する会社が在りますが大丈夫なんでしょうか？

>>923
それなりのOCX利用すれば簡単だよ。
つい最近作ったし。

連続印刷は簡単だけど、紙切れ検出とかその後の継続印刷の方が
面倒かもしれない。

>>927
大丈夫大丈夫。どうせIIS使ってるならセキュリティは同じだから。

みなさん教えて下さい！テーブルに商品名というフィールドを作って、
そこの中からレコードを抽出したいのですが、Google　みたいな感じの
キーワードで検索という方法はできるのでしょうか！？
ACCESSは勉強中ですので、良かったらわかりやすく教えて頂きたいです。
宜しくお願いします。

WHERE 商品名 LIKE '%うんこ%'

Likeでいいんじゃないの？

漏れもLikeって書こうと思ったけど、Likeでやるとキーワード複数に対応できない罠。
スペースを"|"に置き換えて、正規表現使えればイイんだろうけど・・・調べるからちょっと待っとき。

とりあえず、ワークテーブルつくって、そこにスペース区切りでキーワード切り出して入れて、
WHERE 商品名 ANY (SELECT キーワード FROM ワークテーブル)
で、やってみそ。

>>931〜934
ありがとうございました！
自分でもLikeを使って作ってみたのですが、複数のキーワードに対応
できずに困っていました。助かりましたm(_ _)m

>>935
そういう時は「複数キーワード対応にするには？」と書け。

BuildCriteria()をうまく使えばいいんじゃね？

すみません、初歩的な質問で申し訳ないのですがどなたかお答えお願いします。

Access　（Ver.2000以上）で、住所録などのデータをOCR用紙に転記　（印刷）
させるにはどうしたらいいのでしょうか？

市販のアドインでそういう製品があるでしょうか？

どなたかおねがいします　<m(__)m>　。

普通にレポート作ればいいよ

全く同意

DAOで値を取得する場合の質問なんですが
フィールド名を動的に設定することって可能でしょうか？
テーブルのフィールド数が150近くあり、変数に入れたフィールド名を使いたいのですが上手くいきません。

Set rs = db.OpenRecordset("select * from TABLE", dbOpenDynaset)
GetFieldName = "取得したいフィールド名"
Return = rs![GetFieldName] ’ここが上手くいかない

Return = rs.Fields(GetFieldName)

テーブルのフィールドの１つのデータのみを
テキストボックスに表示させたいのです。
どうしたらいいですか？


例
番号　　物
１　　　車
２　　　電車
３　　　飛行機

この場合テキストボックスには車を表示させたいのです。
そしてその後処理が終わったあとテキストボックスを空にして
電車、飛行機と最初から最後まで表示させるようにしたいのです。

>>943
txtBox = rs("物").Value

>944
ソースプログラムは下記の通りですが、

コンパイルエラー
メソッドまたはデータメンバが見つかりません。

とでてしまいます。


Private Sub 合算２_Click()

Dim db(2) As DAO.Database
Dim tbl(2) As DAO.Recordset


Set db(0) = CurrentDb
Set tbl(0) = db(0).OpenRecordset("請求", dbOpenDynaset)
Me!テキスト5 = db(0)("sender_h323id").Value


End Sub