Microsoft Access

http://www.microsoft.com/japan/Office/Access/

俺は使ったこと無いよ。

ｓｆｊｓ

2gte

つこてるけど

いた違いだろ

板違いはやめろ厨！

Accessはいいよね。俺もかなりハマってる。

真面目スレage

死守！

あさげ

で、実際のところ使い心地とかどうなの？
俺excelをデーターベース代わりに使ってばっかでAccess使ったことないけど。

なんか勘違いしてる厨がいるなぁｗ

データベースとしてexcelなんて話にならないほど多機能。

つーか多機能すぎて実際俺も全然使いきれてないけど。

保守

桐つかえ

正直FileMakerの方がいい。

重いよ

話は替わるがここの板のHN意外と簡単に決まりそうだがどうよ？

age

ACCESS総合相談所 その８＠ビジネスソフト板
http://pc2.2ch.net/test/read.cgi/bsoft/1051630268/

【玄人】素人ACCESS相談所【禁制】＠ビジネスソフト板
http://pc2.2ch.net/test/read.cgi/bsoft/1047052026/

使いにくいよAccess。VSSがつかえないのが痛いし。
VBAでなんでも出来る分データベース設計が疎かになって、後でかえって困る。

＞VSSがつかえないのが痛いし。
釣りか？ Developer 買えば使える
http://www.microsoft.com/japan/msdn/ssafe/faq_ssafe.htm

あと設計悪いのは設計者の所為。
まあ俺も Access 好きじゃないが

ADPよりリンクテーブルでつないだほうが良くない？

俺もアクセス嫌い。
MDBで貰っても速攻SQLに突っ込んじゃう。

マルチユーザのロック管理とかが全然考えられて無かったからなー。
ADPとか使うとその辺、簡単にできるのかな？

何を使ってもマルチユーザのロック管理なんてできません。

表形式のフォームからボタン押してそのレコードだけの一枚レポートを
表示させる方法って無いですか？
Private Sub コマンド26_Click()
On Error GoTo Err_コマンド26_Click

Dim stDocName As String

stDocName = "r_Select"
DoCmd.OpenReport stDocName, acPreview

Exit_コマンド26_Click:
Exit Sub
今のボタンはこんな感じで、どうしても一番はじめのレコードが
まず表示されてしまいます・・・

>>26
OpenReportのFilterNameなりWhereConditionなりのオプション使うのは無し？

　　　　　　　　　　　　　 　　　　　　/ヽ
　　　　　　　　　　　　 　　　　　　 /　 |
　　　　　　　　　　　 　　　　　　　/　　|
　　　　　　　　　　 　　　　　　　/　　 　＼ 　　　　　
　　　　　　　　　 　　　 /＼　 /　　　　　　＼　　 |＼
　　　　　　　　　 　　　/　　＼|　　　　　　　　＼/　 |
　　　　　　　　　 　　/　　　　 |　　　　　　　　　　　 |
　　　　　　　　 　　　|　　　　　　　　　　　　　　　　　|　　　　　
　　　　　　　 　|＼　ヽ　　　　　　　　　　　　　　　　 Vヽ　
　　　　　　　　 |　　＼|　　　　　　　　　　　　＿　　　　/　
　　　　　　　　 ヽ　　　　　　　　／⌒ヽ　　 /　 ヽ　 /
　　　　　　　 　　ヽ　　　　　 　/　　　 ＼ /　　　 |　|　
　　　　 　　　　　　＼　　　　/liiiiiiiiiiiiii,,　Ｙ　　iii.iill|/ヽ　　
　　　 　　 　　　　　　＼/￣　　＼　●〕l　　〔　●/ /
　　 　　　　　　　　　　　＼９ /　　￣　　　 | 　￣|/　　　 ＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿＿
　　　　　　　　　　　　　　　ヽ|　　　　　 　　」　　/　　　／
　　　　　　　　　　　　　　　　 ＼　　　|￣￣|　　|　　＜　ねぇ　悪い夢見てた僕を　笑って起こして♪
　　　　　　　　　　　　　　　 　　/＼　 ＼旦/ ／| 　　　＼　　　　
　　　　　　　　　　　　　　　　／　　 ＼＿＿/　　＼　　　 ￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣
　　　　／￣￣￣￣￣￣|⌒|＼　＼　　　　　/　　 　|⌒|￣￣＼
　　　/　　　　　　　　　　 |　 |　 ＼＿＿＿＿＿＿/ |　 |　　　　 ヽ

>>26
カレントレコードのキー項目から
新しい単票レポートを作成するか、
レコードセットのcloneを使用しているので
あれば対象レポートのレコードを表形式
フォームのbookmarkまで移動させる。
recordset.bookmark = 現在の表形式フォームのブックマーク

有り難うございました。VBAもアクセスも触った事が無かったので・・・
Private Sub コマンド26_Click()
On Error GoTo Err_コマンド26_Click

Dim stDocName As String

stDocName = "r_Select"
stLinkCriteria = "[No]=" & Me![No]
DoCmd.OpenReport stDocName, acPreview, , stLinkCriteria

Exit_コマンド26_Click:
Exit Sub

Err_コマンド26_Click:
MsgBox Err.Description
Resume Exit_コマンド26_Click

End Sub

現在こんな感じです。
DoCmd.OpenReport stDocName, acPreview, , stLinkCriteria
のacPrebiewを省いたらいきなり印刷されてびっくりしました・・・
逆に、印刷プロパティを開いて印刷する引数？は無いのでしょうか。

>>30
acNormalだっけ？

あ、読み違えました。
無かったことに・・・

印刷ダイアログは
DoCmd.RunCommand acCmdPrint
で出ますが、あまりお勧めはできないです。
タイミングとか初めてだと色々難しいので、、、

僕はいつも印刷ボタンと印刷プレビューのボタンを
用意してやってます。
印刷枚数が指定したいとかページを指定したいとか
ならそれ用のフォームを作っちゃうって方が色々勉強になりますしね。

>>33
ああ、なるほど。引数としてではなくてダイアログを出すコマンドなのですね。
後は最初に出す予定のフォームから指定ページを送るとか、色々考えています。
また詰まったら教えてくださいな。有り難うございました

accessみたいなレポートをガシガシ作れるフリーのデータベースソフトあります？

>35
君の人生間違ってる。色々と。

>>34
多少でも、お役に立てた用で良かったです。
>>35
そんなのあったら欲しいっす（ｗ

>>35　Access割るしかないだろうね。
Accessのレポートで苦労してレポート専用ソフトを過去20万円くらい使ったが、
結局使えず。それで苦労してAccessだけでがんばって何とか作れるなったが。
フリーで無理だろ、Access使っとけ。

会社で使用するならAccessなんてフリーみたいなもんだろ。
レポートガシガシ作るってんなら仕事用だろうし。

まあ値段相応に、不安定で、遅くて、メンテ効率悪くて、不満爆発なんだが。

そうすか・・・
諦めてオークションあたり漁ります。

あぼーん

あぼーん

あぼーん

あぼーん

あぼーん

あぼーん

あぼーん

あぼーん

あぼーん

あぼーん

　__∧＿∧_
　|（　　＾＾ ）|　＜寝るぽ（＾＾）
　|＼⌒⌒⌒＼
　＼ |⌒⌒⌒~|　　　　　　　　　山崎渉
　　 ~￣￣￣￣

レコードの新規追加ボタンを作りたいのですが
OpenFormにどういう引数を渡せば良いのでしょうか

要するに、カード型入力フォームを開くと同時に
新規レコード入力をしたいと言う事なのですが。
何とか出来ないでしょうか？

>>52
失礼ですが、質問の稚拙さからするとDAOやADOが使えるレベルではないと思います。
仮に私の仮説が正しく、かつ１つのTableから成り立つFormであるとすれば

Private Sub Form_Open(Cancel As Integer)
DoCmd.GoToRecord , , acNewRec
End Sub

とでもしておけば楽ではないかと思います。
Access使っているんですよね？

>>54
今年入った新入社員でして、
本来は営業の手に負えない調査、方針のアドバイス、
会社運営に対する参謀役の部署におります。
その仕事の中でちょっと必要なシステムのたたき台を作るため
色々アクセスが必要になったので一週間前から合間を縫ってやってます。
お察しの通りずぶの素人です。
言語は汗以外やった事がないので・・・
何かアンチョコ本があれば良いのですが金があっても何しろ買う暇が（汗

>>55
新人さんでしたか、大変ですね。
失礼な書き方をしてごめんなさい。
>19さんのリンク先の方に書き込みをした方が、よいのではないかと思います。
もう少し質問の仕方を、考えていただいたほうが、答えるほうも、具体的で
まともな回答ができるので、レスがつきやすいと思います。
質問の仕方も難しいので、忙しい中大変だとは思いますががんばってください。
重ね重ねの失礼な言い方ごめんなさい。

>>56
有り難う御座いました。無事なんとか出来ました
持っている機能の知識から全体を構成するというレベルでなくて
全体を考えながら機能を探しつつ、会議の度に色々要求されまして。
やっていくうちにだんだんいい物になっていくのですが、
後で見ると構成がつぎはぎだらけ（苦笑）
何にしてもアクセスくらいは使いこなせた方が良いので、
アマゾンででも本探します。有り難う御座いました。

あぼーん

>>58
アボーンサレテイル・・・

あぼーん

>>57
適当に増築していくというやり方はAccess的には結構正しいやり方
なのできにしないでパワーアップしていってください。
パフォーマンスが悪いとか機能がイマイチなど
色々批判や難があるAccessですが，むしろ増改築しつつアプリケーションを
作っていくという点では優れたツールです。
因みに以前にはAccessでビジネスソフトもよく組んだものですが
初心者の場合は直接オブジェクトにコード打ちこむよりも
マクロ作成などの補助機能を利用した方がやりやすいです。

まず動作するマクロを組みます。
マクロの作成で適当な名前のマクロに動作シナリオを書いていきます。
例えば　
フォームを開く　‐　メインフォーム
とすれば『メインフォームを開く』という動作になります

次に動作させたいオブジェクトに付随する『プロパティー』の　
『…時の動作』をクリックしてマクロを関連付けます。
例えば　『戻るボタン』(コマンドボタン）の　クリック時の動作
をクリックして
コード，式，マクロ　からマクロを選択。先ほど作ったマクロを
貼りつけて終わりです。

この方式ですと関数名やコードを打つための構造式といったものを
覚えないで済みます。ＳＱＬもＳＱＬを直接打つのではなくて
デザインビューでマウスを使ってさくさくと組んでいきましょう。
複雑なクエリーは2段階に分けて組むとやりやすいです。
例えばＡ，Ｂ，Ｃの各テーブルからデータ抽出したいが思い通りにならない
といった場合，まずＡ，Ｂの表からデータを抜き取るクエリーを組み
そのクエリーとＣテーブルを連結させるやり方で解決できる場合があります。

まあ頑張ってください。色々覚えてくると出来ることが増えてきます
そうするとなかなか楽しい作業になってきますよ。

データ入力以外はね…(ﾎﾞｿｯ

あぼーん

AccessでDB2のテーブルにリンクしたら
TIME型の表示がうまくいかない今日この頃( ´∀｀)ｱｯﾊｯﾊ

　　　 　∧＿∧　 ∧＿∧
ﾋﾟｭ.ｰ　（　 ・３・） (　　＾＾ ） ＜これからも僕たちを応援して下さいね（＾＾）。
　　＝〔~∪￣￣￣∪￣￣〕
　　＝ ◎――――――◎ 　　　　　　　　　　　　　　　　　　　　　山崎渉&ぼるじょあ

ACCESS2002でクエリーのエクスポートをしてるんですけど、
テキスト形式にした場合、○数字（�@とか�A）が含まれている
データだけ半角スペース１個ずつ余分についてくるんですけど
これって治らないでしょうか？
ACCESS97ではこんな事無かったんですけど・・・

あぼーん

あぼーん

Access ADP＋MSDEのシステム作るのにいい参考書ないかなぁ。
この辺りの情報ってなんか少ないね。

いや、腐るほど書籍あるし。

>>69
ACCESSプロジェクトメインの書籍でなんかいいの知ってたら教えてください。

ADO の Recordset である GUID を持つ行をフィルタしたいときにはどうすればいいんでしょうか？

Dim rs As ADODB.Recordset
＜このへんで rs を初期化＞
rs.Filter = "s_GUID = {F4BB253E-DACA-47C7-86F5-1E701AA65C96}"
これだとぜんぜん抽出されないんですよ…

rs.Filter = "s_GUID = {guid {{F4BB253E-DACA-47C7-86F5-1E701AA65C96}}"

でもダメみたい…

ちなみに、あんまりこの件とは関係ありませんが、
整数型は 16bit 長整数型は 32bit レプリケーションIDは 128bit ですが、
VBA の Integer がたでは所詮 32bit までしかあらわせません。
なので VBA ではレプリケーションIDなどの GUID は 16 バイトの配列で表します。

Dim s as String
s = "{F4BB253E-DACA-47C7-86F5-1E701AA65C96}"
Dim a() as Byte
a() = GUIDFromString(s)

すみません…俺のミスでした。
実はフィルタ設定とか云々の前に、
レコードセットが不正でした…（泣

結局 GUID でのフィルタには次のフォーマットでいいようです。
rs.Filter = "s_GUID = {F4BB253E-DACA-47C7-86F5-1E701AA65C96}"

なお、データベースプロバイダによっては
部分的に big-endian と little-endian が入れ替わることがあるみたいなので、注意が必要です。

HOWTO: Use GUIDs w/ Access, SQL 6.5 and SQL 7
http://support.microsoft.com/default.aspx?scid=http://support.microsoft.com:80/support/kb/articles/q197/9/16.asp&NoWebContent=1

このあたりも参考になるかもしれません。
HOWTO: Use CoCreateGUID API to Generate a GUID with VB
http://support.microsoft.com/default.aspx?scid=kb;EN-US;176790

Cursor & Lock　1997/10/08
http://plaza10.mbn.or.jp/~HighBridge/webapl08.htm

それはそうと、カーソルとロックのタイプって結構組み合わせに制限があるんですね。
これは古いドキュメントですが、 Access 2000 でもそれなりに制約があるみたいです。

ところで、リストボックスの各行に、違った色をつけることってできるんでしょうか？

　　　 (⌒V⌒)
　　　│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。
　　⊂|　　　　|つ
　　　（＿）（＿）　　　　　　　　　　　　　　　　　　　　　　山崎パン

　　　 (⌒V⌒)
　　　│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。
　　⊂|　　　　|つ
　　　（＿）（＿）　　　　　　　　　　　　　　　　　　　　　　山崎パン

システムテーブルMSysObjects の ForeignName って、
直接書き替えることはできますか？

>>77
そんな危険なこと、したくない。

まぁでも MSｙｓObjects の各フィールドの意味とか、教えてほしいところではある。

レプリケーションのために各テーブルには一意に識別子というか GUID が割り当てられているはずなんだけど、
それはどこに書き込まれているの？とか。

access2000のソフトっていくらくらいすんの？

>80
ttp://www.pasoq.co.jp/shopping/special/micro/office.html

>81
ありがとー

accessの「データアクセスページ」の機能って
どのwebサーバ上でも使用できるのですか？

IIS限定じゃ？

それより〜
データアクセスページで明細行のある帳票を作る方法がわからないよ〜
Access2002だと「バンド ページ」でHelpに出ているが、Access2000には
無いのかな〜(- -;　「HF Grid」とかいうActiveXを使わなければいけないのかな〜
データアクセスページ、情報が少な杉と思うのは漏れだけでつか？

情報の少なさ、Access Workflow Designer に至っては…
使ってる人いないでしょ。(T T;

ttp://216.239.37.104/search?q=cache:qKPK1OascLkJ:www.accessclub.info/google/search.cgi%3Fmode%3Dlist+%E3%83%87%E3%83%BC%E3%82%BF%E3%82%A2%E3%82%AF%E3%82%BB%E3%82%B9%E3%83%9A%E3%83%BC%E3%82%B8%E3%80%80Access&hl=ja&lr=lang_ja&ie=UTF-8&inlang=ja
ttp://www.microsoft.com/japan/enable/training/kblight/T005/9/09.htm
ttp://www.ysn21.jp/tetras/A/AM/AM_08.html
ttp://www.yoshi-mac.com/mybbs.asp?mode=detail&number=722
ttp://www.horikawa.ne.jp/cgi-bin/showlog.cgi?kd=1&no=1058

AccessからODBCでOracle7につなぎたいのです。
しかし、ドライバの対応ＯＳを見ると、対応していないようです。
あきらめた方がいいでしょうか？

クライアント（win2000）→Oracle7(win4.0)

使えるよ

>>86 その組み合わせのソフトが私の勤務先で動いているよ

>>84
[ACC2002] データ アクセス ページを使って、サブフォームまたはサブレポートをシミュレートする方法
ttp://support.microsoft.com/default.aspx?scid=kb;ja;291803

ACC2000: How to Simulate a Subform or Subreport on a Data Access Page
ttp://www.excite.co.jp/world/url/body/?wb_url=http%3A%2F%2Fsupport.microsoft.com%2Fdefault.aspx%3Fscid%3Dkb%3BEN-US%3B232566&submit=%83E%83F%83u%83y%81%5B%83W%96%7C%96%F3&wb_lp=ENJA&wb_dis=3&wb_co=excitejapan

なんだできるじゃん。

型がテキストのフィールドにダブルクォーテーションを
２つ続けて入力する方法を教えてください。
文字列として""を格納したいのですが
「長さ 0 の文字列を格納することはできません」と怒られてしまいます。
初歩過ぎてどこにも載ってないので、、、助けてください！

fld = """""
fld = CHR(34) & CHR(34)

>>91
入力って書いてあるよ
"が５個だとエラーだしｗ

プログラムじゃなくてテーブル？から
直接入れれる方法があるなら漏れも知りたい。

>90
全角で入れるしかないでしょ

そ、それって、、、
違う文字では？（笑）

ほんとだ、、入れる手段あるのか？
あと別の方法で入れた後、この入力で他のフィールドを
変更できるのだろうか？？

更新クエリ
UPDATE テーブル1 SET テーブル1.DATA = '""';
とか
UPDATE テーブル1 SET テーブル1.DATA = """""";
のような指定でもできるみたい。

Accessで、SQLを入力する時に、
半角、全角やスペースのある無しで、
クエリが作成されたり、されなかったりします。
SQLを入力する時の正しい入力方法が
分かり易い形で（入力時の写真付き）
解説されている
教本や参考書、サイトはありませんか
あれば教えてください。

長瀬愛ちゃんがセーラー服姿で乱れまくり！ルーズソックスが妙に似合います。
女子高生でも通用しそうな小さな体をクネクネ！得意の騎乗位でバンバン腰振ってます。
今すぐ無料サンプルムービーで確認せよ！！

http://66.40.59.77/index.html

>>97
いまいち状況がわからないのだけど、
デザインビューで構文エラーが出るとかそういうこと？
「半角、全角やスペースのある無しで」とわかってる以上、
そこの記述を間違えないよう気をつける以上の何が必要なのか。

そこの記述が具体的に
明記されている、本やサイトは無いのですか。
構文が変わるごとに、
打ち間違いが、起こりやすいのです。

>>100
構文は原則半角で記述（単語間のスペースも勿論半角）。
オブジェクト名は[]で括るようにすると間違いがない。オブジェクト名を全て
半角文字で定義しておけばなお良い。（全角文字が存在しない方が望ましい）
これくらいで充分だと思うのだけど。
それでエラーが出るようならば、SQL文のロジックを疑ったほうが早い。

てか、まずはGUIでクエリ作ってそれをSQLビューで見てみるといろいろ
参考になると思う。

普通の営業マンが個人で導入しても無意味だな。
ほとんど使わない。

*.adp ファイルを開いたときの [ファイル]→[接続] は、
SQL Server もしくは MSDE に接続するためだけにしか使えない？？

つまり、データプロバイダを指定することは出来ない？

実践　クライアント／サーバーデータベースソリューション　
第17回 Access 2000はType x DB Serverのクライアント開発ツールになりえるか？
http://www.int21.co.jp/pcdn/vb/noriolib/vbmag/9908/db_solu/

からの連載を読んでみると、 Access 2000 を SQL Server / MSDE 以外の
データベースプロバイダのクライアントとして使うのは難しそうですね。

この状況は、 Access 2002 でも同じなのでしょうか？

http://www.int21.co.jp/pcdn/vb/noriolib/vbmag/9909/db_solu/

Access 2000で作成するAccessプロジェクト（ADPファイル）は、
Microsoft SQL Serverとそのデータベースへの接続情報を保持する
（「Accessプロジェクトに設定されたデータベース」情報）。

ADPファイルに記述されたVBAコードで作成したRecordsetオブジェクトを
フォームのRecordsetプロパティに代入することで
「Accessプロジェクトに設定されたデータベース」情報とは関係なく、
フォームで操作することがでる。

http://www.int21.co.jp/pcdn/vb/noriolib/vbmag/9910/db_solu/

Access 2000のAccessプロジェクトはあくまでもSQL Server専用のものであり、
ほかのデータベースに接続して使用するには多くの制約がある。
---------------------------------------------------
つーことらしいです…ｼｮﾝﾎﾞﾘ
Access 2002 もしくは Access 2003 ではなにか進展があるんでしょうかね…

http://www.f3.dion.ne.jp/~element/msaccess/
このあたりでも、あんまり 2002 以降に特化された説明ってありませんね…

社内システム構築でアクセステーブルの構造を商品別に分割して
（つまり正規化されてないカード型データベースのような構造）
構築することってあるんですか？

ACCESSってレポート機能がいいんだよね。
VBだと別に開発ソフト買わないと間に合わないよ。

Access2000で作ったプログラム使ってる人はWinXP・SP1/2000・SP4適用済みCD
によるクリーンインストールは要注意
素のWin→SP適用では何も問題ないのに、適用済みCDによるクリーンインストール
だと動かなくなる場合がある

Win2000の場合だとSP3適用済クリーンインストールは動くが、SP4適用済クリーン
インストールだと駄目なもの出てきて・・・鬱

Access 2002のランタイムってどこにあるんだ？
ダウンロードセンターわけわからん。
誰かおせーて。

>>111
ランタイムはMSDNかOffice Developer CDにしか入ってない（一般には頒布していない）のでは？
つまりこれらの購入者が開発したシステムと一緒に配布することのみが許されるのかと…（詳細ﾜｶﾘﾏﾍﾝ）

Vector で探せばあるんじゃないか？
システムとセットだろうが

>110
動かないってどういうこと？
もしかしてクエリ中の関数でエラーとか？

はじめまして　WindowsXP Access2002環境のパソコンに、Vss6.0をインストールしたのですが
Accessのメニューバーから、ﾂｰﾙ(T)-->VisualSourcesafeが表示されるようになるはずなのに、
従来通りのダイアログが表示され、Vssを使用することが出来ません。
Office2000 Developer活用ガイドには「Accessのソースコード管理アドインは
Office2000 Developer Toolsセットアップの一部としてインストールされ、
Accessの[ツール]メニュー」から直接使用できます。」とあります。
XPとAC2002の組み合わせだからVSSが使えないのかとも思いましたが、
マイクロソフトサポート技術情報287460や283228などを読むとどうやら利用できそうです。

Vss6.0も最新vss6.0cにアップしています。また、メニューバーから
表示(V)-->ツールバー(T)でソースコード管理のチェックをONにしています。

何か単純な設定漏れのような気もしますが
何故VSSが使えないのか、心当たりの方がおりましたらご教授願います。

一日中ネットを探した「VSS使い.たい」より

>>112
> ランタイムはMSDNかOffice Developer CDにしか入ってない（一般には頒布していない）のでは？
> つまりこれらの購入者が開発したシステムと一緒に配布することのみが許されるのかと…（詳細ﾜｶﾘﾏﾍﾝ）

Office 2003 ではどうなるんだろうね。
Office Xp では用意されていた Developer Edition が発売されないっぽい。

>>115
Office XP Developer Edition のセットアップも実行しないと駄目だと思う
既に実行してたらゴメン

あと関係ないが VSS の最新は 6.0d じゃなかったっけ？

>>117 ええっ！？、それってOfficeXP Professionalユーザーであっても
Office XP Developer バージョンを買いなさいということ？
う〜ん、ユーザー環境に合わせたかったのですが・・・・
それならAccess2000にしましょうか。

でも、そうなるとWinXP Access2000であればVSS正しく動くの？
ってことに。・・・とりあえず試してみます。

どうしても VSS 使いたい？
あ、いや、あおっているわけじゃなくて、漏れは使ったことがないもんで。

こんにちは。AccessVBAについて質問させてください。
環境はWinXP＋OfficeXPです。
Accessから、DOSのコマンドラインを実行したいのですがどう
してもうまくいきません。
具体的には、WinZIP（圧縮解凍ツール）を実行して特定のCSV
ファイルをZIPに圧縮するという処理をAccess VBAで自動実行
したいのです。コマンドラインは以下の通りです。

　Ex)　C:\Program Files\WinZip\WINZIP32.exe" -a -ex _
　　　　 c:\eee.zip c:\test.csv

Cドライブのtest.csvをWinZIPを使って圧縮し、eee.zipという
ZIPファイルを作成するというものです。
（DOS窓での動作は確認しています）
実際には、test.csv や eee.zip のパスは固定ではなくてAcc
essのテキストボックス上に入力しているパスを読み込む形に
したいと思っているので、どうしてもAccessからの実行を行い
たいんです。
また、会社のPC環境を変えてはならないので他のツールをイン
ストールしたりする事も出来ません。
もう何日も調べていますが、どうしてもやり方が分かりません。
どなたか教えてください。どうかよろしくお願い致します。

>>120
詳細に書いているようですが、一番肝心の「何がダメ」なのかが書いてないですよ。
例えば
１．shell関数でエラーが出る。
２．shell関数で呼び出してエラーは出ないが
　　　解凍もされてなくてデータが取り出せない。
３．解凍されているが次の処理でデータが取り出せない。
４．shell関数って何ですか？

等々色々考えられますよ。

僕なら、unzip.dllでAPI呼び出しなり、それ相応のライブラリで
DOS窓を使わないようにしますけどね。

>>121
お返事ありがとうございました！気をつけて書いたつもりだったんですが、
一番肝心のところが曖昧で申し訳ありませんでしたm(_ _)m
具体的に言うと、120で書いたコマンドラインをAccessから実行する為に
色々とやってみたんです。Call関数やShell関数などを使って試行錯誤し
てみましたがだめでした。
実際には以下のようなコードを書いてみました。
---------------------------------------------------------------
★Dim ZipStr As String
ZipStr = "C:\Program Files\WinZip\WINZIP32.exe -a -ex _
　　　　　　　C:\bbb.zip C:\test.rtf"
Call Shell(ZipStr)

→これを実行すると、プロシージャの呼び出し、または引数が不正です
　　 というメッセージが出てしまいます。

　★Dim tmp As String
　tmp = "Command.com /C C:\Program Files\WinZip\WINZIP32.exe _
　-a -ex C:\bbb.zip C:\test.rtf"
　Call Shell(tmp, 4)

　→この場合DOS窓が一瞬開いてすぐに閉じられます。エラーmsgは出ま
　　せんが、ZIPファイルは作られていません。
---------------------------------------------------------------

>僕なら、unzip.dllでAPI呼び出しなり、それ相応のライブラリで
>DOS窓を使わないようにしますけどね。

その方法はネットで検索をした時に見つけて、UNZIP32.DLLをダウ
ンロードして、それを使って圧縮するという方法がある事を確認
できました。
しかし今回使用するDBが会社のものなので、会社側から「元々の
環境に入っていないものをダウンロードして使うのは不可」とい
うお達しがあったんです･･･(T_T)
なので、どうにかして今ある環境（WinZip+Access）でファイル
の圧縮をしたいんです。
出来るか、出来ないかだけでも分かれば今後の対応も考えられる
んですが。。。
AccessからDOSコマンドを動かしてWinZip経由で圧縮ファイル
を作成する方法はあるのでしょうか？
質問ばかりで申し訳ありません。。。この1週間、力を込めて探
しましたが私のスキルではどうしても一人で解決出来そうにあ
りません。どうかアドバイスよろしくお願いいたします！

うちではこれでうまく動きましたが。。。

Dim ZipStr As String
ZipStr = """C:\Program Files\WinZip\WINZIP32.exe"" -a -ex C:\bbb.zip C:\test.rtf"
Shell (ZipStr)

long名のところで"(VBAの文字列内なので""ですが)で
囲んで渡してやらないとダメなんでしょうかね。
圧縮ファイルや対象のファイルもlong名なら囲んでやればよいかと。

ってデータベースと関係ないじゃん（ｗ

>>122

> 　★Dim tmp As String
> 　tmp = "Command.com /C C:\Program Files\WinZip\WINZIP32.exe _
> 　-a -ex C:\bbb.zip C:\test.rtf"
> 　Call Shell(tmp, 4)

Command.com の部分
WIN98では「command.com」、WIN2000以降ではでは「cmd」
外してたらゴメン

ホームページつくってaspつかってアクセスファイルから検索とかやらせると
ごくたまにデータベースが開けないエラーが出ます。
しばらく開けない状態がつづきまた突然見られるようになります。
アクセス権限などはちゃんと設定していますし普段は開けます。
データーベースファイルを開けていると開けませんが、ちゃんと閉じています。
対策法をご存知のお方がいましたら教えてください。よろしくお願いします。

インターネットで公開してるページのバックグラウンドにMS-ACCESSを使ってるんですか？



んなこたーないですよね。。。

>>123,124
アドバイスどうもありがとうございました！
123さんに教えていただいたコードで希望通りの
動作をさせることが出来ました。
本当にどうもありがとうございます。。。どうしても
うまくいかないので、もしかしたらAccessではそう
いう操作が出来ないのかと心配になっていました。
本当に嬉しいです（ToT)
ダブルクォーテーションで囲むとは全然思いつき
ませんでした。こちらで質問しなかったら一生気付
かなかったと思います(^^;)

>>123
>ってデータベースと関係ないじゃん（ｗ

あっ、そう言えばそうですね！
本当はプログラミング関連の板で質問するべき
だったのかも。。。
Access=データベースという発想で迷わずこちら
に来てしまいました。失礼しました(^^ゞ

>>124
>Command.com の部分
>WIN98では「command.com」、WIN2000以降ではでは「cmd」
>外してたらゴメン

いえいえ、勉強になりました。今後の参考にさせ
ていただきます(^^)

本当にありがとうございましたm(_ _)m

しつもーん。

フォームを自分で作って、その中に２つ以上のレコードを同時に表示させることってのはできますかね？

やりたいことは

例えば、出前の注文が次々に入ってくる。
１．山本さん　１２時　そば
２．斉藤さん　１３時　うどん
３．山下さん　１２時３０分　カレー　

それを、時系列的にカレンダーのフォームのようにを形作って表示させる。
見たいなことをやりたいんのですが。

どうも、フォームに複数のレコードを表示させるのがうまくいきません・・・。

フォーム→新規作成→デザインビュー　でこのあとどういう風にすれば、こういうことができますか？


ぶっ飛んだ質問ですいませんが、だれかご教授ください。
ほかのソフトを使えばいいのかもしれませんが、訳あって、どうしてもACCESSでこれをやらないといけないのです・・・・。

>>128
Access97以降ならサブフォームを使う。
サンプルデータベースのNorthwind.mdbをインストしてあるなら
『受注』を参照するよろし

>>126
> インターネットで公開してるページのバックグラウンドにMS-ACCESSを使ってるんですか？

漏れはリンク集とか日記とか、
バックエンドは PostgreSQL で、
そのメンテナンスのためのフロントエンドに Access をつかってるよ。
ODBC 経由で。

しつもーん。

WIN２０００でACCESS2002を使ってますが、

ＬＡＮでＡＣＣＥＳＳを共有することってできますか？

あと、
ある会社の総務課で、データベースを作っています。
そのデータを使う部署が私の総務課と、開発２課なんですけど、
私の総務課だけで、ACCESSのデータをいじくれるようにして、開発２課ではそのデータを
いじくったりできないようにロックを掛ける方法がないでしょうか？

>>131

>ＬＡＮでＡＣＣＥＳＳを共有することってできますか？
プログラム（フォーム、レポート、マクロ、モジュール）のMDB
からデータベース（テーブル）のMDBをリンクで共有すれば良いと思います。

ロックに関しては権限の設定があると思いますので
ユーザやグループごとに設定すれば良いのでは？

>131
共有は可能だけど安定性低し。
権限を色々切りたいならC/SのDBMS使ったほうが楽かと。

UNIX サーバ上に PostgreSQL が動いています。

Access 2000 の MDB ファイル内で、この PostgreSQL 上のあるテーブルをリンクし、
サーバ上のレコードを MDB ファイル内のテーブルにコピーして処理し、処理後に
書き戻しています。

テーブルごとずっとロックしておくわけにも行かないので、ロックはせず、
サーバへの書き戻しの際に衝突のチェックをしています。
ほとんど追加のみで更新されることはないテーブルなので、
実際に衝突がおきたことはありません。

と、こういう処理をやっていて思ったのですが、やっていることは MDB ファイル同士、
つまりデザインマスタの MDB と レプリカの MDB の間の同期と同じことなので、
できれば同期処理を Access に任せたいと思っています。

PostgreSQL に ODBC 経由で接続し、s_GUID や s_Lineage などの
レプリケーション用の特殊な型のフィールドをもったテーブルを作成し、
そのテーブルとローカルの MDB ファイル上のテーブルとの同期を
Access に任せることはできるのでしょうか？

つまり ODBC で接続された PostgreSQL 上のデータベースを、
Access の MDB の部分レプリカとして扱うことは出来るのでしょうか？

>132　133
れすサンクスです。

セキュリティの設定も何とかできたんですけど、

最後の一歩でもうひとつ障害が、
私を管理者にして、もうひとつの課で使うところをユーザグループにして、「見るだけ」に設定しようと
、セキュリティーウイザードで進めていきまして、完成したんですが、

Ａというファイルでセキュリティを設定したら
「Ａ.mdb」というファイルと、「セキュリティの設定済み」見たいなファイルと
「・・ .bak]みたいなファイルができていました。

その後自分のＰＣで起動すれば、パスワードとユーザ名が聞かれて、
うまくセキュリティを設定できたのですが

それらのファイルを、ＬＡＮの共有フォルダにおいて、ほかのＰＣで使おうとすると
パスワードとユーザ名が聞かれずに、普通に始まってしまいます・・・・。
ただし、ロックはかかった状態になっています。

つまり、管理者である、僕のＰＣ上でだけ、パスワードとユーザ名が要求され、
見るだけの権限しか与えていない、ほかのＰＣからは普通にACCESSを起動できてしまうのです。

共有フォルダにおいておくファイルがまづかったのか、自分の設定が下手なのか、ネットワーク上での共有に詳しい方
ご教授ください。

長文ですいません。

クエリ上で、データをバイト数で絞り込むことって可能でしょうか？
フィールドのデータが特定のバイト数以上であれば、表示させたいという感じなのですが。
Access、Windowsともに2000です。

>136
Accessならできるんじゃないかな。LenB()関数とかで。

>134
試してみりゃいいんでないかい？

>129
サブフォームならAccess2.0でも使えたような気がする。
AC97でなんか大幅に変わったの？

すみませんが、至急で教えていただきたいことがあります。
2つのデータをリレーションシップして両データ共通のものだけを取り出すのはできるのですが、
逆にこの2つの両データに該当しないものだけを取り出す方法を教えていただきたいのですが。
仕事で急にやらなければならないことになりまして、すみませんが急ぎでアドバイスをお願い申し上げます。

例（百貨店のお歳暮顧客データとした場合）
○○百貨店は、お歳暮の売上高を上げるために、お得意様以外の、
あまりご利用頂けていないお客様への販売促進に力を入れることにしました。
そのため、Ａ・Ｂ両データを使って、お得意様以外の顧客リスト（店舗番号別に）をピックアップしたいのですが、
ＡＣＣＥＳＳでどのようにしたらできるのでしょうか？

Ａデータ（お得意先リスト）
店舗番号　顧客番号
　1　　　　　　　1000
　1　　　　　　　2000
　1　　　　　　　3000
　2　　　　　　　1000
　2　　　　　　　2000
　2　　　　　　　3000
　3　　　　　　　1000
　3　　　　　　　2000
　3　　　　　　　3000
※ 顧客は重複していない。

Ｂデータ（全顧客データ）
店舗番号　顧客番号　売上高
　1　　　　　1000　　　 　60000
　1　　　　　2000 　　 　 40000
　1　　　　　3000 　　　 50000
　1　　　　　4000 　　　　 3000
　1　　　　　5000 　　　　 2500
　2　　　　　1000 　　　 45000
　2　　　　　2000 　　　 70000
　2　　　　　3000 　　　 60000
　2　　　　　4000 　　　　 3500
　2　　　　　5000 　　　 3000
　3　　　　　1000 　　　 55000
　3　　　　　2000 　　　 50000
　3　　　　　3000 　　　 90000
　3　　　　　4000 　　　 2500
　3　　　　　5000 　　　 3000
※ 顧客は重複していない。

この中からＡ・Ｂ両データを使って、
ＢデータからＡデータに該当しないものを抽出するにはどうしたら良いでのでしょうか？

>140
クエリーのウィザードに「不一致クエリー」ってのがあるからそれを参考にしてみ。

SELECT * FROM 全顧客データ
WHERE 顧客番号 NOT IN (SELECT 顧客番号 FROM お得意先リスト)

>>137
レスどうもです。

とりあえず、フォーム上からイベントを設け
LenB(strConv(Me![テキストボックス名],vbfromunicode))
ってな感じでやってみたんですが、表形式のフォームで現在選択されたレコード
にしか適用されないようなんですよ。（テキストボックス名＝フィールドの内容）
フィールド全体をチェックできるようにしたいのですが。。。

>>143
なしてイベント？クエリに書けばいいじゃん。
ただしVBの定数認識しないので直接128って書く必要あり。

はじめまして。今、JSPでMYSQLのデータベースへアクセスするプログラムを作っています。
今回アイテムリストで選択された文字がボタンを押すとデータベースへアクセスされ、必要なテーブルが展開される
プログラムを作りたいと思っています。もしヒントか何かご存知の方、教えてください。お願いします

とりあえずｽﾚﾀｲをよく嫁とだけ言っておく

>>144
そのヒント後、検索したら
http://pc2.2ch.net/bsoft/kako/1043/10439/1043996834.html
の422にダイレクト回答が載ってました。
助かりました。

ﾅﾔﾐｽｷﾞﾃﾞﾊｹﾞﾙｶﾄｵﾓﾀﾖ…

>>147 なるほど、俺も実は同じような処理をしようと思って悩んでた。
Unicode なんて意識したことなかったからなぁ…

ACCESS総合相談所 その７
http://pc2.2ch.net/test/read.cgi/bsoft/1043996834/422
http://pc2.2ch.net/bsoft/kako/1043/10439/1043996834.html

Is Null Or LenB(StrConv([項目],128))

Accessでストアドプロシージャは使えますか？

>>149
mdb内にストアドプロシージャを構築できるか？という意味ですか？
たぶんできないと思うけど。できたらMSDEを付ける必要ないような。

>>150
丁寧に答えていただきありがとうございました。

VBAで作った関数をストアドプロシージャの代わりに使うことは
できないだろうか？

VBAで作ったユーザー定義関数をクエリでは問題なく
SQLから使えるのですが、
Perlなどの他のプログラムからODBC経由でSQLを発行する際に
そのユーザー定義関数を使おうとするとエラーになります。

エラー内容：式に未定義関数＊＊＊があります。

何故エラーになりますか？

主キーって何ですか？

>>152
ストアーされないし遅いよ？

Accessの「クエリ」はストアドっつーよりビューだしなぁ。

一般的に使われている用語を敢えて離れる「MS語」はやめてほすぃ

　　　＿＿＿　　　　　　　　＿_／
　 ／　 　 ／＼　　　　　／ _／＼　　　　　 ＿＿＿
／￣￣￣＼／|　　　／|￣ .＼／|　　　 ／　　　 ／＼
　　　　　　　|　 |　　　|／＼＿_.|／　　／|￣￣￣＼／|　
　　／￣￣~|／|　　　＼／＿／　　　 |　|＿＿＿＿|／　
.／|￣￣￣.|　 |.　　　　 ￣／__　　　　|／　　　　 ／　
|　 |　　　　 |　 |　　　／フ￣／＼　　 |￣|￣￣￣　
|／＼　　　.|　 |　 ／|￣￣￣＼／|　 |／＼　
＼／￣￣~|／|　 |／＼ 　 　___|／　　＼　 ＼　　　＿_　
　 ￣￣￣~|／　　＼／￣￣／　　　　　 ＼／￣￣ ／
　　　　　　　　　　 　 ￣￣￣　　　　　　　　 ￣￣￣　
　　　　　　　　　　 （⊃）　　　　　（⊃）
　　　　 ∧＿∧ 　/ / ∧＿∧ 　/ /
　　　　（　´_ゝ`）./ / （　 ´_>｀）./ /
　 　 .／　　　　　/　 /　　　　　／　
　　 /　　　/￣￣￣￣/　　　/　
＿_(__ﾆつ/ 　 age.　 /＿＿__|＿＿
　　　 ＼/＿＿＿＿/

Accessをデータベースとして、
Webページを作成しようと思っているんですが、
参考になるサイトをご存知でしたら
教えてください。

>>158
「壊れない」と豪語する人もいるんですが、
実際に壊れたのを見たことがあります。
書き込みアクセスのあるサイトですが。
基本的に１ユーザ仕様のはずです。

>>158
作成に関することではないですが老婆心ながら・・・。
ttp://www.naboki.net/access/achell/index.html
これを了解した上でAccess使うならなら止めませんとも、えぇ。

もし、Accessで作るならmdbを直接DL出来ちゃうような
サイトになりませんように (-人-)ﾅﾑﾅﾑ

>>159
いますねー。そういう人。
「壊れたことない」と「壊れない」を一緒にしちゃうんだよなー。＿|￣|○ﾊｧｰ

Accessにはロック処理はないの？
もし無いのなら（ちゃんとロック処理を施した）テキストファイルへの
読み書きにも劣るじゃん。

access95で作られたデータベースをaccess2000仕様に変換しようと
すると固まる。３００Ｍ近いアクセスファイルはやっぱ無理なのか？

今、Acces2002（Access2.0からずっとアップデートしてきた）で
レコードが４万件程度だけど、もうそろそろ限界っぽい。
SQLserver2000に移築しようとしたが、参照整合性が全くとれない。
今まで増築増築でテキトーに作ってきた罰かな？
なんか、良い方法はないですか？
一からテーブルの作り直しかなぁ・・・。

>>163
> SQLserver2000に移築しようとしたが、参照整合性が全くとれない。

SQL Server にデータをすることによって参照整合性が取れなくなるの？

MS Access で通貨型のデータを扱っているのですが、
各国の通貨が入り乱れるような場合はどのようにしてテーブルに格納すればよいでしょうか？

>>165
通貨型のデータそのものものは、バイナリ誤差を防ぐために
少数以下４桁の固定桁数にした整数型のようなもので、
書式は関係ないですよ。
表示方法はコントロール側の書式で自由に変えられます。
他の数値型と同じです。

>>163
Access 2003でアップサイジングウイザード使えば Data Integrity は維持されるよ。

すみません。質問させてください。
クエリで取得したレコードに行番号を振りたいのですが、
どうもうまくいきません。
OracleのSQLでいうと、
SELECT rownum , 名前 , 電話番号
FROM 社員テーブル
WHERE 取得FLG = TRUE
;
みたいな感じです。
一度条件にあうレコードをオートナンバー型カラムのあるテーブルに入れてから
取得するといった面倒な方法しか思いつかないのですが、
なにかよい方法はないものでしょうか。
厨な質問で申し訳ないですが、よろしくお願いします。

>>168
http://www.ruriplus.com/msaccess/tch/tch_idx.html

>>135
漏れは、フォームのコピーをして一方にフォームのプロパティで「更新、削除、追加」の許可を
「いいえ」にしてまス。
変更権限者にはデータ変更できるフォームのオープンボタン（隠し属性）の場所を教えてまス。

子供だましのような手法だけど･･･

まぁ、これは同じ端末を変更権限がある人と無い人で共有してるからなんだけど。


>>162
300MBなのはデータ部分が大半だと思うので、それを一旦分離した上でコンバートかまして
データはその後インポートすればいいような気がするのだけど、的外してますか？

>>168
俺も知りたい。

>>168
１．次のようなクエリを作り、test1　と名づける。

SELECT MAILLIST.CompanyName, getpos([CompanyName]) AS 式1
FROM MAILLIST
WHERE (((MAILLIST.CompanyName) Like "株式*"));

２．　getpos()という関数をモジュールに自分で作る。
例

Function getpos(strpass) As Integer
Dim MyDB As Database
Dim MyRS As Recordset
On Error GoTo RecErr
Set MyDB = CurrentDb
Set MyRS = MyDB.OpenRecordset("SELECT * FROM test1;")
MyRS.FindFirst ("CompanyName='" & strpass & "'")
getpos = MyRS.AbsolutePosition + 1
RecErr:
Select Case Err.Number
Case Is = 0
Case Is = 3021
MsgBox "Error!"
Err.Clear
Case Else
MsgBox Err.Description
End Select
End Function

３．うまくいけば行番号が表示される。

169さんの教えて頂いたサイトのサブクエリを使用した順位付けで、
目的を果たすことができました。
ありがとうございました。

172さんもわざわざありがとうございました。
今回はなるべくシンプルな形を望んでいましたので、
関数を使用するのは避けましたが、今後の参考にさせてもらいます。

それにしても、なんでACCESSってROWNUMが使えないんでしょうか。。。

>>173
そんなこと言ったらMySQLにあるLimitをOracleでも使いたいよ。ｗ
関係ないけど。

＞＞１７０
ありがとう！確かにデータがかなーりの部分をしめてるので
データ移動してコンバートかけてみます。助かりました。

リレーションシップってのがさっぱり理解できません…
よい勉強サイトないでしょうか？

行数を表すようなフィールドがないテーブルで
何行目から何行目までみたいに行数を指定したいんですけど
このようなことはできますでしょうか？
アプリ側で指定行を取り出すのではなく、SQLでやりたいです。

>>177
DBの中じゃ順位なんて保証されないぞ。
後からINSERTしたものが下に来るわけでもない。
HDD上の物理的な配置に応じてころころ変わる。
できるかどうかは別にして、何の意味も無いとだけ言っておく。

>>176
@ITとか。

しつもーん。

ＡＣＣＥＳＳで月ごとの集計のやり方ってのは、いろいろ調べれば乗ってるんですけど、
僕の使用してるデータベースでは月をテキスト型で
「１５年１１月３日」
みたいに打ち込んで使用するＤＢになってるもんで
どうしても、月ごとの集計がうまくできません。

なんか、いい方法ないっすかね？

ちなみにテーブルで抽出しようとすると
「　年　月　日」で指定しなければならず、
特定の一日しか搾り出せません・・・。こまった・・

SELECT CDate('１５年１１月３日'), Month('１５年１１月３日')

Expr1000 　　　Expr1001
2015/11/03　　11

ﾜﾗﾀ

ロケールは？

Format("15年11月3日","yy/mm/dd")

>>179
データから作り直せ。気味悪い。
なんで日時データを文字列で入れるのやら・・・

>>178
掲示板などでよくあるログデータを5件-10件目まで表示ということを
したいんです。
今はアプリ側で取り出したデータから指定行数を切り出しているんですが、
SQL側でこれができたら良いのになぁと思うのです。

>>178
追伸。日付でソートしたデータに対して行数を指定したいということです。

>>179
選択月の入力用テキストボックス（仮にselectとする）
をフォーム（仮にmainとする）に作る。

クエリで必要情報を追加して、DATEのフィールドに
Like "*"+[forms]![main].[select]+"*"　という抽出条件を設定。

クエリをソースにしたフォーム（仮にoutdata）を作る。

フォームoutdataのオープン用コマンドボタンをmainに作成

テキストボックスselectに「○年○月」と入力すれば、
その文字列「○年○月」を含む情報一覧の抽出は出来る。
あとは好きなように集計して良し。

念のために書くが、勿論「１５年１月」と「１５年０１月」は同一視できない。


>>185
177、184、185を読んで、何をしたいのかが想像できないのだが･･･
DB上でするべき事でないように思える。
そもそも、指定行は何を以て決定してるのだろう？

日付フィールドがあるならその範囲を指定すればいいのではないのかな？
まさか、同一日で日付が記入されてるのは一行だけということなのだろうか？
yymmdd　ログ内容１
　　　　　　ログ内容２
　　　　　　　　：
とか。

Public Function convToDate(ymd As String) As Date
Dim y As Integer
Dim m As Integer
Dim d As Integer
Dim yPos As Integer
Dim mPos As Integer
Dim dPos As Integer

Const HEISEI_SEIREKI_DIFF = 2003 - 15

yPos = InStr(1, ymd, "年")
mPos = InStr(1, ymd, "月")
dPos = InStr(1, ymd, "日")

y = CInt(Left(ymd, yPos - 1)) + HEISEI_SEIREKI_DIFF
m = CInt(Mid(ymd, yPos + 1, mPos - yPos - 1))
d = CInt(Mid(ymd, mPos + 1, dPos - mPos - 1))

convToDate = CDate(y & "/" & m & "/" & d)
End Function


をどこかのモジュール内において、

「変換レイヤー」
----
SELECT
…日付以外のコラム…,
convToDate([元テーブル].[日付]) AS [日付]

FROM [元テーブル]
----
と、

「変換後のテーブル」
----
SELECT * FROM [変換レイヤー]
----
というクエリを作って、

「変換後のテーブル」を使って、そのやりたい処理をするとか

すみません。「変換後のテーブル」はいりませんね。
「変換レイヤー」を使って、そのやりたいことをやれると思います

￣￣￣￣￣￣￣￣￣￣￣#ykZAfoE｢　　　　　　#ykZAfoE｢
―――――――――――――‐┬┘　#ykZAfoE｢　　　　　　#lqi=(w｢T
　　　　　　　#ykZAfoE｢　　　 　 　 　|　　　　　　　　#lqi=(w｢T
　　 　 　 ＿＿＿＿.＿＿＿#ykZAfoE｢　　　　#ykZAfoE｢　　　　　　#lqi=(w｢T
　　　　　|　 　 　 　 |＜_葱看＞|　　　|　　　#lqi=(w｢T　　　　　　#ykZAfoE｢
　　　　　|　 　 　　／ i　ﾚノﾉ）)） ＼.　|　　　　　　#ykZAfoE｢　　　#lqi=(w｢T
　　　　　|　 　 　 　 |(ヽl.ﾟ∀ﾟﾉ人/)　　#ykZAfoE｢　　
　　　　　|　 　 　 　 | ﾉ　Y.ﾉ　|　　　　 |　　　　　#ykZAfoE｢
　　　　　　　　　　　　　　　　　　
　　　　　　　　　　　　　　　　　　　　#lqi=(w｢T
　　　　　　量産型を生産するっ

GIGO(Garbage In, Garbage Out)という有難い言葉があるだろ。
糞な入力からは糞な出力しか得られない。
対処療法的にぐちゃぐちゃやってると絶対破綻するぞ。
まずは元データをなんとかしろ。>>179

文句いう香具師にはクエリー(View)でも作ってそいつで「年月日」になった表でも見せてやる。
中は日付型に変換しとく。

.....月に99月とか入れるパターンがあったりする罠

まぁ、漏れだったら「文字列フィールドにそんなことはできねー」ってつっぱねるけどなー。

＞１８３
　
平成　年　月　日
と入力して、
平成　年　月　日と表示させたかったんです。

で、
「ACCESSは外国生まれなので、日付データは西暦で管理する仕様になっている」
ということを最近知ったもので、やっぱ日付型で管理するほうがいい見たいです、
がんばって作り直します。

しかし、
「平成１５年１１月３日」と表示させるにしても、
打ち込むときはやっぱ２００３／１１／３と打ち込まないといけないのですよね？

>>193
入力規則の設定で、どうとでもなる。

SELECT CDate("平成１５年１１月３日"), Format("2003/11/03", "ggge年m月d日")

AccessでWindowsでログインするみたいに
ユーザー名とパスワードを入力させて一致したら
次の画面に行くように作ろうと思ってるんですけど、
何か参考になるサイトはないでしょうか？
よろしくお願いします。

>>193
自分でルール組めば見た目上大抵のことはできるだろうが、
そもそも日付を文字列で保存するという考え方が、すっごく　変！

いいか？
時間というのは世界中誰にでも公平で、しかも必ず一定の速度で進む。
こういうデータはコンピュータ的には非常に扱いやすい。
しかし、人間の生活実態上はこれをデタラメな長さに寸断して
単位をつけている・・・月の長さがまず一定でなかろう。閏年もある。

この両者の変換ロジックを個人で組もうとしたら大変なことだ。
しかし変換しないことには大小比較（日付だから新旧比較だな）ができない。
日付のデータとしての価値が激減する。
だから、DBなり一部のプログラミング言語なりには、相互変換ロジックが
搭載されている。誰でも使う機能だからな。

それを敢えて使わんというのがさっぱりわからん。
DBを使うのであれば、データの格納形式には最大限の注意を払うべき。
表示形式と格納形式をイコールにする必要はどこにもない。

Access 2002
DB:Oracle 9i

でVBAからOracleのストアドプロシージャをODBC、またはADO
を使用して呼び出したいのですが、(oo4oはバージョンの違い
によるエラーなどで使用できない)
変数の宣言の方法やストアドの呼び出し方、エラーが起こった場合の
処理方法などがよくわかりません。

巷にはVBでoo4oを使ったストアドプロシージャの使用や、
Aceess + SQL Serverによるストアドプロシージャ実行の例ばかりで
ほかの例がほとんど見つからず途方にくれております。

どなたか教えていただけないでしょうか？
よろしくお願いします。

>>196
ツール - セキュリティ - データベースパスワード
というのがあるぜ

>199
ユーザーをいくら作っても
管理者でしかログイン出来ないんだけど・・・・
使い方がよく分からんよ

>>199
たぶんそりゃ違うぜ。ｗ
普通にユーザマスタ作って参照するフォーム作るっつー話じゃないのか。
そこまで初歩的なサイトはあるかな。だいたいサイトは裏技集だから。
本買った方がいいぜ。

>>198
パススルークエリーを使って実行できませんか？
答えを返さないようなストアドならそれでできたと
思うのですが。

データベースで
男なら「１」、女なら「２」って打って（いちいち女、男って入力するのがめんどくさいので）
これを、フォームで表示させるとき、には男、女と表示させたいのです。
iifの使い方はhelpにありましたので、１なら男、そうでないなら女っていう風に、２種類の場合はこれで対応できるのですが、

３種類以上の場合はどういう風にすればいいのか、教えてください
if 関数を使えばいいと思うのですが・・・、ルールにあってないらしく、うまく機能してくれません・・・・・。

「うまく動きません」「出来ません」「動作しないんです。」
で分かる人は少ないと思います。

「何が」うまく動かないのか。うまく説明してください。
おかしい部分をそのまま貼り付ける、、、とかね。
そうすれば答えてくれる人もいらっしゃると思いますよ。

>>203
複数の場合はswitch関数かselect〜caseで。
DB的にはマスタ作って連結する方が良い。

Key(重複なし)　Data
1　　　　　　　　　男
2　　　　　　　　　女
3　　　　　　　　　不明
こんなマスタ作って連結させればよい。

正規化してないのがバレバレだな。
一から勉強し直した方が早い。

154 名前：NAME IS NULL[sage] 投稿日：03/10/15 16:39 ID:???
これからの時代を考えると最低でも
1　男
2　男(タマ無しサオ有り)
3　男(タマ有りサオ無し)
4　男(両方無いが遺伝子はXY)
くらいは視野に入れておかないとね。

ま、件数次第だが、いちいちマスタでこれ持つのもどうかと思う。
こんなで正規化やってたらキリねー。
マスタテーブルでいっぱいになっちまうよ・・・

>>209
確かにたった一つのフォームだけで使用するのだったら
フォームに埋め込んでしまえとも思うけど、
DBでそういう例外入れるとあとで嫌な事になることない？
項目数が増えたり表記が変わった時にフォーム弄る破目になったり。
なにより気持ち悪くないか？　精神的に。

>>209
確かに件数次第ってのもあるけど、件数が増加するか否かってのもあるでしょ。
今回の場合は関係ないけど、件数が増える可能性がある場合は
マスタ作っといた方が、メンテが断然楽。
増える度にselect caseにcase追加するのは非効率的。

まぁ今回はこれで良いだろうけど。
select case textbox1
case 1
textbox2="男"
case 2
textbox2="女"
case 3
textbox2="不明"
case else
textbox2=""
end select

>なにより気持ち悪くないか？　精神的に。

禿堂。質問者のスキル逆読みして、そんなにデカいの扱ってないだろうと
思ってたんだが、キモちわるいのは確かだな。


つか、質問者は消えたんか？

>204 -212


解決しました、すいません、おさわがせしました。

結局

iif([ ] =1, "男 ",iif([ ]=2 ,"女 ",iif([ ]=3 "・・・・・・

と限りなくつなげていけばできるようです。ちなみにクエリ上でこれをやってます。
見栄えはよくないですが・・・・・。もっと関数の知識があれば、きれいな関数で美しく書けるそうなのですが・・・・。

EXCEL のif に相当するものが、ACCESSでは iifでできるそうです、すいません。

SELECT x, switch(x=1, 'one', x=2, 'two', x=3, 'three') FROM test

xExpr1001
1one
2two
3three
4(Null)

213

>214 それずいぶんきれいな関数ですけど、
それ、クエリ上でもそうやってうてば使えるんすか？

ageageage

キケー！

FAQなのかもしれんが答えがみつからん教えろ

文字列の比較を case sensitive にする方法!!!

imode uidの処理させようと思ったらこれでハマった

Access 2000 が Windows Server 2003で動くかやってみた人はいらっしゃいますか？

>>219
起動するだけでいいのか？なら桶だ
ただし、完全動作するかは白根

>>220
通常作業はクライアントのXPから2003のmdbにリンクしてつかうんですが
クライアントから最適化を実行すると非常に時間がかかるので、
最適化だけ2003でやっちゃおうかと思った次第です。

俺様専用メモ

C:\xxx.mdbを最適化してC:\xxx2.mdbを作成
1. ↓をメモ帳に貼り付けて拡張子vbsで保存する。
2. 作ったvbsファイルをダブルクリックする。

'-------------------------------
filename1 = "C:\xxx.mdb"
filename2 = "C:\xxx2.mdb"
cs1 = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & filename1
cs2 = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & filename2
Set je = Createobject("JRO.JetEngine")
je.CompactDatabase cs1, cs2
MsgBox "最適化が終了したかもしれません。"

ところで皆さんは付属のＶＢＡで書いてますか？
ＶＢで書いてますか？

私はＶＢで書いてＡＤＯとＯＬＥコンテナ使用してます

AccessをDBにWEBページを作ってみようと
思っているんですが、
AccessをDBとして作成することは可能なのでしょうか？
ASPでやってみようと思っているのですが・・・

>>224
Access+ASPは可能でしょう。
もう、５年前にやったことがある。

>>224
IIS+Accessは定番でしたね

>>223
何でわざわざそんなことするんですか？

>225
>226

可能なんですか！
しかも定番なんですか〜
参考になりそうなサイトか何かご存知でしたら
教えてください。

>>228
ASPの解説サイトはDBにオラクルかSQL鯖使ってるところしか知りませんが
書籍ならASP3.0などの解説本をを求めればいいかと
asp.netだと開発環境に15万くらいかかりますよ
個人的にはphp+mysqlやpostgresqlの方が軽いし組みやすくて好き

>>224
アクセスセットのVBAはフォームの挙動とデータソース等のプロパティが設定しにくいです

俺はPerl/CGI+Access2000で検索エンジン運営してるよ。

本当に？

質問です
正規化したテーブルで

テーブル1に商品コードのフィールドを置いて
テーブル2を商品コードフィールドと商品名フィールドで構成した場合

テーブル1をフォームで入力するときに
リストボックスで商品コードを選択させるときに
商品名が表示されて選択できてテーブル自体のデータには対応しているコードが格納されるようなフォームを作りたいのですが
どうすればいいでしょうか？

マイクロソフト公式のアクセス本を2冊隅々まで読みましたが記載されてませんでした

>>232
リストボックスの設定
コントロールソース：テーブル1の商品コード
値集合タイプ：テーブル/クエリ
値集合ソース：テーブル2
列数：2
列幅：適当に設定
っていうことじゃなくて？

>>232
テーブル１をデータ格納、２を参照元という前提で書く。

リストボックス（コンボボックス）は非連結にしてフィールドリストはテーブル２の「商品名」フィールドを使い、
選択後処理にそのリストボックス（コンボボックス）情報から「商品コード」フィールドへのdlookupで変換かます。
requeryも忘れないように。

勿論、テーブル１のopen時やレコード移動時には、逆向きのdlookup変換が必要。


使い方はhelp読んで。

>>233さん >>234さんありがとうございます

>>233さんの方法は本にも書いてあるのでそこまでは出来るのですが
選択時にだけ商品コードと商品名の対応が選択リストで確認できるけれど
フォームが静的な状態の時一覧する際にコードだけで商品名が見えないので
使い勝手が悪いと同僚・上司に不評なんです

彼らなんで正規化が必要なのかとか全くわかってくれないんです

>>234さんありがとうございます

変数 = DLookup("商品名","テーブル2","商品コード=テーブル1の商品コード")

関数はこんな感じでよろしいでしょうか？

>>232
コンボボックスだったら・・
>233のようにコンボを作って、

Private Sub cbo商品コード_AfterUpdate()
Me.txt商品名 = Me.cbo商品コード.Colom(1)
End Sub

・・とかじゃだめ？リストボックスでもまぁ、いっしょでしょ。

上のは、Colomじゃなくて、Columnだな・・

>>235
me![商品コード] =DLookup("[商品コード]", "テーブル2", "[商品名] = me![商品名]")

これを、商品名のフィールドを入力／変更した際のafterupdateのイベントプロシジャに入れると、
「"テーブル２の商品名"と"今いるフォームの商品名"がイコールの時、
"（テーブル２の商品名と同じレコードにある）商品コード"を"今いるフォームの商品コード"に反映させる」
という動作をする。
商品名フィールド情報から商品コードを抽出する訳。
これがデータを入力する時の動かせ方。

>>234にも書いたが、フォームのopen時やレコード移動時、つまりデータを見る時には、
商品コードフィールド情報から商品名を抽出する為の逆向きのdlookup変換が必要。

また、requeryも忘れないように。

例えば第一列を商品コード、第二列を商品名としたら
連結列：1
列数：2
列幅：0cm;5cm
と、第一列の列幅を「0cm」にすればいいんじゃないですか？

うちはいつもそうやってますけど。

>>232
非連結テキストボックスのコントロールソースを
コンボボックス/リストボックスのColumn(1)でいいんでないの？

>>240
私もそれを良く使います。
DLookUpより速いような気がするし、Requeryも不要。

スタンドアロン形式でのDBを作成したのですが、テーブルやフォーム、モジュールの構造を
読み取れなくする為にはどのようにしたらいいでしょうか？
（セキュリティーウィザードでの保護もやったのですがログイン名などをユーザーに設定しないと
できない？ためお客さんの端末の使用状況も把握しないといけません。）
要は、1回1回セキュリティーをかけるのではなく1回セキュリティーをかければどの端末に持って
行っても保護されるようなツールもしくはモジュールを知りたいです。
お願いします！！

>>242
Dev版ならそういう機能があったぞな

>>243
社内にDeveloper版があるか見てみます。
ありがとうございました。

>>242
該当mdbファイルを開いてツール→データベースユーティリティ→mdeファイルの作成

Accessのバージョンは同じである必要がある。

mdeファイルはAccessのバージョンが違うと扱えない

>>245
mdeだと確かにデザインの変更やコードの表示はできないが、オブジェクトの名前は見られたような。
んまぁ、起動時の設定でデータベースウィンドウを表示しない設定にし、さらにShift起動できないような処置をすればそのmdeで一覧は難しくなるけど、他のmdbからのインポートでオブジェクト名を見られる可能性はあるかも。

mda にすればいい

AccessとVBを連携させる利点としてどんなものが挙げられますか？

利点なんかあるのか？(w

VBでAccessのレポート使うのは利点？

フォームでよほど凝った処理するのでなければAccessで充分かと。

教えてくださいな。Access2000でツールを作成していて、レポート出力機能をつけました。
プレビューを表示してから印字する機能と、直接印刷する機能をつけたのですが、直接印刷を行うと出力が
行われません。プレビュー表示してから印刷を行うのは大丈夫なのですが。。。
プリンタはEPSON　PM-G700です。OSはWindowsXP　Office2000 Premiumです。

モジュールはどう書いてんの？

超初心者です。
Xp+Access2000で、起動後にテーブルを表示させると大きいので
（小さなテーブなので無駄な部分が多い）
大きさを調整していったん終了後、次に開くとまた大きく表示させます。
Windowsも慣れていません。スレ違いかも知れませんが教えて下さい。

Microsoft Access2000について教えて君します。

テーブルにIDと電話番号があったとします。この電話番号は
-（ハイフン）を含んで保存されているものとします。

これをクエリにてID、電話番号、-（ハイフン）抜きの電話番号
の三つとして表示させたいのですが、置換に便利なsubstitute()
関数がヘルプにはあるのに実装されていないことに気付きました。
他の方法をとろうと思い、search()関数とreplace()関数を使っ
て書きましたが、これもヘルプにはあって、実装はされておらず。

何か良い方法があれば教えて下さい。

03-1234-5678
↓
0312345678
と変換したいだけ。ただし、地域によって-（ハイフン）の
位置が変わるため、固定的にバイトや文字の数で位置を判別
することは不可。

>>255
substitute, searchともに Excel関数でしょ。
設定すりゃ Accessからも使えるんじゃない？

あと、Left, Mid, InStr, StrReverse関数を使って
プロシージャ書けばできるよ。

http://profiles.yahoo.co.jp/tengaiten2002

replace関数だけで出来ませんか？
replace([項目],"-","")
とか。。。

試してないですが。。。

>>255
あれー？Replace()関数で出来るじゃん！

結果 = Replace(電話番号, "-", "")

でも、compare引数を適切に設定しないと
正しく置換されない場合もあるよ。。。

MDEをMDBに変換するソフトがあったらおしえてください。
裏ソフトでもなんでもいいです

>>255
そんなのあるか、ばーか

日付データの03/12/05 16:28:00を
03/12/05で表示したいのですがどうすればいいのでしょうか？

to_date('03/12/05 16:28:00','YY/MM/DD');
でやっても何もおきないのですが
oracleやsqlサーバなどでは出来るらしいのですが
accessでは不可能なんでしょうか？

format('03/12/05 16:28:00', 'yyyy/mm/dd')

Access(Jet) + IISでショボWebサーバ運営
DB参照だけで書き込みしないなら、それなりなんとかなる？

得意先から送られたファイルが
ファイルへのアクセスが切れていますと表示されてフォームなどを操作できません
オブジェクトを見るとテーブルなどを直接見ることは出来るのですが
こういうエラーの問題点が何処にあるかご経験のあるお方居ませんか？

>>265
リンクテーブルになってて、リンク先のファイルが無いとか、
環境が変わってリンク先の設定がズレたとかでは？
テーブルそのものが開けない状態なんじゃないの？

>>266
ありがとうございます
テーブルの内容は開けるのです
自動的にデバッグが立ち上がりフォームのコードを開けるのですが
変更し、保存しようとするとファイルリンクエラーができて更新も保存できないんです
やはり環境の問題でしょうか

>>264
なるだろうが MSDE 使えば

>>267
起動時に開くフォームでいきなり何らかの障害が
発生しているようですね！

あと考えられるのは、バージョンが違っているせいとか、
DBが壊れてて元々ちゃんと動かないのかも知れません。
得意先に聞いた方がよろしいかと・・・

みなさんテーブルのデザインを印刷するときはどうされていますか？
コピペしてからプリントするのは疲れるんですが
やっぱりマクロ組まれたりしてるのかな？

>270
ttp://www.bekkoame.ne.jp/~yoli/
でﾀﾞｳｿできるオブジェクト名ユーティリティで一発解決。

>>271
すばらしいです！ありがとうございます

またくだらない質問ですみません
フォームやレポートのopenargには配列で複数の値を渡すことは可能でしょうか？

>>272
少しはhelp読め。あとはセンス。

昔 OpenArgs って Variant 型だから何でも渡せるもんだと思ってたけど
String 型に Null の可能性を定義しただけなのな

>>269さん
うちは2000なのですが先方は2003をお使いでした
マクロの一部に非対応があったようです

抽出条件を作っていて困っています。
フォームで、コンボボックスから選択された値を抽出条件に
クエリをかけているのですが、
何も選択されていないときに全部表示するようにしたいのです。

・条件AのときはAのみのリストを
・条件BのときはBのみのリストを
・条件が選択されていないときはAとBの両方のリストを

クエリの抽出条件にどのように記述すればいいですか？

>>276
Null値で判断すればＯＫ！
SELECT テーブル.* FROM テーブル WHERE テーブル.フィールド=IIf(IsNull(Forms!フォーム!コンボボックス),テーブル.フィールド,Forms!フォーム!コンボボックス);
または、
SELECT テーブル.* FROM テーブル WHERE IIf(IsNull(Forms!フォーム!コンボボックス),True,Forms!フォーム!コンボボックス=テーブル.フィールド)=True;

ついでだが、コンボボックスのリストの先頭行に、"Null;すべて"みたいなのを付加しておくとベター！
↓（以下参照）
マイクロソフト サポート技術情報 - 128881
[AC97] コンボ ボックスやリスト ボックスに"(その他)"を追加する方法

>>242
亀レスですが、、、
セキュリティウィザードでセキュリティかければ、何の問題もなく出来ますよ！
本件の様な場合だと、ユーザーアカウントは共通で１つ作っておけば充分でしょう。
また、ユーザーのパスワードをあえて設定しなければ、起動用ショートカット中で
コマンドオプション「/USER ユーザーアカウント名」を指定する事により、
ユーザーのログイン画面を自動的にパスさせる事も可能です。
で、〜.mdb, 〜.mdw, 起動用ショートカットをセットにして各ユーザーに配布すれば良い。
なお、モジールにはVBA側でパスワードをかけておくと吉です。

参考までに、ユーザーに与える権限としては、およそ以下の通り・・・
　データベース…「開く/実行」のみ許可（「排他で開く」は必要があれば許可）
　テーブル…全て不可（この場合、クエリの実行権限は所有者でないとダメかも？）
　クエリ…「構造の変更」と「管理者」以外を許可
　フォーム…「開く/実行」のみ許可
　レポート…「開く/実行」のみ許可
　マクロ…「開く/実行」のみ許可

>>276
数値型のコードを持つリストを数値型で格納するとnullに当たらないので0値判断も組み込むとベター

↑
そんな事しなくても何ら問題は無い・・・

みなさん回答ありがとうございます。
accessは超初心者のため、>277をどこに書けばいいのかわかりません。

現在はクエリをデザインで開いてそこの条件のところに
[forms]![フォーム]![コンボボックス]
と書いています。ここを書きかえればいいのでしょうか？

Select文などSQLの知識とVBの知識はあるので、構文自体は理解できますが。
アクセス初めてから、こんなんばっかです・・・。

クエリに書くならSQLビューで

いま業務で Access 2000 + VBA でアプリケーションを書いています。
それはそれでうまくいっているのですが、やはり VBA では限界があります。
趣味では Sharp Develop で C# プログラミングをやってます。
できれば Access アプリケーションも C# で書きたいんですが、
Access 2003 でもあいかわらず開発言語は VBA なんでしょうか。

>>283
そんな貴方は Visual Studio Tools for Officeについて調べるのが宜しいかと。

>>283
むしろ Accessにこだわるより VC#.NETに鞍替えしたほうがアナタは幸せになれるんじゃ？

クエリの結果返ってくるレコードセットって、すべてオンメモリで処理されるんでしょうか？
それとも一時的なテーブルをディスク上に確保して処理されるんでしょうか？

UNIONによって一時的に数十万レコードの規模のレコードセットが返ってくるときは
やはりそれを超えるメモリが必要なのでしょうか？

将来的にレコードが増えたときのことを考えると不安で不安で。
マシンに積むことのできるメモリには限界がありますし。

>>284-285 ありがとうございます。
Office 2003 からは Developer Edition がなくなってるんですね。
Visual Studio Tools for Office についても検討してみます。

Access 2000 のヘルプによると、

MDB ファイルサイズの上限 2GB
テーブルサイズの上限 1GB
クエリのレコードセットのサイズの上限 1GB

となっています。たとえばメモリを 512MB しか搭載していないシステムでは、
仮に仮想メモリを使わなければ（ページングしなければ）、
テーブルサイズの上限とクエリのレコードセットのサイズの上限は
1GB よりも少ないということでしょうか？

>>286
ADO 等のレコードセットのことなら
クライアントカーソルならオンメモリ

>>287
アクセスVBAとVB.netだとほとんど出来ることに佐賀ないきがする

そもそも.NETってものが何なのか良く分からないっす

Access の MDI の背景に画像が貼れる様になってうれしいです、最近。

質問です
Accessに

数値入力　5

▼
――――――――――
1 5　　　 10

こんなふうに数値にあわせて▼を動かすようなのを
組み込みたいんだけど
できますか？

おもいきりずれてｽﾏｿ

>>293 そういやそんなコントロールがあったなぁ。
Microsoft Slider Control じゃなかったっけ？

>>295
サンクス
探してみます

>>293
VB6だとスクロールバーコントロールで作れるよ
垂直ならリストボックスでも似たように出来る

slider controlて
印刷のとき小さくなんない？
おれもそういうの作りたかったんだけど
うまく印刷できなくて挫折した

質問です。

データベースとしてMDBを扱う場合、MDBの容量が極端に
大きくなっていくのですが、それを防ぐためには手動で
最適化するしかないのでしょうか?

>>299
Access2000以降であれば該当DDBを開いて
ツール→オプション、全般タブにある、閉じるときに最適化する
のチェックを入れる

以降、そのMDBは閉じるとき最適化されるよ

>>299
それ、例のレコード単位ロックにしてるってやつでしょ？

ASPファイルからAccessのユーザー定義関数を使っているクエリを
呼び出したいのですが、「式に未定義関数”ユーザー定義関数名”があります」
というエラーが返ってきてしまいます。
クエリ自体は正常に動くのでユーザー定義関数にはエラーがないと思うのですが、
ASPではこのような呼び出しは出来ないのでしょうか？

IIf関数がいまいちうまく使えないんですが・・・
AというテーブルとBというテーブルがあり、
Aの中にはa,bというフィールドがあり、Bの中にはc,dのフィールドがあり、
bとcをリレーションを張ったとします
もしbの値がcの中にない値が入っている場合に「無し」と表示させたいんですが
d:IIf(A.b=B.c,"B.d","無し")
こんな感じでやっているんですが上手くいきません
どのようにやればいいんでしょうか？

>298

>AというテーブルとBというテーブルがあり、
>Aの中にはa,bというフィールドがあり、Bの中にはc,dのフィールドがあり、
>bとcをリレーションを張ったとします

上記がレコードソースでフォーム上でのフィールドの表示だと仮定
AとBのフィールド名が重複しない場合
=IIf([b]=[c],[d],"無し")

別フォームからは
=IIf([forms]![フォーム名]![b]=[forms]![フォーム名]![c],[forms]![フォーム名]![d],"無し")

>>304
すいません、bとcは同じフィールド名でしたので
Aはa,b、Bはb,cということになります
ですので、
IIf([A]![b]=[B]![b],[c],"無し")
としているんですが、どうしてもAのbとBのbが等しくないデータは表示されません
これではダメなのでしょうか？

>>305
joinの仕方がinner joinになってない
left outer joinなど片側外部結合にしないとそもそも結合キーが等しくないデータが存在しないよ

えくせる　しか使ったことのない初心者デス
あくせす　では行列の表示を入れ替えることってできるんですかあ
どなたか　優しいお兄さん教えてください

行列の入れ替えって、SQLでまともにやろうとするとかなりめんどくさいよね？

行の入れ替えはOrder Byの条件付け次第、
列の入れ替えはフィールド順を変えるだけ、
というのとは意味が違う？(^_^;)

まさか行と列を入れ替えるってこと？
１２３
４５６
７８９
↓
１４７
２５８
３６９

みたいに

そうなんです
えくせる　だと２５６列の、表示が限界ですよね
それ以上のインポートしたいテキストデータがあるんですけど・・・
そして、縦方向にサンプルを揃えたいんですけど
行列の入れ替えはエクセルでは簡単ですけど
あくせす　ではどうしたらいいのかわからなくて・・・

フォーム上で
例えばX + Y = Z
でX Y を入力でZを出したいんですが
印刷時にZの値が最初のレコードの値から変わりません
どうしたらいいでしょうか

>>311
クロス集計じゃないの ? Jet用だが
http://www.google.com/search?hl=ja&q=access+%83N%83%8D%83X%8FW%8Cv&lr=lang_ja

レプリカを作って同期をしています。
同期をするときにレプリカセットが一覧できますが、
もはやなくなってしまったレプリカも一覧に出てきてしまいます。
気持ち悪いので消せないものでしょうか。
MSYSReplicas をいじるのはさすがに怖いので、
なにか安全な方法はありませんでしょうか。

クロス集計ってそういうもんじゃないと思う

>>315
単に作業のしやすさのためだけに表示上入れ替える、
ってのができるといいんですけどね。

データ型つうものを考えろや。

>>312
XとYは入力（TextBoxかな？）させて、
Zはその値で計算させてるんですよね？
XとYの値が変わったら、Zの値をどうやって
計算させてますか？

「最初のレコードの値から変わりません」の
意味もよくわからないのですが...

>>307
こういうのがやりたいのかな？
Excel使いはデータ型いいかげんな人が多いから全テキスト型。
DAOでスマン

Function InverseMatrix(strTableNameIn As String)

　'Dim省略
　Set Db = CurrentDb()
　Set rsIn = Db.OpenRecordset(strTableNameIn)
　strTableNameOut = strTableNameIn & "_行列交換"
　rsIn.MoveLast
　rsIn.MoveFirst
　varRecords = rsIn.GetRows(rsIn.RecordCount)
　
　'出力先テーブル作成（存在チェック省略）
　Set tbl = Db.CreateTableDef(strTableNameOut)
　tbl.Fields.Append tbl.CreateField("ID", dbLong, 5)
　tbl.Fields("ID").Attributes = dbAutoIncrField　'いちおうオートナンバー付与
　For i = 1 To rsIn.RecordCount
　　tbl.Fields.Append tbl.CreateField("項目" & CStr(i), dbText, 255)　'テキスト決め打ち
　Next
　Db.TableDefs.Append tbl
　Set tbl = Nothing
　rsIn.Close

　Set rsOut = Db.OpenRecordset(strTableNameOut)
　For intCLoop = 0 To UBound(varRecords, 1)
　　rsOut.AddNew
　　For intRLoop = 0 To UBound(varRecords, 2)
　　 rsOut.Fields(intRLoop + 1) = varRecords(intCLoop, intRLoop)
　　Next
　　rsOut.Update
　Next
　
　rsOut.Close
　Set Db = Nothing
　
End Function

なんか気持ち悪いな・・・

>>312
Zが非連結じゃないの？

解決しました
ありがとサンクス

Oracleのテーブルへの(ODBC経由の)リンクテーブルを作成する関数を作成しています。

元来、手動で作成していたのですが、
・開発中なので元テーブルの構成が頻繁に変わるので手動では面倒。
・リンクテーブル名の先頭にユーザー名が付いてしまう。
という動機からです。

で、パスワードを保存した状態でのリンクテーブルの作成までは順調にできたのですが
インデックスの設定ができずに困っています。

手動の時もOracleのビューはインデックスが自動取得できないようで、作成時に
インデックスを選択するダイアログが表示されます。
主キーにするフィールド名は決まっているのでそれをコードから登録時に同様に
設定したいのですが、うまく行きません。
これについての情報が見つかっておらず、ほぼ当てずっぽうで書いています。
ヒントの在処をご存じの方はいらっしゃいませんか？

Sub CreateLinkTables()
　　Const lc_sPrefix As String = "UUU."
　　Const lc_sMark As String = "MMM"
　　Const lc_sPKField As String = "KKK"
　　Const lc_sConnect As String = "ODBC;DSN=DDD;UID=UUU;PWD=PPP;DBQ=BBB;"

　　Dim l_Database_Src As Database
　　Dim l_TableDef_Src As TableDef
　　Dim l_TableDef_Dst As TableDef
　　Dim l_sName As String
　　Dim l_colTableDefs As Collection
　　Dim l_Field As Field
　　Dim l_Index As Index
　　
　　Set l_colTableDefs = New Collection
　　Set l_Database_Src = OpenDatabase("", dbDriverNoPrompt, True, lc_sConnect)
　　
　　For Each l_TableDef_Dst In CodeDb.TableDefs
　　　　l_sName = l_TableDef_Dst.Name
　　　　If Len(l_TableDef_Dst.SourceTableName) > 0 And InStr(l_sName, lc_sMark) > 0 Then
　　　　　　Debug.Print "DEL: " & l_sName
　　　　　　CodeDb.TableDefs.Delete l_sName
　　　　　　DoEvents
　　　　End If
　　　　Set l_TableDef_Dst = Nothing
　　Next
　　
　　For Each l_TableDef_Src In l_Database_Src.TableDefs
　　　　l_sName = l_TableDef_Src.Name
　　　　If InStr(l_sName, lc_sPrefix) = 1 And InStr(l_sName, lc_sMark) > 0 Then
　　　　　　Debug.Print "ADD: " & l_sName
　　　　　　Set l_TableDef_Dst = CodeDb.CreateTableDef(Mid(l_sName, Len(lc_sPrefix) + 1))
　　　　　　l_TableDef_Dst.Connect = lc_sConnect
　　　　　　l_TableDef_Dst.Attributes = l_TableDef_Dst.Attributes Or dbAttachSavePWD
　　　　　　l_TableDef_Dst.SourceTableName = l_sName
　　　　　　If l_TableDef_Src.Indexes.Count = 0 Then
　　　　　　　　For Each l_Field In l_TableDef_Src.Fields
　　　　　　　　　　'l_TableDef_Dst.Fields.Append l_TableDef_Dst.CreateField(l_Field.Name)
　　　　　　　　　　If l_Field.Name = lc_sPKField Then
　　　　　　　　　　　　Set l_Index = l_TableDef_Dst.CreateIndex(l_TableDef_Dst.Name & "_PK")
　　　　　　　　　　　　l_Index.Fields.Append l_TableDef_Dst.CreateField(l_Field.Name)
　　　　　　　　　　　　l_TableDef_Dst.Indexes.Append l_Index
　　　　　　　　　　　　Set l_Index = Nothing
　　　　　　　　　　　　Exit For
　　　　　　　　　　End If
　　　　　　　　　　Set l_Field = Nothing
　　　　　　　　Next
　　　　　　End If
　　　　　　CodeDb.TableDefs.Append l_TableDef_Dst
　　　　　　Set l_TableDef_Dst = Nothing
　　　　End If
　　　　DoEvents
　　　　Set l_TableDef_Src = Nothing
　　Next
　　
　　l_Database_Src.Close
　　Set l_Database_Src = Nothing
　　
　　MsgBox "Done.", vbInformation
End Sub

あ、環境は、Access2003、Access2000形式MDB、DAO3.6です。

いま Access 2000 を使っています。
このたび Office 2003 を買おうと思っているのですが、
Access 2000 と Access 2003 の間で同じ mdb ファイルをいじれますか？
一度 Access 2003 で開いちゃうと Access 2000 ではもう開けない
なんていうことになりませんでしょうか？

>>325
Access2003では、Access2000形式とAccess2002-2003形式を変換なしにいじれます。

Access2000では、Access97形式を…… ＿|￣|○ ﾋﾄﾞｲﾒﾆｱｯﾀ

>>327
それはいうな。　

>>326 変換無しにいじれますか、安心しました。
>>327 そう、いつの間にかファイル形式が変わってたりしましたよね？

テーブルの入力の際、「ルックアップ」をつかうとべんりですよね？
でもこのルックアップの際のリストに表示させる値って、
そのテーブル自身からは取り出せないんですよね？

つまり、そのフィールドによく入力される値をリストアップして候補にする、
なんてことができれば便利だなぁ、と思うんですが、無理でしょうか？

-----------
キャベツ
キャベツ
トマト
キャベツ
-----------

なんてすでに入力されている場合、新規レコードの入力の際の
ルックアップの候補に「キャベツ、トマト」の順で表示させたいんですけど

なんかデータベースが壊れてしまった…
いくつかのモジュールが尻切れになってしまったり。
新しいMDBファイル作って、壊れたMDBファイルからインポートして復旧したけど、
全体としてのデータベースのサイズが３０％くらい少なくなってしまった。

壊れたデータベース １０MB
復旧後のデータベース ６．５MB

まぁ特に欠落したレコードも無いようなので大丈夫そうなんだけど、なんで？
壊れたほうのデータベースだって、一日一回くらいは最適化してたんだけどなぁ。

テーブルのデザインでは、各フィールドごとに
テーブルの説明をつけることができますよね？

クエリでもクエリのデザインで「右クリック→プロパティ」で、
フィールドごとの説明を書き込めるみたいなんですが、
これってどこで表示されるんでしょう？？

レポートでは各コントロールにイベントは発生しないんですか？
テキストボックスの背景色を、その内容に応じて変えたいんですが。

条件が多いので、条件付き書式ではやりたくないんです。

Current イベントはレコードの移動が行われる場合に
その直前に発生するイベントです。
したがって Current イベントでは
「今まさに立ち去らんとしているレコード」が見えています。

これに対してレコード移動の直後に発生するイベントは無いのでしょうか？

選択クエリを作成すると新規レコード入力用の行がある場合と無い場合があります。
これってどういう条件で決まっているんでしょうか？

たとえば二つのテーブルの直積をとる単純なクエリを考えます。
片方のテーブルのレコード数が６、
もう片方のテーブルのレコード数が３、だとすると
クエリ結果は１８行のレコードとなります。
このクエリ結果には新規レコード入力用の行がありません。

そのクエリが更新可能かどうかで決まる。

あ〜わかった。
クエリ結果のレコードについて、
あるレコードに対する変更が他のレコードに影響を与えないような
クエリの場合には新規レコードの追加のための行が出現するんだね。

つまり、新しいレコードが追加されたときに
関連するテーブル全体にわたって
再度クエリをかけないとダメな場合は
新規レコードの追加のための行は出現しない、ということか。

>>337 おお、正月から見ている人がいるとは、びっくり。

クエリからのデータ更新について：AccessTips030
http://www.accessclub.jp/beginer/tips/tips_30.htm

「クエリ 更新可能」 でぐぐってみたら詳しくわかりました。
ありがとうございました。

accessにてエクスポートしたtxtをメール送信後
削除したいんですがどのように書けば削除できますか？
よろしくお願いします

>>340
kill hoge.txt

>>341
できました。ありがとうございます

新米プログラマです。
VBにてアクセス９７のMDBに対して固定長で２５６文字の固定長を取り込んでいます。
\　.　-　()　エン　コンマ　ハイフン　括弧　含んでいます
実行時エラー　3075でとまってしまい困っています。それも納期月曜ですやばいです。助けてください　
→ qdfTemp.SQL = SQLstr 'クエリーを定義


FsizeCount = Val(FileLen(inFile))
Open inFile For Binary Access Read As #intFileNo Len = Len(JYUDAT)
Do Until FsizeCount = 0
Get #intFileNo, lngRecordCnt, JYUDAT（２５６の大きさのTYPEを定義している）
If FsizeCount = 0 Then
Exit Do
End If
Close #intFileNo

DAT1=JYUDAT.DAT1
　　・
　　・
　　・

Call IsNull_ALL　'NULLを空白""に置き換える

SQL = ""
SQL = SQL + "INSERT INTO 工場DATA (" & _
"●●番号,何●口,お●●●,●●●,運賃," & _
"●●番号,●●月日,●●,●●区分,●●区分," & _
"品番,●●●●,品名,材質,●●," & _
"数量,単位,単価,コードNO,図面番号," & _
"●●,●●●,備考,●●日,●●予定日," & _
"●●日,●●数量,分納累計,●●●済,マーク) VALUES ('" & _
DAT1 & "','" & DAT2 & "','" & DAT3 & "','" & DAT4 & "','" & DAT5 & "','" & _
DAT6 & "','" & DAT7 & "','" & DAT8 & "','" & DAT9 & "','" & DAT10 & "','" & _
DAT11 & "','" & DAT12 & "','" & DAT13 & "','" & DAT14 & "','" & DAT15 & "','" & _
DAT16 & "','" & DAT17 & "','" & DAT18 & "','" & DAT19 & "','" & DAT20 & "','" & _
DAT21 & "','" & DAT22 & "','" & DAT23 & "','" & DAT24 & "','" & DAT25 & "','" & _
DAT26 & "','" & DAT27 & "','" & DAT28 & "','" & DAT29 & "','" & DAT30 & "')"
Call SqlExecute(SQL, "testdata.MDB")


Function SqlExecute(SQLstr As String, MDBfile As String)
Dim DB As Database 'データベースオブジェクトを定義
Dim qdfTemp As QueryDef 'クエリーのオブジェクトを定義
Set DB = OpenDatabase(MDBfile) 'データベース名称を指定しＭＤＢをオープン
Set qdfTemp = DB.CreateQueryDef("") ' ""は名前の表示されないテンポラリ的なクエリー
Debug.Print SQLstr 'ＤＥＢＵＧＰＲＩＮＴ
qdfTemp.SQL = SQLstr 'クエリーを定義
qdfTemp.Execute 'クエリーを実行
DB.Close 'MdbをCLOSE
End Function

>>343
最初からエラーが出るのでしょうか？それとも途中で出るのでしょうか？
最初から出るのであればSQLがおかしいと思いますし、途中で出るのであれば、元データまたは取得後のデータが書き込みフィールド型に対して適合していないのかもしれません。
あと気になるのは、Access(MDB)の場合テキスト型フィールドに空白文字列("")は格納できないと思いましたが…

ぜひともご教授願います。m(__)m

ここで3075が出ます→　　qdfTemp.SQL = SQLstr 'クエリーを定義

この掲示板見て　変数は全部　MID（変数 &　Space（8）,8)こうやってスペース入れました
AAAAAAAAAAAAAAAAAAAAで256文字の取得には成功しています。ということはクエリの間違いではないとおもいます。

MDBで使えない文字列おしえてください　'←これはダメだときいたことがあるのでないです。
それ以外に使えない文字列教えてください。

文字コートUNICODEに変換して格納すると'01733109'　などが　'0 1 7 3 ' になってしまいます。

chr(0)　は格納できるのでしょうか？
詳しいことのってるHPしってたら教えてください


先頭の伝票番号ぶぶんだけ　インデックスはい　ですが重複するデータ書き込みに行くことはないのです。
データ型はテキストです。値要求はいいえ　空文字列の許可はい　インデックスいいえ
フィールドサイズは各切り取りするサイズにしています。これに例えば　5文字のフィールドに6文字ほりこむとアウトでしょうか？

神の降臨お待ちしてます。m(__)m
今自分でもWEBと本にらめっこちゅう　納期月曜なんで助けてマジで

Accessのフォームに貼ったテキストボックスに
文字列を入力することで、さまざまな検索機能を実装しているのですが、
インクリメンタルサーチはどうやっても実装できないんでしょうか？
インクリメンタルサーチ実現のために使えるイベントってありますか？

Changeとかではダメってこと？

>>348 テキストボックスのキーイベントはたしかに発生しているんですが、
別のコントロールにフォーカスが移動するまで
Value プロパティが更新されないんです。

>>349
だったら、value = trueと明示的に指定してあげればいいじゃない

Kさん 好循環　　Aさん 悪循環　　
　（健康体）　　（喘息）

1.（天国・霊界が喘息であるかないかを決める）
2.K 喘息でない人　A 喘息の人は
は体力がある　　　 体力がなくなる

3.K　　　　　　　 A 行動力、五感（嗅覚）が鈍り感性が変化する。
4.K&A 天国・霊界は異常な感性の人間は本来人に迷惑をかけ
るから外に出てはいけないと思っている。

5.K 変化なし　　　A アトピーになる
6.K 正常な感性　　A 外に出なくなりさらに異常な感性になる。
7.K 正常な人間 　 A 異常な人間（レッテル）
8.K&A 死　　9.K&A　　　　　　来世
10.K&A 天国・霊界は異常な人間は人に迷惑をかけるので行動
を抑制する必要があると思っている。

11.K&A 天国・霊界が喘息であるかないかを決める 12.K 喘息でない　　A 喘息である
13.K&A　　　　1.に戻る

これは事実。広めようぜ
解決法：寝て起きて、やな気分でも、続けるけること。
体力をつけると感覚が正常に戻り、
アトピーも快癒に向かう。 目安としてグランドを10週くらい。
あとはウォーキング 2.3時間を目安にウインドーショッピングや本屋めぐり
鼻に変な違和感があったり、気分の悪い時は、
お腹の中の空気を出さなくてはならない。
口をしっかり閉じたまま、口の中に空間を作り、
口の中にできた空気を吐き出す。
これを100回から200回。

>>322-324
ODBCリンクテーブルへのインデックス設定、やっぱり誰もご存じないですか？
無理なのかなぁ...

もしかして、インデックスじゃなくてoracleのビューを取り込むときの主キーのことなの？

>>353
そうです!!それです!!
(インデックスっていうと意味が違ってしまいますか)

何かヒントはありませんでしょうか？

>>353
要は「固有レコード識別子の選択」ダイアログでの選択をVBAから
行いたいのです。

>354-355
や、広い意味では一緒だと思うけど、文章から索引だと思ってましたから、
あれ？ビューにインデックスつけてるの？とか思っただけ。

＞「固有レコード識別子の選択」ダイアログでの選択
あー、あれね。

結論から言うと「僕は諦めた」。
ごめんなさい。お役に立てなくて。。。｡･ﾟ･(ﾉД`)･ﾟ･｡

昔(oracle触ってた頃)は色々考えてたけど、
別の役に立つもん作った方がよさげだったので
それ以上踏み込まなかった。
今はoracleあんま触ってないので環境もありゃしない。

>>356
どもです。

> 結論から言うと「僕は諦めた」。
やっぱりですかー。
難しいのかな。
MSへの質問権が余ってるから使ってしまおうか。

俺も昔別サイトで質問立てて、無理っつー結論になったｷｦｸ。
DAOにもそのへんのプロパティが無かったｷｦｸ。

Access2000をCGIと連携させて使っているのですが、
よく言われているように同時にAccessのmdbファイルに問い合わせがかかると
mdbファイルは壊れてしまうのでしょうか？

見事に壊れます
10クライアントぐらい同時にやると

>>360
排他処理、遅延処理がうまくいかないってことか？

っていうかそこまでして使いたいのなら、要するに「mysqlでも使え」
ってことなんだけどさ

質問させてください。
ローカルに顧客情報mdbファイルがあるとします。
その顧客情報を一覧表示したり、検索したり、ソートしたり、いわゆる顧客管理ソフトを、
windowsアプリケーションのごとく作成することはできるのでしょうか？
できればアクセスの入っていないマシンでも、動作するソフトがいいのですが。
できるとすれば言語とか、何がつかえるのでしょうか？
どうかご教授ください

>>362
一番簡単なのはVB+ADO(orDAO)で開発。

質問です。

SELECT A.*, B.* FROM (SELECT * FROM X) AS A, (SELECT * FROM Y) AS B

みたいなサブクエリって、Access97では使えないと思っていたのですが、
あるとき、この手のSQLをAccess2003で書いていたら、いつの間にか

SELECT A.*, B.* FROM [SELECT * FROM X]. AS A, [SELECT * FROM Y]. AS B

っていう風に変換されてまして、この書き方だとAccess97でも使えました。

僕はずっと知らずにいたのですが、これは"Documented"な仕様なのでしょうか？

それはM$を直接調べたほうが早いだろ。ノウハウならともかく、
公式仕様かどうかは検索するしかないよ

359です。
ツール＞オプション＞詳細
のところで排他制御関連の設定項目があるのですが、
これらを設定してもmdbファイルは壊れますか？

Access 2000 を使っています。
VBA でのファイル入出力に際しての文字コードを指定することはできるのでしょうか？
現在ファイルを Open してそのファイルに String 型の変数を Print すると
Shift JIS で出力されています。

Access 2000 VBA では内部的には Unicode で処理されているのでしょうか？
だとすると Line Input ステートメントでのファイルからの読み込み時には
Shift JIS -> Unicode の変換が自動的に行われているということでしょうか？

さらに疑問なのは、ファイルの先頭が FF FE で始まる Little Endian な
Unicode ファイルであっても、Unicode としては読み込んでくれていないようです。
FE FF で始まる Big Endian な Unicode ファイルや EF で始まる UTF8 ファイルも
ただしく認識していないようです。つまりすべて Shift JIS ファイルであるかのように
扱われているようなのです。

VBA のファイル I/O で、Shift JIS, Unicode BE, Unicode LE, UTF8 を
正しく扱うにはどうすればよいのでしょうか？

>>366
実際やられてみてはどうでしょう？
排他ロックとかで、エラーでちゃうかも知れないけど。

>>367
分かる範囲ですが。。。

＞VBA でのファイル入出力に際しての文字コードを指定することはできるのでしょうか？
No
＞Access 2000 VBA では内部的には Unicode で処理されているのでしょうか？
Yes
変数に格納した値をLenBとってみれば分かるかと。(半角でも2バイトとなるはず)

＞Shift JIS -> Unicode の変換が自動的に行われているということでしょうか？
Yes

＞つまりすべて Shift JIS ファイルであるかのように扱われているようなのです。
強制的に(たとえUnicodeでも)S-JIS > Unicode変換を行っている為かと。

＞VBA のファイル I/O で、Shift JIS, Unicode BE, Unicode LE, UTF8 を
＞正しく扱うにはどうすればよいのでしょうか？
１．（S-JISだけになるように）仕様を見つめなおす。
２．外部で変換してくれるようなコンポーネントを探す。
３．自分で変換機能作っちゃう。

＃自分はよくEUCのデータと変換をするが、VBAでやらず(やれないので)に
＃外部PGを利用してS-JIS変換してから読んだり書いたりしてます。
＃面倒くさいのですが。

>>362
今、まさに俺はVB + ADO with Data Environmentで作成中。
フレームワークができたら、お手軽キットとして公開しようとも
おもっている。

もちろん、接続関係やMDB最適化などはbasモジュールとして
分離しておき、コード内では呼び出すだけにしてあるよ。これら
をすべてPublicで宣言しておいて、あとは変数のこどく使える。
メンテナンスもしやすい。

Kさん 好循環　　Aさん 悪循環　　 <日本>　完成版
　（健康体）　　（喘息）

1.（天国・霊界が喘息であるかないかを決める）
2.K 喘息でない人　A 喘息の人は
は体力がある　　　 体力がなくなる

3.K 変化なし　　　 A 行動力、五感（嗅覚）が鈍り感性が変化する。

4.K&A 天国・霊界は異常な感性の人間は本来人に迷惑をかけ
るから外に出てはいけないと思っている。
5.K 変化なし　　　A アトピーになる
6.K 正常な感性　　A 外に出なくなりさらに異常な感性になる。
7.K 正常な人間 　 A 異常な人間（レッテル）
8.K&A 死　　9.K&A　　　　　　来世
10.K&A 天国・霊界は異常な人間は人に迷惑をかけるので行動
を抑制する必要があると思っている。
11.K&A 天国・霊界が喘息であるかないかを決める 12.K 喘息でない　　A 喘息である
13.K&A　　　　1.に戻る
これは事実。広めようぜ
解決法：寝て起きて、やな気分でも、続けるけること。
体力をつけると感覚が正常に戻り、
アトピーも快癒に向かう。 目安としてグランドを10週くらい。
あとはウォーキング 2.3時間を目安にウインドーショッピングや本屋めぐり
絶対に直す方法：
よく海外に行ってアトピーが治る話を聞くが、基本的に日本の中のことだけなので、
海外に行くとほとんどの場合体力をつけると治る。 日本の中であっても、体力をつ
けると治るはずだが、 様々な理由により、霊界の存在がばれてしまい、 この失態が明
るみになるので、治さないようにしている。よって、絶対にアトピーを治すには、 海外
に行き体力をつける。
http://life.2ch.net/test/read.cgi/atopi/1035703616/l50を参照

リンクテーブルで PostgreSQL に接続しています。
テーブルをクリックするともちろんテーブルの内容を見ることができるのですが、
クリックしてから表示されるまでに10秒ほどまたされます。
テーブルのサイズは整数のフィールドが６、それが30レコードほどあるだけです。

パケットモニタで見てみると、サーバの5432/tcp から即座にデータが
返ってきています。にもかかわらず表示されるまでに１０秒ほどかかるのです。
これは何か設定が悪いからなのでしょうか？
それともリンクテーブルというものはそういうものなのでしょうか？

いろいろと調査してみた結果、ODBCマネージャに問題がある
ことがわかりました。OS は　Windows XP Professional で、
Access 2000 なんですが、これが問題なのかも。
と思って、ODBCマネージャを正常な状態に戻すためだけに
MSDE 2000 Revision A をダウンロードしてインストールしました。
直りました。

>>372 http://www.microsoft.com/sql/msde/downloads/download.asp
これね。

テーブルのプロパティの「説明」の文字列って、
VBAから参照できますでしょうか？

MSｙｓObjectsテーブルなどにメモ型として
格納されているのかとも思ったんですが、
そう簡単にはいかないようです。

TableDefs オブジェクトのプロパティコレクションに
はいっているのかともおもって探してみたんですが、
違うようです…

げ、やっぱり Description プロパティだったよ…
簡単にVBAからいじれるんだ…

Access のツールバーにはユーザ設定で
いろいろなボタンを登録することができますが、
そのボタンイメージを既存の ICO ファイルなどから
簡単に取り込むことはできませんでしょうか？？

できました。ども。

ああ〜
戯れに、フォームに画像を貼り付けてみたら、
MDBファイルのサイズが一気に増えました。
１０MB→４８MB

やっぱりいらないや、と思って画像は削除したんですが、
MDBファイルのサイズは大きくなったままです。
悲しいので最適化をやってみたんですが、ほとんど変化なし。
４８MB→４６MB

泣く。

>>378
内部にバイナリデータとしてどこかに格納されている。

>>379 その領域って、永久に再利用されることはないの？
もしそうなら…データベース製品としてはありえないことのような…

>>380
普通は取り込むんじゃなくて、一つテーブルを作って外部への
リンクで呼び出す。

で、フォームの飾りとしての画像類は消す方法が確かあった。

>>322-324
>>352-358
この件に関してMSの無償インシデントを使って問い合わせた結果を
遅ればせながらご報告します。

-----
CREATE UNIQUE INDEX <インデックス名> ON <テーブル名>(<フィールド名>)
なるSQLを発行してください。
-----

という、拍子抜けするほどシンプルな解決法でした。
おかげさまでツールが完成しました。

ついでに、

>>364-365

こっちの方も聞いてみたんですが、

-----
ドキュメントには見つかりませんでしたが、正しい使い方です。
-----

とのことでした。

>>381
> で、フォームの飾りとしての画像類は消す方法が確かあった。

う、消えないよ…
内部的にはなにか特殊なテーブルのBLOBとして格納されているんだろうか。
それにしてもフォームごと削除してもMDBファイルのサイズが変わらないとは。
最適化も効果なし。

>>383
新しいMDBを作って、テーブルとかフォームとかをドラッグ&ドロップで
引っ越しさせるとどうなります？

隠しオブジェクト、システムオブジェクトを表示して、
片っ端から開いてみて
それらしいデータ探して見れ

新規MDBを作成して、すべてインポートしる。
それで解決

>>386 そう、その方法だと解決できるんですが…
MDBファイルってそういうものなんでしょうか…

そういうものです。
だいたいテーブルのレコードを削除しても、その領域が残ったままになります。
つまり使いつづけるかぎり、MDBは増大していきます。
そこで最適化が必要となります

でもExchangeServerもいまだにJETベースなんだよね
大丈夫なのかな？

アクセスでエクセルの
vlookup関数のようなものはできますか？
番号を入力したら別項目にそれに該当した
データが入力されるというのを作りたいんですが

条件に一致する日付のデータを抽出するフォームを作っています。
日付はテキストフィールドを２つ使って期間で入力させています。
(XXXX/XX/XX)〜(XXXX/XX/XX)

どちらか一方に日付として存在しない日（2004/02/31）などを
入力してクエリをかけるとエラーが出て困っています。
（式が正しく入力されていないか、複雑すぎるため評価できません。
　たとえば数式に複雑な要素が多すぎます・・・・。）

これを回避する方法はありませんか？

>>389
dlookup
>>390
入力規則をして存在しない日等は入力させない

>>391
いや、もちろん規則していますが、オペミスというか
2003/11/31とか間違って入れてしまうとダイアログの嵐になってしまうんですよね・・・。

なんかいい方法ないかなー。

SQLにする前にIsDatetとかでチェックしてないの？

IsDateね。タイプミスしてしまった。

>390
テキストボックスの書式をyyyy/mm/ddにすればいい

>>390
誤入力を抑制する方向で考えるなら（連続して多くの件数を入力するとかでなければ）、
カレンダーコントロール等を使って直接日付指定させるというのもおすすめ。
職場用に作ったやつの日付入力は、常にテキストボックス（直接入力）と
カレンダー入力用フォーム（ボタン入力）呼び出しボタンをセットにしてある。
勿論処理前にチェックも入れてるけど。

ACCESS2000でmdbに最適化をかけるとクエリが極端に遅くなるという不思議な
現象を経験された方はいらっしゃいませんか？
単にmdbが壊れてるだけなのかな・・・

レスありがとうございます。

>>393
こういうのを知りたかったんです！
これ調べて組み込みます。

>>397 念のため、空の MDB ファイル作って
テーブルとかクエリとか全部インポートしておいたほうが安全かと。

>>397
よくぞ、違いに気付きましたね！
でも、クエリオプティマイザの仕様でそうなるのであって、別に壊れてる訳ではないよ
詳しくは、サポート技術情報[209126]を参照すべし

データベース部分とプログラム部分をべつの.mdbわけるってのを見かけるけど
そういう場合って、ADOだとかDAOを使って別のmdbのテーブルを操作するの?

>>401
リンクテーブルじゃねーの？
(っていうか1.0のときにそうした気がする・・・)

>>401
私はテーブルリンクで行っています。
ただ、データMDBのパスが変わったりするとリンクしなくなるので、システム運用段階では工夫が必要です。

リンクテーブルマネージャで手動で１回再リンクすれば済む、というのであれば問題ないのですが、
インストール先が想定できない場合やメニューカスタマイズされたMDEでリンクテーブルマネージャが使えない場合、ADOXとか使ってデータMDBと自動的に再リンクするようなしくみをプログラムMDB側に作っておかしないと実用が難しくなりますです。

Option Compare Database に面食らった。
いままで Option Compare {Binary | Text} だったし。

・Database モード
Access のみで使用できるモードです。データベースの文字列を比較するときに適用され
る、国別のID にしたがって並べます。日本の場合は、Binary モードと同じ結果になりま
す。
・Binary モード
大文字/小文字、全角/半角、ひらがな/カタカナを区別したUnicode 順に並べます。
・Text モード
OS の国別情報の設定によって並べ替え方法が決まります。日本の場合は、大文字/小文字、
全角/半角、ひらがな/カタカナを区別しない50 音順に並べます。

http://store.nikkeibp.co.jp/msp/TXT/download/pdf/pdf/acvban.pdf
からの引用でした。

>>401
うちも基本的にはリンクテーブル。
レジストリにPC毎に対応するデータmdbの場所等を保存して、
起動する毎に参照、リンクを更新してる。
で、更新時は単一のプログラムDBをLAN上の全てのPCに一斉に上書きする。

>>400
私の説明が舌足らずでした。すみません。
>>397の「最適化」とは
ﾂｰﾙ(T)：ﾃﾞｰﾀﾍﾞｰｽﾕｰﾃｨﾘﾃｨｰ(D)：最適化／修復(C)
のことです。

ACCESSなうえにレジストリまで弄るとはヽ('ー`)ノｶﾝﾍﾞﾝ

うちは、データとプログラムのmdbは一緒のフォルダとしていて
起動する毎にCurrentDBからパス生成してリンクを更新してる。

っていうか、データとプログラムを一緒にしてるのって
メンテナンスしにくくないですか？

だからACCESSなんだって。

>>411
俺はプログラム部分はVBで作っているが？

>>408
だから、ＤＢを最適化するとクエリの最適化情報が失われるって事なんですよぉ〜
真意がご理解頂けなかったみたいなので、一応補足しておきます・・・

56歳
15年前まで大学に住みついてゲバ棒と赤旗もって内ゲバに明け暮れ
最近は国立と高槻でプロ市民運動に転向して
「将軍様!!将軍様!!将軍様!!将軍様!!」って環境保護キャンペーンとやらで
路上で全裸でわめきながら頑張ってきたけど
いまから8分40秒くらい前に「地球市民の妖精」とやらに出会って　
ナウシカに腐海に突き落とされたい気分になった。一度見てみなよ。
伺かでテポドンを東京に撃ちこんだり
日々の工作記録をかきこめたりしてマジでおすすめ
http://kazukimina.hp.infoseek.co.jp/index.html
http://kazukimina.hp.infoseek.co.jp/ukagaka.html
http://kazukimina.hp.infoseek.co.jp/hyoushi.jpg
http://kazukimina.hp.infoseek.co.jp/1.jpg
http://kazukimina.hp.infoseek.co.jp/2.jpg
http://kazukimina.hp.infoseek.co.jp/3.jpg
http://kazukimina.hp.infoseek.co.jp/4.jpg
http://kazukimina.hp.infoseek.co.jp/5.jpg
以下9まで

最適化より VSS で再作成が最強
しかしフォーム等の説明が消える諸刃の刃

>409にとってレジストリは神聖な領域らしいな

すみません、非常に低いレベルの相談だと思うのですが、どうしても
FAQが見つかりません。
MS ACCSESS 2000 での話しです。ACCESS上でデータの入力をするとき、
既存のレコードがいくつかあり、その中の空白の文字列のフィールドの
レコードに、10と入力し、次のレコードに11と入力、ここで下矢印を押して
次のレコードに移動すると、勝手に、「12」が入力されてしまうのです。
もー、勘弁して欲しいのですが、どこでこの機能を停止できますでしょうか？

>>417 オートナンバーになっている、とかじゃないですか？？

>>418
早速のお返事ありがとうございます。
いえ、なっていません。テキスト型でも、この現象が出てしまうのです。
勝手に入力されるミスが恐くて恐くて･･･

>>419
なにか式がうめこまれている・

かもしくは、どこかにオートナンバーの数値が入るような別の
ボックスがあると見た。

>>420
お返事ありがとうございます。
単にMDBをACCESSで開き、テーブル(7000件ぐらい入っている)名をダブルクリックして開きます。
そして、縦に空白が連続しているテキスト型フィールドの一つに、10と半角で入力し、
FEPがONになっているので、一度Enterを押し下線を消して決定します。そして下矢印を押し
下のフィールドに移動、ここで、11と同じように入力します。次に下矢印を押すと
このフィールドに、自動で、12が入力されてしまうのです。
式とかそう言った高度な話ではないような気がするのです。

テキスト型との事ですが、そのフィールドの他の設定はどうなってますか？
既定値とか、書式とか。
また、そのフィールドにAとかBって入力するとどうなりますか？

Access 2000 からの機能だろ
切り方は知らないけど

ttp://fukkey.dyndns.org/pins/acc/010822/62014.html
を読む限りでは仕様だそうだ。
MSに確認したらしい。
なんて糞なんだ・・・

おーホントだ。なるなる（ｗ
こんな機能ｲﾗﾈ。
全然知らんかった。

>>422-425
みなさん、ありがとうございます・・・切れないのこれ？（号泣
なんだかものすごく変なんですよ。
10,11→12
10,12→14
10,13→自動入力なし
10,9→自動入力なし
月曜日,火曜日→自動入力なし
A,B→自動入力なし
+1と+2の時だけ自動みたい・・・勘弁して欲しいです！

みなさん、本当にありがとうございました、しかし、なんだなぁ･･･

オートコンプリートOFFにすればいいんじゃ？
と思って試したがそれでもﾔﾊﾟｰﾘ直らんな。
こんな機能ｲﾗﾈ

ちなみに当方2003だが同じ状況でつ

おー、、こりゃ便利だ（ｗ
ﾕﾆｰｸ生成簡単にできるな（ｗ

>>427
おそらく、オートコンプリートがらみのフラグか何かが混じって居るんだろう。

仕様でもなんでもなく、便利と思って付けた機能が実は、特定の場合におい
てはどうしようもないうざい機能になった

それだけの話なんだろう。

VBA って、Structure ステートメントはないのでしょうか？
Windows の API で構造体へのポインタを受け渡しするものがあるのですが、
こういう API は VBA からは呼び出すことができないのでしょうか？

Type ステートメントでしたね…

名前、数、結果の3つのフィールドがあり
[名前]はリストボックスから選び、
[数]は[名前]が入力されると自動で決まり
[結果]は[数]*10とします

今後名前のリストを増やす時にVBやマクロを編集せずに
すむ方法はないでしょうか、自分ではなく
まったくの初心者が使うもので

長い上にわかりずらくて、すいません

自分で出来ました
ｽﾏｿ

すみません。超初心者なのですが、助けてください。

初めてaccessを使っています。
宛名ラベルをつくりたいと思い、
317人分入力済みのテーブルを基にレポートのプレビューを出しているところです。
しかし何故か177人目から表示されないんです。

なんせ初めてなもんで、途中でいろいろとどこかを扱ったりしてます。
何が原因かわからなくて困っています。
じつは時間がありません。あさってまでには問題解決したいです。
やさしい方、助けてください！！

たすけて・・

>>435
表示されないとはどういう現象？

1)178人目からプレビュー画面が真っ白
　考えられる原因：Windowsのリソース不足
　確認用テスト：プレビューを出した時、レポート下のページ番号を
　　　178人目表示用に変更して移動。

2)データが177件目から先に進まない。
　考えられる原因：レポートのデータソース
　確認用テスト：レポートのデータソースを確認する。
　　SQLが書かれているならそれをクエリーで作って、件数がちゃんと
　　317人分出るか確認する。

他にも原因はありそうだけど、まず現象がはっきりしないと。
それとレポートのデータソースの記述も。

accessで作成したposデータテーブルと分析ツールを、DB2に
乗せ替えようと思います。同じような経験のあるかた、アドバイス
お願いします。

accessで住所録作成中なんですが
.を...と３回打つと…に変わっちゃうんです。
メルアドなんで変わっちゃったら困るんです。
どうにかならないですかね？

どうにか？

オートコレクト（ぼそ

４４０さんありがとです。
そんな機能がついてましたねー。
ようやく思い出しました。住所録完成ですー。

>>437
435です。
せっかく考えていただいたのにちょっと無難しすぎて理解不能です・・
ワードで宛名ラベルやってみたら、178人目以降もちゃんと出てきました。
何故だかよくわからないのですが。
もうワードでやります。
どうもです！

先日、クライアントからいきなりアクセスのデータを渡されて、
使い方もわからず困っております。
これまではエクセルでデータを渡されていたので苦労はなかったのですが…。
そこで、「初心者は必ず読んでおけ！」といった本があればオススメして
いただきたいのですが、よければアドバイスください。
取り急ぎ、「データベース」で閲覧可能な情報を、
エクセルで開くようなことはできるのでしょうか？
現在確認できる情報を、たとえばイラストレータやクォークなどの
別アプリケーションに転載したいのですが、
どこをどう操作すればいいやら……＿|￣|○
これを機に勉強しようと思います。初心者すぎて申し訳ありません

>>443
使いまわしのきくCSVにでもエクスポートしてみれば？

>>443
１）　エクセルで、[データ]→[外部データの取り込み]→[新しいデータベース クエリ]（MS-Query）を実行。
２）　データソースの選択で、[MS Access Database]を選択。
３）　データベースの選択で、目的のMDBファイルを開く。
４）　クエリウィザード−列の選択で、使用可能なテーブルとクエリの一覧が表示されるので、
　　　とりあえず、何か１つテーブルを選び '＞' ボタンで列を追加。
５）　後はひたすら '次へ' ボタンで進み完了。
６）　最後に取り込み位置を指定すればＯＫ！
７）　４）で複数のテーブルやクエリがあった場合、ワークシートを切り替えて１）〜６）を繰り返す。

以上

>>444、445
どうもありがとうございます。
とりあえず445でお教えいただいた方法で試してみます。
なんとか仕事がはかどりそうで…
本当にありがとうございました

win98のPCで作ったアクセスのレポートをwin2000のマシンで開こうとすると
"0x77fcc641"の命令が"0Xfffffff8"のメモリ参照しましたが。メモリが"read"になることができませんでした。
というエラーメッセージがでてアクセスが落ちてしまいます
win98、win2000ともにaccess2000を使っています

同じような現象に遭った事がある、解決策を知っているという方いませんか？

初心者です。
フォームに３つのコンボボックスと１つのテキストボックスがあります。

１．コンボボックスには各々別のマスターテーブル（フィールドA,B）のAの値を表示します。
２．テキストボックスにはプルダウンで選択された値に対応するBの文字列を３つ連結して表示します。
３．作成した文字列を結果テーブルに格納します。

ルックアップでプルダウンにAの値を表示すること、
Aを連結した文字列をテキストボックスに表示することはできました。
（テキストボックスのコントロールソースに=[コンボ1]+=[コンボ2]+=[コンボ3]）

それで、以下の方法を教えてください。
・Bを連結した文字列をテキストボックスに表示する方法。
・結果を結果テーブルに格納する方法。

よろしくお願いします。

初歩的な質問かもしれず申し訳ないのですが、どなたか教えていただけると幸いです。
Webのフォームで入力したデータを、
perl(CGI)で、microsoft accessのテーブルの内容を更新することは可能でしょうか。
また、そうしたことを易しく解説してあるHP等があれば教えてください。

>>449
可能ですが、
そういう検索すれば、わかる質問はどうかと・・・。

>>447 とりあえず Office のアップデートは？
http://office.microsoft.com/OfficeUpdate/default.aspx

重複しないレコードの取得で質問があります。
重複させたくないフィールドを指定していするには
どうしたらよいのでしょうか？
DISTINCTを使うとSELECTで指定したすべてになって
しまいますが、これを、、、
SELECT DISTINCT A, B, C FROM 〜
とあったら、BとCは重複しても良いが、Aが重複していない
レコードを抽出するというふうにしたいのです。

>>452
そいつぁ無理な相談だぜぃ。

と思ったら・・・
SELECT A, MAX(B) AS BB, MAX(C) AS CC
FROM テーブル
GROUP BY A;
で出来るね。ｺﾞﾒﾝ

検索条件となる連結コンボボックスに「全て」をつけたいです。
ttp://support.microsoft.com/default.aspx?scid=%2fdirectory%2fworldwide%2fja%2fkblight%2fT005%2f2%2f20.asp
を見てやってますが、なーんかうまくいきません。

追加したライブラリはDaoのみ。
Set rs = Db.OpenRecordset(strSql, dbOpenSnapshot)のとこで
型が一致しませんエラーで落ちます。
なんでですかねぇ？

すみません　教えて下さい
売り上げを入力する画面があって、支払い価格を入力する際、
画面表示では、品物の種類で選び、データ上はその品物の支払い価格で計算
されている様にしたいのですが。

社員の中に、得意先の身内がいて支払い原価がばれるとまずいので。
日本語がへんですみません。

>>456
コンボボックスを使用。
値集合ソースはselect [金額],[品名]の順
連結列＝1
列数＝2
列幅＝0cm;10.0cm
※列幅の１つ目は0、２つ目は適当な数値で。

>>45
ありがとうございます。
やってみます。　多謝

>>45 じゃない >>457 だ。
ｽﾏｿ

>>456
テーブル構造が分からないとなんとも。。。

そもそもそれをAccessで実現するのは難しいだろ
見ようと思えば手段はいくらでもあるんだから

>>460
たしかに上記の方法だと、直接テーブルみれば、
ばれるのはわかってますが、あいてはただの事務員なので、
入力画面で見えなければ大丈夫だろうと思っているのですが。


単価マスタ
　100g 20
　200g 35
　300g 40

入力画面
発注先　　部数　　単価（表示は重さで）

単価が重さ別なので、表示は重さにしたい。
しかし自分たちが見るレポートは単価で確認したい。


ほかに良い方法があれば教えてください。

一応、解決しました

どうやら サポート技術情報 - 812654　と同じような状況になっていたようです
http://support.microsoft.com/default.aspx?scid=kb;ja;812654&Product=acc

>>461
別テーブルに原価マスタがあってリレーションで単価マスタと結合してるの？
単価マスタって命名がわかり難いですね、売価マスタ、卸値マスタってこと？

一番ばれない方法は、オペレーション用MDBと管理用MDBを別々に用意する。
オペレーション用MDBからは売価マスタしか参照できないようにする。
管理用MDBからだけ原価マスタ、売価マスタを参照、操作できるようにする。

この単価マスタは、業者への支払い原価のことです。
客への請求の単価は直接金額を入力です。

MDBを２つにわけて、一回の入力で
どちらにもデータが登録されるのですか？
ちょっとぐぐってきます。

Ａｃｃｅｓｓって難しくない？
単一のデータ入力ならものすごく楽だけど、
きっちり正規化やって、サブシステムがいくつもあって、マスタ
をよく弄ることになるとウィンドウやサブフォームが増えてくるし、
そうなるとフォーカス移すたびにアップデート＆コミットしようとするから
整合性制約がまともに作れないじゃないですか。
ＡＤＰ使うとこの辺解決するの？
Ｃ＃やＶＢで作るのとどっちが楽？

>>465
は？

それ、単純にDBの仕組み理解していないだけじゃない。

設計が糞に3000jet

>>465
意味不明　帰れ

整合性制約をプログラムで実現してるのだろうか・・・

Ａｃｃｅｓｓ厨には話が難しすぎたか。

整合性制約は、トリガないからプロシージャで書くこともあるけど、
単なる外部キーの参照制約でも問題になる。
データ分析がしっかりしてるんでこの参照制約がたくさんあるんだよ。

やっぱりコミットのタイミングが、フォーカスがレコードから外れたときって
決まってるのは、トランザクションやアサーション的な整合性制約を意識
しない設計を行うことを前提としての仕様なのかな。

>>470

君、ひどいよ。
僕はMySQL厨なのにさ　　謝れ。さもないと、泣くぞ

>>470
フォームに直接テーブルを関連付けた
お手軽プログラムしか書いた事がない
坊やの寝言は要りません。

>>470
> やっぱりコミットのタイミングが、フォーカスがレコードから外れたときって
> 決まってるのは、トランザクションやアサーション的な整合性制約を意識
> しない設計を行うことを前提としての仕様なのかな。

決まってないよ。
それはフォームのデータソースとして直接レコードセットを関連付けているときだけでしょ？
DAOにだってトランザクション制御機能あるじゃん。

>>470が一番ACCESS厨な罠
そんな実装許されるのは素人のACCESSアプリもどきだけ

Office Pro がすべてのＰＣに入ってるせいで、ACCESS 使って DB 作れといわれますた
データ入力部分だけ ACCESS のフレーム使って、PostgreSQL で C/S型DB作りましたが、何か？

>>472
>>473
>>474
そんなん、ぜんぜんＡｃｃｅｓｓの存在意義ないやん。
ＶＢ使ってるのと変わらんやん。
全員、首吊って来い。

>>475
フレームってなんですか？
フォームと勘違いしてるんなら首吊ってください。

フォームの中のフレーム・・・じゃあないだろうな(w

VBA の代わりに C# になってくれ。
次のバージョンからはそうなるのか？

>476
君がVB使えないのは分かったよ。
もう一度勉強してからまたおいで・・・

一人智将が紛れ込んでるようですな

ACCESSスレだもの、タダの℃素人だよ。

℃素人同士、仲良くしろよな。

　　 　　,,、
　　 　（･_･）　＜ｱﾚﾃｷﾀ？
　　 　.ﾟしJﾟ

>>482
智将＝知障
という意味ではないかと思われ

非連結コントロール多用
明細表示にサブフォーム使用かつ VBA 多用

上記で VB 移行

Access って、トリガ機能ありましたっけ？

レポートプレビュー画面より印刷するときに部単位で印刷をしたくないんですが
どのようにプログラム書けば大丈夫ですか？
部単位でした印刷できないためかなり印刷に時間かかってるので大変なんです
よろしくお願いいたします

アクセスのオートナンバーがかかったテーブルのレコードを消してしまった場合、
どのようにしたら、もとのレコードナンバーでレコードを入力できるのでしょうか？
ご存知の方がいらっしゃいましたら、教えてください。

>>489
一番大きな値を持ったレコードを消したんなら、
最適化を実行すればOK。
途中の値を消した場合はｼﾗﾈ

オートナンバは死ねるよね。
カット＆ペーストやる人間なら。

>>491 やっぱり死ぬしかないの？

>>489
オート�ｃtィールドに番号を追加する方法

1.まず�ｂ�追加したいテーブルをテーブル構造のみでコピー
2.コピーされたテーブルのオート�ｂ�数値型に変更
3.追加したい番号を入力
4.そのテーブルのデータを追加クエリーで元のテーブルに追加
5.番号が追加される
6.このテーブルのデータベースを最適化してやる
7.終了

Access97ではこれで追加できるよ。

質問です。
Me!利用区分.rowsouce = "SELECT 利用区分
FROM 申込者情報 WHERE 申込者名前 = '" & Me!申込者名前 & "'"
とやると利用区分という名前のコンボボックスに結果が表示されますが、
利用区分がテキストボックスだった場合は.rowsouceの部分はどのような記述をしたらいい
ですか？ちなみにアクセス２０００です。

>>494
.Value

.valueを入れましたが、テキストボックスには
SELECT 利用区分・・・が表示されてしまいました・・・。
そして何も記入しないとやはり同じ結果です。
設定とかが悪いのでしょうか？

ＶＢＡにて管理というテーブルの数値型のDENNOというフィールドから
データを取得したいんですがどうすればいいですか？

まずは、ヘルプを読むこと。


かなぁ。。。

'
'>>497 DAOを利用する例
' フィールド"DENNO"は長整数型であると仮定
' Access97にて動作確認
'
Option Compare Database
Option Explicit

Function test() As Boolean
　　On Error GoTo hErr
　　Dim dbs As DAO.Database
　　Dim rst As DAO.Recordset
　　Dim dw As Long

　　Set dbs = CurrentDb()
　　Set rst = dbs.OpenRecordset("管理", dbOpenForwardOnly)

　　While (Not rst.EOF)
　　　　dw = rst.Fields("DENNO").Value
　　　　Debug.Print dw
　　　　rst.MoveNext
　　Wend
　　test = True
OnExit:
　　On Error Resume Next
　　If (Not (rst Is Nothing)) Then rst.Close: Set rst = Nothing
　　If (Not (dbs Is Nothing)) Then dbs.Close: Set dbs = Nothing
　　Exit Function
hErr:
　　Debug.Print "*** "; Err.Description; "(id="; Err.Number; ")"
　　Resume OnExit
End Function

>494
Me!利用区分.ControlSource = "SELECT 〜

オートナンバー型のように自動で値を割り振ってくれる
テキスト型のフィールドを作りたいのですが実現は可能でしょうか？

>>501
ｳﾞｧﾘｱﾝﾄが使えるＶＢＡがあるのになにを望むの？

>>502
VBAを使わない方法で考えております。

>>503
なにをどの様な規則に基づいて採番したいのか示せ
Max値に1をプラスしたものを振り当てるとか
採番用のテーブルを用意しておきそこから求める事も出来る

>>499
できました。ありがとうございました

オプションボタンを３つ配置し、Ａ，Ｂ，Ｃと入れます。
各々選択された際に呼び出すクエリを変更する（Ａの場合はクエリＡ，Ｂの場合はクエリＢを呼ぶ）にはどうしたらいいですか？

>506
A,B,Cは各オプション名でオプション値はそれぞれ1,2,3となります。
フレーム名を「フレーム0」とし、クリック時のイベントに

Private Sub フレーム0_Click()
Select Case Me.フレーム0
Case 1
DoCmd.OpenQuery "Aクエリ名"
Case 2
DoCmd.OpenQuery "Bクエリ名"
Case 3
DoCmd.OpenQuery "Cクエリ名"
End Select
End Sub

>>507
ドモです！

あ、すみません。追加です。
えっとフォームの中段のレコードソースにクエリ使ってるんです。
そこを、ガバっと変えることはできませんか？

上のやり方だと別画面が起動しちゃいました。

>>509
そのフォームは表形式だという事？
それならば >>507 をちょっと改造して

Private Sub フレーム0_Click()
　　Select Case Me.フレーム0
　　Case 1
　　　　Me.RecordSource = "Aクエリ名"
　　Case 2
　　　　Me.RecordSource = "Bクエリ名"
　　Case 3
　　　　Me.RecordSource = "Cクエリ名"
　　End Select
End Sub

ありがとうございます。
説明不足＆下手ですみません。
クエリBに変更したときに、エラーはでなくなりましたがうまく表示してくれないなー。

デザイン時はクエリAを表示させています。
表にはテキストボックスがあるんですが、それも新しいクエリと関連付けないとダメですかね？
まったく同じテーブルのフィールドデータを使っているんですが・・・。

>>511
Me.Refresh

>>504
単にユニークなIDが振れればいいので特に規則は無いです。
最初はユニークなランダム文字列を考えていたのですが、
VBA、別テーブルに頼らないSQLのみでの解決となると
数字の文字列のMAX値+1が現実的でしょうか？

>>511
各クエリはフィールド名を汎用に変更
例えばtxt1:日付,txt2:氏名....のように
その上でフォームの各テキストボックスの
コントロールソースも変更
例えば txt1,txt2,... のようすればいいのでは？

（´-`）.｡oO（ID:RAyn3KuWは何故文字列にこだわるんだろう..）

>>513
タイムスタンプとかは考えてないの？

クエリについて質問です。

同じ構造のテーブルが二つあります。

テーブルA
キー｜その他のフィールド
01　｜ああああ
02　｜いいいい
03　｜うううう
04　｜ええええ
05　｜うううう
06　｜ええええ

テーブルB
キー｜その他のフィールド
03　｜ああああ
04　｜いいいい
05　｜うううう
06　｜ええええ

テーブルAにはすべてのキーがあり、
テーブルBにはそのうちのいくつかのキーがあります。


クエリでテーブルAとテーブルBを左外部結合で結び、
テーブルBにキーがあればBから、
なければAから「その他のフィールド」を持ってきたいです。

抽出結果
キー｜その他のフィールド
01　｜ああああ　←テーブルAから
02　｜いいいい　←テーブルAから
03　｜ああああ　←テーブルBから
04　｜いいいい　←テーブルBから
05　｜うううう　←テーブルBから
06　｜ええええ　←テーブルBから

全てのキーに対して「その他のフィールド」を
どちらのテーブルから持ってくるか、
というクエリです。

教えていただけませんか。
スレ違いだったらごめんなさい。

質問です。
ac2000+DAOを使ってますが、フォーム上の非連結テキストボックスなどに
入力された値を、次回フォームを開いたときにそのまま表示させることは
できますか?
VBAでDefaultValueを弄ろうと散々試しましたがうまくいきません。
もちろん、テーブルを作れば良いのは解ってますが、フォームを
マスタ代わりに使えないものかと。

>>517
Iif関数使えば出来るかと。
>>518
無理じゃないのかな。
考えたこともないから。。。

>>515
逆に聞きたいんですけど、IDって普通文字列にしませんか？
数字のIDってのもありなんですかねぇ。教えてエライ人！

>>516
タイムスタンプだとほぼ同時にINSERTがなされた場合に
重複IDが発行されてしまう可能性があるかなと思いました。

自己レスですが、以下のような方法でテキスト型のフィールドに
自動的にユニークなIDを振る事ができました。
ストアドがあったらこんな苦労はしなくて済むのだろうに。

INSERT INTO t_hoge (id,f1,f2,f3)
SELECT Iif(Max(id),Max(id)+1,'1'),'aaa','bbb','ccc'
FROM t_hoge

>>517
tbl_1 → テーブルＡ、tbl_2 → テーブルＢ、
KeyNo → キー、Subject → その他のフィールド
に置き換えて下のSQLを参考。
SELECT tbl_1.KeyNo, Nz([tbl_2].[Subject], [tbl_1].[Subject]) AS Subject
FROM tbl_1 LEFT JOIN tbl_2 ON tbl_1.KeyNo = tbl_2.KeyNo;

>>521
1
11
12
13
2
21
・
・
・

>>521
わざわざ文字列にするなら左をゼロ埋めくらいしたら？
標準のオートナンバーそのままで何の問題もないと思うけど。

>>523-524
これで満足していただけますか？

INSERT INTO t_hoge (id,f1,f2,f3)
SELECT Iif(Max(id),Format(Max(id)+1,'00000'),'00001'),
'aaa','bbb','ccc'
FROM t_hoge

>>525
t_hogeのレコードの中で最大のidをdeleteした場合、次のinsertでは
また同じidが生成されるのがちょっと気持ち悪いかもしれない。
まあ、ユニークであればいいというならこれでいいのか。
しかし、標準の長整数のオートナンバーって使いにくい所が何かあるの？

>>525
10万レコード超えると・・・。

>>526
IDはやっぱり文字列で持ちたいんです。（特に理由は無し）
できればABC-0001みたいな規則のあるものか、ランダム文字列にしたかった
のですが、ストアドのないアクセスでは数字型文字列のインクリメントという
手しかありませんでした。
PerlからODBC経由で接続している為VBAが使えないのが痛かったです。

>>527
そうゆうこと。だから桁数決めない方がいいかなと思って
最初>>521のようにしてたんです。

>>528 でもいずれにしろ Long 超えたらダメだけどね。

>>529
Decimal型にするとかｗ

>>528
これといって理由がないなら文字列で保持するのは無駄だと思うんだけど。
処理遅くなるよ。
どうしてもというなら読み込み時にクエリで文字列にすればいんでないの？

>>530
なんかやってるうちにそんな気がしてきましたよ。
オートナンバー型にしようかな。
ありがとうアホな質問に付き合ってくれたエロイ人達！

つか、IDだろ。レコードの一意性を保証されてれば、何でもいいんだよ。商品コードとかじゃないんだから。

　　　　商品A　　商品B
A店　　１０　　　　２０
B店　　１５　　　　１０

といったクロス集計に、別のテーブルから商品Cという列を加えることは可能ですか？

>>533
可能
ユニオンクエリーで調べてください。

ODBC接続する際のIDとパスワードを設定したいのですが、
どこで設定すればいいのでしょうか？

>>535 ODBCマネージャのユーザDSN

>>536
[ツール]＞[セキュリティ]で設定するユーザーやパスワードは
ODBCのID、パスワードとは関係ないですか？

>>534
おそくなりました、ありがとうございました！

Access + VBA なんかでカリカリ書いてると、
「これ、VBで作ったほうが早いんじゃないのか？」
と思ったことがある。

今はマクロがマイブーム

お願いします。マジで分からないのです。
当方は、事務員です。ACCESSは、フォームからの
入力しか普段はやっておりません。

環境はACCESS2000で
従業員の住所や顧客管理をしてます。

そこで質問ですが、インデックスと主キーは
どう違うのですか?

>>540
ttp://www.google.com/search?num=100&hl=ja&lr=lang_ja&q=DBMS+%83C%83%93%83f%83b%83N%83X%81%40%8E%E5%83L%81%5B

>>541
インターネットで調べても分からないのです。
私はDBを設計するつもりはなく、
ただ、どういう役割があるのか知りたいのです。
その役割の1部分だけでも十分なので、
具体例などを言っていただけると有り難いです。

>>542
おおまかには、こんな感じ。

主キー：その列には、重複する値を入力できない。
インデックス：その列を検索条件にした場合に早くなる。

>>543
有難う御座います。
1番検索条件として使う列は「単価」です。
ちょっと、やってみます。

ちなみに、Accessの場合、主キーにはインデックスが自動的に作成されたと思う。

あと、列の値の大部分が同一値の場合は、インデックスを作成しても早くならない
場合もある。（単価なら、100円のレコードばっかりだと早くならないかも。って事）

インデックスつけて速くなるのはそのフィールドが
WHERE句で使われてる場合のみですよね？

>>537
> [ツール]＞[セキュリティ]で設定するユーザーやパスワードは
> ODBCのID、パスワードとは関係ないですか？

関係ない。

>>547 あと、リンクテーブルを使う場合の注意。
ファイルDSNから作ったリンクだとパスワードが保存されない。
ユーザDSNから作ったリンクだとパスワードが保存される。

何が違うかは Table オブジェクトの Connect メンバもしくは
Connect プロパティを見ればわかる。
が、違いがわかったところでどうしようもないので、
パスワードを保存したいならユーザDSNを使うのが吉。

Access 2000 での話しなので、最新バージョンでは
改善されているのかもしれない。

>>546
yes

>>547-548
よく分かりました。ありがとうございました。

>>546
え。JOINじゃインデックス関係ないの？

>>551
JOINもWHERE句の一部でわ？

Group by は、どうなんだろ？

女陰はFROM句の一部じゃねーのかｺﾞﾙｧですよ

テーブル　「T_価格」
型番：　　品名　：　　　　　　　定価　：　　卸価格
123AAA　：　２ちゃんビューワー：　3000円　：　2200円
というようなテーブルから型番で価格等を引っ張る為に
フォームのテキストボックスForms![CD1]〜[CD20]
で、調べたい型番を入力させ、
クエリで型番に
[Forms]![F_複数検索]![CD1] Or [Forms]![F_複数検索]![CD2]
〜 Or　・・・・[Forms]![F_複数検索]![CD20]
という用に全てOrで繋いだ値を抽出条件にし、
単純に呼び出して電子カタログとしています。

さて、ここで困っているのが、このまま呼び出したクエリは
レコードの順番がめちゃくちゃになっており、見づらいのです。

これを入力したときのフォームの順番になるようにできないものでしょうか。

抽出後の結果が
[CD1]から呼んだレコード
[CD2]　　　〃
・・・・・
というようにしたいのですが、
何かうまい方法はないでしょうか・・・。

ＯｒｄｅｒByでできないソートは作業表使うしかないだろうね。
もちろんＶＢＡからカーソルで読んでもいいんだけど。

>>555

SELECT T_価格.*, 1 AS CD
FROM T_価格
WHERE T_価格.型番=[Forms]![F_複数検索]![CD1]
UNION
SELECT T_価格.*, 2 AS CD
FROM T_価格
WHERE T_価格.型番=[Forms]![F_複数検索]![CD2]
UNION
　:
　:
（以下20まで）
ORDER BY CD

デザインビューでUNIONは使えないから、直接SQLビューで。

>>555
ユニオンクエリを使えば可能！
固有値と抽出条件のみ異なるクエリ1〜クエリ20を作成し、
これらをユニオンクエリで合体させれば良い。

【クエリ1】
SELECT 1 AS 固有値, * FROM テーブル WHERE 型番=[Forms]![F_複数検索]![CD1];

【クエリ2】
SELECT 2 AS 固有値, * FROM テーブル WHERE 型番=[Forms]![F_複数検索]![CD2];

クエリ3〜クエリ20も同様

【ユニオンクエリ】
SELECT * FROM クエリ1
UNION SELECT * FROM クエリ2
... （途中省略）
UNION SELECT * FROM クエリ20
ORDER BY 固有値;

あっ、かぶっちゃった！
でもさぁ、品名をLIKEで検索した方が良いと思うんだけど・・・
なんで、型番なんかで検索するの？

>>557
>>558
有り難う御座いました。クエリを２０個作ってユニオンクエリで
まとめることが出来ました。
>>559
品名の曖昧検索機能はあるんですが、品目が１万点ほどあり、
スペック違いサイズ違いなんかも多いので下手に品目で検索すると
ヒット数が多くなりすぎるのです。
そのまま発注出来るようにもしてあるので、注文書の表順に結果が出てきて
欲しかったのです。社内SEが作った検索システムだったのですけどね。

>>558 なるほどねー

ボタンを押すと指定したホームページをインターネットエクスプローラにて
開くにはどうすればいいですか？それとアクセスで閲覧することはできますか

おまえらCSE使おうぜ
http://www.hi-ho.ne.jp/tsumiki/

教えて君ですが・・・

┌───────────┐
│グループヘッダー　　　　│
├───┬───┬───┤
│詳細行│詳細行│詳細行│
│１段目 │２段目 │３段目 │
└───┴───┴───┘
みたいなのをレポートで作るとき、グループヘッダは詳細行３行分の幅で
作れないのでしょうか・・・。

>>563
これってAccessに対して使う場合、どういうふうに便利なの？

>>563
AccessからODBC経由で接続するのより使い勝手は良い？

AccessもCSEも使ってるけど、Accessのが使い勝手良いね。

>>564
詳細部をサブレポートにすれば可能！

レポートについてなんですけど
RecordSourceを指定せずにDAOやADOで取得したデータを出力することって出来ますか？
3つのﾃｰﾌﾞﾙから、ページヘッダー、詳細、ページフッターにそれぞれ出力したいんですが
次の詳細レポートやページに印字する方法がわかりません
ﾖﾛｽｸｵﾅｶﾞｲｼﾏｽ

あの、Access って MDI よりも、
全ウィンドウが独立したウィンドウのほうが扱いやすいと思うんですが…
とくにマルチモニタだったりすると。

Access2000なんですが、クエリを開いてからピボットテーブルを作成しようとしても、ビューの切り替えのところにそもそもピボットのビューが出てきません。
これってなんなんでしょうか？

マルチポストはよろしくないなぁ

>>572
マルチポストは答えを最速で求める為の一つの方法。
お前の脳みそはシングルタスクかっつーの！

1月の売上と2月の売上のテーブルがあるとします。
これをくっつけて１〜２月の売上っていうクエリを作ることは可能なんですか？

日付　　店舗　　金額

1/1　　　A　　　　100
1/3　　　B　　　　100
2/5　　　A　　　　150

みたいな感じで、縦にデータを連結させたいのですが・・・・

SELECT * FROM 1月の売上
UNION
SELECT * FROM 2月の売上
ORDER BY 日付 ASC

テーブルを月ごとに分けるってのもどうかとは思うけど、
インポートしてきた状態だったらそういうこともあるか。

>>575
レスどうもです。
他のシステムからエクスポートしたのを取り込むんでこういう形になるんですよ・・・

>>576
だから、クエリの時に一つにするんじゃなくて、インポート時にしとけっていうことだよ。

パス解析は何処で聞いたらいいですか？

>>578
ｸﾞｸﾞﾙに聞け。

2.mdbよりもう1.mdbを起動して1.mdbをアクティブにしたいんですがどうすれば
いいですか？
よろしくお願いします

2.mdbより1.mdbを起動して1.mdbをアクティブにしたいんですがどうすれば
いいですか？
よろしくお願いします

Dim AppAcc As Access.Application

Set AppAcc = New Access.Application
AppAcc.OpenCurrentDatabase "Mdbファイルのパス"

で開いたら自動的にアクティブにならない？
参照設定が必要かも

ユニオンクエリーをFROM句のサブクエリ内で使っています。

SELECT a,b,c
FROM
(SELECT a,b,c
FROM t_hoge
UNION
SELECT d,e,f
FROM t_hage)

サブクエリ内ではhogeテーブルの（a,b,c）フィールドとhageテーブルの
（d,e,f）フィールドをUNIONクエリで連結させているのですが、
サブクエリの外のSELECTで（a,b,c）フィールドを指定しても
特にエラーになることはありません。

UNIONクエリで連結した場合、フィールド名は最初のSELECTで
指定したものに統一されるという仕様なのでしょうか？

>>583
UNIONの結果セット列名は、UNION内の最初のSELECTステートメントの結果セット列名と同じ。
その他のSELECTステートメントの結果セット列名は無視される。

ORACLE←→ACCESSの顧客管理GUI作ってんですけど
テキストエリアにシングルクォーテーション入れられると落ちます。
助けてください。

つーか落ちまくりで作り直しになりそーな予感。

サニタイズ sanitizeをキーワードにして勉強してみれ。

あぶないのって、 ' " : ; -- ぐらいだっけ？

>>584
なるほど、ありがとうございます。

AccessファイルをLAN上で共有してるのですが、
1人がファイルを開いてデータ入力などをしてると
他の人が違うデータを同時に入力することができないのですが、
これを効率よくするために、
同時にアクセスしてデータの入力作業をする方法があるのでしょうか？

あー、MS-Accessではちょっと。。。

>>588
排他モードで開いてるとか、全レコードロックしてるからでは？

>588 599

レスありがとうございます。
やっぱりAccessでは難しいみたいですね。
そういうことが出来る技があるのかなと思いまして
聞いてみました・・・

あのー、出来るんだけど・・

でも、それをやるとファイルが壊れるって聞いたけど。

それを言っちゃーおしめぇーよ！
確かにクリティカルな用途には向かないが
それなりの使い道もあるじゃん

だから自己責任でね。と書いておけ

>>1人がファイルを開いてデータ入力などをしてると
ファイルを開いているのか?
ファイルを、直接?
各マシンから?
リンクテーブルとか生ぬるいやり方じゃなく、
各マシンのデスクトップあたりにショートカットでも貼り付けて?

いや、それが絶対に良くないとは言わないが。
言わないが
言わないが
言わないが

>>588
ローカルのDBに作業用のテーブルを置いて、入力そのものはローカルに。
更新ボタン等のイベントで共有DBの方に排他で追加するのがええんではないかと。

なんにしても、直接多人数で開くのはよろしくない。

なんでお前等MSDEの存在を教えてやらないんだ？
MSDE使えば一つのmdbに対して複数ユーザーが同時接続できるだろ。

MSDEならMDBではないぞな

前に単なる好奇心で試したことあるけど、MSDE + adp って何だかよく分かんねえぞ。
このフロントエンドのファイルにこのテーブルは要らないなと思って消したら、
大本のデータまで消えちまったの。
何だよそれ。
俺はそんなことをしたおぼえはないぞ。
以来、MSDEには触らないと決めました。
いいんです。
小さな職場で使う素人の自作システムは、mdbに自前ロックつけるだけで充分です。

MDBでMSDEにリンクテーブル張るだけでも違うと思われ

MDBに慣れきってるせいもあるんだろうが
ADPは非常に使い勝手が悪く反応もトロイと感じる
のは木の精？

>>602
ＡＤＰが重いんじゃなくて、ＡＤＰを介して使ってるＤＢＭＳやネットに問題があるとおもわれ。

JET(+ADO) でビット論理和って使えないんですか？
数十個のBooleanな検索条件があって、それをビットマスクで一気に片付けたいんですが…

>>603
ならば、MSSQLServerやMSDEがJETより重いって事ですね！

ExcelのVBAのリファレンス本はけっこうあるのですが、
AccessのVBAのリファレンス本ってあまりないですよね？
何か違うの？

VBAって言語自体は特に違わないけど、使うオブジェクトがぜんぜん違うから
それなりにコツはいる。

他のMDBファイルから、テーブルやクエリーを
インポートすることができますが、ユーザ設定の
ツールバーとか、お気に入りも含めて
インポートする方法は無いものでしょうか？

データベースが肥大化してしまい、最適化でも小さくならないので
一ヶ月に一度くらいの頻度で新しいデータベースに全部インポートして
きれいにしているのです。

>>608
インポート時に出るダイアログの「オプション」を見れ

>>609 ありがとうございました。
なるほど、ツールバーはインポートできるんですね。
お気に入りは無理なのでしょうか？

AccessのVBAまでかじったら、他のデータベースも理解が早いですかね？
全然レベルが違うって思ったほうがいい？

>>610
漏れの会社ではいまだにAccess97を使ってるから聞くけど、
「お気に入り」って言うのがAccess2000以降のバージョンに
あるの？

>>611
VBAなんてAccessにしかないものだから他のRDBMSの理解にはつながらない。
クエリをSQLビューから自由に作れるようにした方がいいな。

テーブルデータをフォーム上からチェックボックスを使って表示したいのですが、
チェックがオンの時には１と入力されたもののみ表示。
チェックがオフの時にはすべてを表示したいのです。
クエリのフィールドと抽出条件はどのようにすればよろしいでしょうか？

access2000 win2000 です。　どなたか教えてください

>>613
>VBAなんてAccessにしかないものだから・・・

ということは、
Visual Basic for Access ですか？(w

>>611
ASPでDB扱う方法は覚えやすくなるよ。
AccessやSQLServerじゃなくても、oo4oあたりも、ADOやDAOと似てるし。
DBの理解はできんが、DBの扱い方はちょっと覚えられる。

先輩、インポートをインポって言うのやめてください、ｾｸﾊﾗです。

作業用に「インポート」っていうテーブル作ったんだけど、
作業で窓をいっぱい開くと、タスクバーに「インポ」って載ってて
ちょっと鬱。

え？>>612
Access97　には「お気に入り」ってないんですか？

>>619 はい

>>615
揚げ足取るな低脳。

>>613
ストアドプロシージャ書く下積みにはなるんじゃないかと。
まあ構造化言語だったらなんでもいいという話も。

Accessのテーブル同士で張るリレーション（？）って
Access特有の機能ですよね？

参照整合性制約っていう意味ならAccess以外のＤＢＭＳにも普通にあるよ。

いままでときどき、Windows Update で
Jet データベースエンジンに関するアップデートがあったんですが、
これってAccessの動作にも影響を与えているんでしょうか？

http://support.microsoft.com/default.aspx?scid=kb;JA;239114
これを見ると、どうやら、Windows Update の
Microsoft Jet 4.0 Service Pack 7 (SP7) 用推奨修正プログラム
は Access 2000 にも影響があるみたいですね。

[ACC2000] Jet 4.0 の使用時にデータベースの破損を最小限に抑える方法
http://support.microsoft.com/default.aspx?scid=kb;JA;300216
こんなのもあったのか…

>>625
Access2003では最新版を導入しないと動かない

Accessのセキュリティを下げれば動いたと思うが・・・

Access の組み込み言語（？）が C# だったら、
どんなに使いやすいだろう…

>>629
いや、そうなるんだけど。

>>630 え？そうなるの？いつから？
もしかして 2003 ではそうなっているのかな？
俺、2000ユーザ。

C#はいま Sharp Develop でいじって遊んでる。

2003 ではまだ.Netネイティブじゃない。

>>633 今後 Office シリーズは .net ベースになるのかな？
とすると、.net フレームワークさえ実装すればいい、って時代が来る？
Javaで果たせなかった夢を果たすことができるのかな？

>>633 つーことは、Access2003はまだ普通にVBA?

は？組み込みって？

Access2003はまだVBA。
ただWordとExcelには
http://www.microsoft.com/japan/msdn/vstudio/office/productinfo/
がある。

>>637
Accessランタイムがついているが・・・

ネットワーク上にMDBファイルがあり、
その中に1GBのデータが格納されている
テーブルがあったと仮定する。

JetでそのMDBにアクセスし、
その1GBのテーブルについて検索をかけた場合、
JetってSQLエンジンが各ローカル（クライアント）PCに
あるから、1GBのテーブルデータ
を全てローカルに持ってきてから検索するのかな？
インデックス検索ならば対象テーブルのインデックスデータ全て
持ってきて検索し、その後、テーブル情報を持ってくるのかな？

>>639
つーかクエリ(SELECT 〜 WHERE)を投げて
レコードセット取得して操作ではダメなのか？

>>640
そのクエリの内部のメカニズムを聞いてます。

鯖系DBMSではクエリーのwhere句による絞り込み検索する場合、
対象テーブルデータに対し、where句の条件に適合した
結果セットを作成するのは「サーバマシンの処理」であり、
クライアント側（クエリ発行側）は
その作成された結果セットだけに対して
アクセスを行えばいいのですが、

クエリを投げるといっても、Jetの場合、
「Jet（エンジン）はローカルPCにある」ので、
例えwhere句で絞り込みを行うにしても、
Jet搭載マシン=自分のマシンに
テーブルの全データ（対象テーブルの全インデックスデータ）
を一旦持ってきてからでないと、
where句による検索不可能ではないかな？
ということです。

>>641 持ってきていると思いますが。
MSDEでも使ったほうがいいかと。

そいういや、MSDNとMDBの間のレプリケーション（？）ってできたのかなぁ。

どう考えてもMSDNはレプリケーションできんだろｗ

>>644 すまん… てか、MSDEって読み替えてくれよ（笑

MSDE に入ってるテーブルを部分レプリケーションシテ、
ローカルにMDBファイルとして持っておいて、
出先でデータ入力＆修正。

会社のイントラネットにアクセスできる場所にたどり着いたら
同期したいな〜っておもってるんですが。

自前で同期させるアルゴリズムをVBAで実装しなきゃならないのかなぁ。

＞自前で同期させるアルゴリズムをVBAで実装しなきゃならないのかなぁ。

そのとおり。

質問します。
皆様の中でAcessからＳＱＬサーバへのデータの移行をしている人はいると思います
聞きたいことは、データは単純に移行できるのですがフォームやそれに対応している
クエリーなどはどうなのでしょうか？
やはり新しいデータをadp形式を使ってリンクし直して
作り直さなければいけないのでしょうか？
今まで作ったフォームをそのまま使いたいのでデータ移行だけフォームを使うことは
可能なのでしょうか？なにか知恵はないのでしょうか。またはサイトだけでも教えて頂ければ
と思っていますが。よろしくお願いします

パラメータクエリ等はストアドを作成します
アクションクエリもそのまま移行は出来ません
そのまま使いたければデータだけ移行して
ODBC接続ではどうでしょうか？
SQL Server移行のメリットは減りますが

>>647
既存のロジックをそのまま生かしたいなら
元々使用していたテーブルを
移行後のテーブルに対し、リンクテーブルを作成、使用する
しかないと思う。

ちょっと日本語が間違ってた．．．
s/元々使用していたテーブルを
移行後のテーブルに対し、リンクテーブルを作成、使用する
/元々使用していたテーブルをSQL鯖に移行し、
そのテーブルに対し、リンクテーブルを作成、使用する

ありがとうございます。
データベースはアクセス２００３でテーブル構造を変えずに元のフォームをそのまま使えるかどうか
を調べたのですがよくわかりませんでした。結局、フォームは使えないんですね。
手間がかかりそうですね。ＯＤＢＣ接続は知っていのですが。
データだけ移行して使えるのは考えが甘すぎたのかも・・・・・
でも結構こういう案件は多いのでは

たまに、MDBファイルを閉じて、次に開くと空っぽになってることがある…
ガクガクブルブル…

>>651
つーか、DB(MS)を変更すること自体
システムを作り直すのと同じ

案件多いけど、スクラップ&ビルドだろうな

というこは、ＶＢかＶＢ．ｎｅｔで作り直すことになる？
ビルドということは再構成。ＶＢＡのところぐらいは再利用になるのですね。
アクセスで適当に作ったのは全部アボーン？
何かいい手はないですかね。
データベースだけ移行してフォームは再利用は甘かった？

>>654
再利用も不可能じゃないと思うけど、現有資産にこだわるより
ロジックだけ継承して、全て再構成する方がきっと幸せになれるよ。

DBだけ移行→テストで不具合発見→原因を探る→・・・作り直した方が早いな・・・

スクラップ＆ビルドのまとまった予算がなかなか下りないんだよな。
手持ちの予算ですこしずつやりくりして、けっきょく泥沼にハマる。

Accessでオートナンバー型をやめて
Dmaxを使った自動採番にしようと思っているのですが、
分からないので質問させてもらいました。

挿入前処理で
H16-0001といった風に番号をつけたいのですが、
ハイフンを入れることもできるのでしょうか？
できるとするなら、コードを教えてください。



それと以前、自動採番に挑戦したとき、
テーブルのデータが何もなしの状態で
Dmax＋１を使用したら、番号がつきませんでした。

テーブルデータがない場合の対策も教えて頂きたいです。
よろしくお願いします。

アクセスのフォーム上の人物データを基に、アウトルック2000の連絡先フォルダ内のサブフォルダにメールアドレスを追加したいのですが、何か方法はありますか？
連絡先フォルダに入れるのは出来るのですが、サブフォルダにいれる方法がわかりません。もちろん手動でなら出来るのですが、アクセス上からボタン一つで自動化したいのです。

アクセスの表でフィールドと型を表示してドキュメントに
まとめたいのですがアクセス順に表示させることのできる
ツールてないですかね？できればフリーで
ハードコピーはしんどいの。プログラムはアクセスで表示
させたときの順序が違うのでＮＧ？
なんかないですかね

とんとかいも氏のオブジェクト名ユーティリティでドゾー

ありがとうございます
フィールドの内容と型だけなので本をみて作りました。
Dim rs As Recordset
Dim i As Integer
Dim u As Integer
Dim kind As String

Set db = New Connection
db.CursorLocation = adUseClient
db.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=C:\ファイル;"

Set rs = New Recordset
rs.Open "select * from テーブル", db, adOpenStatic, adLockOptimistic
i = rs.Fields.Count - 1
For u = 0 To i

Select Case rs.Fields(u).Type
Case 202
kind = "テキスト"
Case 2
kind = "数値"
Case 3
kind = "数値"
Case 11
kind = "ＹＥＳ・ＮＯ型"
End Select

Text1.Text = Text1.Text & Str(u + 1) & " " & rs.Fields(u).Name & " " & kind & vbCrLf
rs.MoveNext

Next u
rs.Close

コンボボックスの値をそのまま入力せずにたとえばＡという値なら1を、Ｂという
値なら2をみたいにテーブルに登録するときに対応づけたいのですが、
いい方法ありますか？モジュールだとどのような記述になりますか？

>>663
すごい質問だな
かなりワロタｗ

>>663
おまいさんはAccessでのコンボボックスの使い方を
もう少し勉強する必要があるな。
ウィザードが使えるならそれを使えば良いし、慣れれば
普通に手で設定できる。　モジュールなんて不要。

>665
それがですね、if文やcaseをつかってやっていたのですが、３つの
コンボボックスがあってそれぞれのボックスの値が５つずつありまして
それをやると５×５×５通りの条件文を書かなければならないと思って
もっと手軽な方法をってさがしていました。
たとえば果物っていう項目があるとするなら
みかん、りんご、バナナ、メロンとあるとします。
コンボボックスにはそのまま表示させますが、
テーブルに登録するときにはみかんを選択したら１、りんごは２
バナナは３、メロンは４というふうにしたいと思ってました。
その方法がしりたくて。

つぶやき用AA用意しましたんで、存分にお使い下さい

(´-`).｡ｏO（・・・）

初心者なんだからちゃんと答えてやればいいじゃん

(´-`).｡ｏO（デザイン画面をよーっく見てみよう）

(´-`).｡ｏO（ウィザード使ってからプロパティ見ればいいのに）

まったくのシングルユーザで使っているのに、
MDBファイルが壊れることがあるってのは納得いかないなぁ。

使い方だろ。勝手に壊れることないけどな。

OS:W2000ps
Access Version:Access2000　SR-1
MSDEをインストールして、Access2000よりアップサイジングを行おうとすると、古い一時的な作業データベースがあるため作業ができないと表示されます。
古い一時的なデータベースを削除後再度実行してくださいと出るのですが
どのファイルを削除したらよいのかわかりません。
誰かわかる方がいらっしゃいましたら教えて下さい。

修復可能ぐらいにMDBファイルを壊す方法ってありますか？

ビット反転でもかけるとか。

>>666
で、コンボボックス用のウィザードは使ったのか？
ウィザードを使う前に下のデータが入ったテーブルを
用意しろよ。
1:みかん
2:りんご
3:バナナ
4:メロン

後はウィザードで上のテーブルを指定するだけ。
デフォルトでコードは隠して登録、名前は表示だけで
登録はされないようにしてくれるはず。

>>671
フリーズしたのでタスクマネージャからキルしたり
VBAデバッグ停止中に急にAccessが落ちたり、
馬鹿みたいにコントロールが張られているフォームを
何回も修正するとよく壊れる。

Access97ってデフォルトではDAOを使うようになってますが
ADOは使えますか？例え使えたとしてもデフォルトではないので
使うべきではない？

>>677
全然問題無く使える
参照設定いぢるべし

テーブル内のデータの集計のやりかたがいまいちわからないので＞＜
１．ＡＢＣＤＥ
２．ＡＢＣＤＥ
３．ＡＢＣＤＥ
とかの時に、Ｃだけの集計をとりたいとき等はどうしたらいいでしょうか？

>>679
Cというのがカラム名ということなら
select sum(c) from テーブル

Cというのがデータということなら
select sum(カラム) from テーブル
where Cというデータが入っているカラム= 'C'

>>676
> フリーズしたのでタスクマネージャからキルしたり
> VBAデバッグ停止中に急にAccessが落ちたり、
> 馬鹿みたいにコントロールが張られているフォームを
> 何回も修正するとよく壊れる。

あるある。そう、そういうシチュエーションで壊れるんだよね…
そのときやってた作業の内容が失われるのは仕方ないとして、
MDBファイル自体が壊れちゃうのは困るよなぁ。

まぁこまめなバックアップをとるしかないんだが…
わかっちゃいるけど、ね。

>>678
ありがとうございます。ちゃんと使えますね。
でも、Access97ではDAOと比べるとADOはかなり速度が落ちると
聞いたのですが、どうなんでしょうか？
汎用性を考えて（今後2000へ移行することを考慮して）、
ADOで作りたいのですが。

2000も普通にDAO使えますよ？

AccessのクエリのSQLビューで

CREATE VIEW hoge
AS SELECT * FROM t_hoge;

とすると、「CREATE TABLEステートメントの構文エラーです」という
エラーが出るんですけど、AccessにはCREATE VIEW構文って無いの？

>>684
まさか、ADPじゃなくMDBって落ちじゃあないだろうな・・・

>>685
その「まさか」のような気がしてならない…

Accessではクエリ=ビューだって言うから
CREATE VIEWでできるとおもってたんだけど出来ないのか。
つーか、もちろんmdbなんだが。

VC6 & ADOで、mdbのデータベースパスワードを変更したいのですが、
JROをインポートしても、それらしき関数が見当たりません。
ご教授をお願いします。

今ここのスレで祭り状態。ユーコってやつが日本がｈｏｍｅで一勝でも出来たらヌード画像晒すって言ってた。
それで16日のレバノン戦で日本が勝ったから大騒ぎ！周りのやつが脱げ脱げって騒いでついに晒させた！
しかも結構かわいい！すっげぇ祭り状態！もうすぐ1000超えそうだから早くおいで！ここのスレで見れるよ。
http://tmp2.2ch.net/test/read.cgi/mog2/1076074534/l50
152 名前：ユーコ ：04/03/16 17:05 ID:SZpRj0sm
わかった、日本がレバノンに勝てたら私のヌード画像晒してやるわよ！
153 名前：名無しさん◎書き込み中 ：04/03/16 17:06 ID:PaBD9jNB
言ったなｗ　みんな覚えとけよ！
256 名前：名無しさん◎書き込み中 ：04/03/16 19:45 ID:SZpRj0sm
おっしゃ！ゴール！！うｐしろうｐしろ！
259 名前：ユーコ ：04/03/16 19:47 ID:SZpRj0sm
はぁ？まだ前半20分じゃん。これから逆転されるわよ。
308 名前：玉の輿 ：04/03/16 20:36 ID:uHsa/6Kq
マジかよ・・・レバノン・・・（涙）
319 名前：名無しさん◎書き込み中 ：04/03/16 20:37 ID:SZpRj0sm
ゴール！信じらんねぇｗｗｗ
350 名前：玉の輿 ：04/03/16 20:57 ID:uHsa/6Kq
日本が勝ったわけだが…
351 名前：名無しさん◎書き込み中 ：04/03/16 20:57 ID:tdEaD5sL
ユーコヌード画像うｐしろうｐしろ!!!
758 名前：ユーコ ：04/03/17 23:36 ID:SZpRj0sm
わかったよ。約束通り晒すわよ…
↓
（ここでうｐされますた。）
760 名前：名無しさん◎書き込み中 ：04/03/17 23:36 ID:atOaw/sA
>758
キター！女神降臨！！！
764 名前：名無しさん◎書き込み中 ：04/03/17 23:37 ID:SZpRj0sm
ぬぉー！！！！！！激しく勃起！

Jetデータベースのバージョンの
メジャーなアップデートはいつ？

ずっと４，０

Jetの次のバージョンではストアドに対応して欲しいなぁ。

フォームで名前で文字を検索すると
住所や電話番号などの多数の項目が検索できるＤＢを
つくりましたが、名前も完全一致でないとだめなんです。
そこであいまい検索できるようにしようと思っていたのですが、
それだと一件しか表示されないことがわかり、別のウィンドーに
表示させることを検討しましたが、数百件すべてのウィンドーを
表示というのは不可能です。オートフォームみたいに
フォームの左下にあるボタンを押して先探すみたいなことしたいのですが
どうしたらいいでしょうか？

>>692
Form.Filter = "Like '*" & 名前文字列 & "*'"
Form.FilterOn = True
ぢゃだめなのか？

AccessのDBに、クエリかマクロかを使って順位を振り当てる方法はありませんか？

あああ、同じ質問がありました。すいません。

＞693
フォームがあってその上に３つのタブがあってそこに名前や住所などの項目
のテキストボックスがあるんですが、複数のテーブルのフィールドから
フルネームによる検索をしてそれぞれのテキストボックスに表示させる方法
なんですよ。でもそれってフルネームいれないと検索できないっていう弱点
がありまして、それであいまい検索とかしたいと思っていまして
たとえば山田っていう苗字の人を全部出したいとか思ったときに数十、数百
っていうウィンドを表示させることはできないので前にも言いましたとおり
フォームの左下のボタンを押すことによって先に進む方法があればと思って
ました。

VBAでAccessのバージョンを調べる方法はありますか？
具体的には97か2000以上かを判別したいのです。

>>697
Application.Version は？（自分では使ったことが無いんで結果は知りませんが）

イベント プロパティに指定した式 クリック時 でエラーが発生しました: Microsoft Access が OLE サーバーまたは ActiveX コントロールと通信
しているときにエラーが発生しました。
*マクロ名、ユーザー定義関数名、[イベント プロージャ]以外の式が指定されています。
*関数、イベント、マクロの評価でエラーが発生しました。
というエラーが出てしまうのですが原因がまったく分かりません。
良い解決法をご存知の方いらっしゃいませんでしょうか？
Option Compare Database
Option Explicit
Private Sub cmd確認_Click()
If Me!txtA Like "[あ-お]*" Then
MsgBox "「あ行」の文字"
Else
MsgBox "違います"
End If
End Sub
あ行かどうかを判定するプログラムです。
テキストボックスにはtxtAという名前で指定してあります。
もう頭が痛いです｡･ﾟ･(ﾉД`)･ﾟ･｡

ＶＢＡでレコードの行位置を取得するプロパティを探しています。
調べてみたけれど分からないです。；；
宜しくお願いします。

>>698
レスありがとうございました。

Msgbox Application.Version

とやると、「メソッドまたはデータメンバがみつかりません」
というエラーが出てしまうので、他の方法を調べてみたところ、

SysCmd(acSysCmdAccessVer)

という方法で解決できました。
お手数をおかけしました。

Access97ってもしかしてFROM句のサブクエリーって使えないの？

Accessの日付入力で楽をするために、
日付を入力部分をコンボボックスにし、
選択するときに、1ヶ月分のカレンダーを表示させ、
キーボードを使わずに入力できたらいいなと思っていますが
そんなことできるのでしょうか？
できるとするならば、やり方を教えてください。

よろしくお願いします

>>703
そんなことするぐらいだったらカレンダーコントロールの方がいいんじゃないの？

>704

やり方を教えてください。お願いします

100年分ぐらいのカレンダーテーブルをつくる
クエリで月だけのフィールドを足し、抽出条件を当月にする
そのクエリをコンボボックスのレコードソースにする

そして100年後に2104年問題発生

>>703
Access2000だったらOffice Developer版を購入し、DTPickerコントロール使うとか。
（ってもう売ってない？）

>>706
それってナイスアイデアだよね。

>>700
AbsolutePosition

質問です。
規定値でID番号を自動で取得させているのですが、
現在は
=IIf(DMax("フィールド名","テーブル名","フィールド名 Is not null") Is Null,1,
DMax("フィールド名","テーブル名","フィールド名 Is not null")+1)

を使用していて、普通に1,2,3と増えていくだけなのですが、
これをH16-1、H16-2、H16-3といった具合に変えたいのですが
うまくいきません。

どうか良きアドバイスをお願いします

カレンダーコントロールマウスでしか入力できないのでしょうか？
キーボードで入力したいのですが・・・・

>>703

100年分のカレンダーを作るのもめんどいので、
まず t_hoge テーブルのDATE_SEQフィールドに1〜31の数字を入力し、
コンボボックスのレコードソースに

SELECT t_hoge.DATE_SEQ FROM t_hoge _
WHERE (((t_hoge.DATE_SEQ)<=Day(DateSerial(Year(Date()),Month(Date())+1,0))));

を入れるとよろし。
あとは、当月の年・月を取得してDateserial関数で日付にするとよろし。

703です。

DTPickerコントロールというのを見つけたのですが、
これは難しいでしょうか？

Office 2003 Home　エディションがインストールされているパソコンを買った。
Accessが入っていなかったので、Office 2000　Professional から
Access 2000 をインストールしてみた。

よかったんだろうか…

いいよ

>>716　Office 2000 をインストールするとき、
インストールするディレクトリの名前をデフォルトの　Microsoft Office から
Microsoft Office 2000　なんて感じで変更しておけば問題ないみたい。
あとはちゃんと　Office Update をすればいいみたいだ。

なにせ、Microsoft のページには異なるバージョンのOfficeを同居させるのは
好ましくはないが、どうしてもやりたかったら古いバージョンから順に
インストールするように、ってかかれていたんで、プリインストールの場合も
いったんそれを削除しなきゃならないのかと思ってたんだが、
面倒なので Word 2003 とか Excel 2003 がインストールされている状態の
上から　PowerPoint 2000　と　Access 2000　をインストールした。

今のところ問題なし。

テーブルとかクエリが山ほど増えてくると、
自分なりの名前付けの規則をつけていても
階層化して整理したくなりません？
そういういのって無理なんでしょうかね。

山ほど増える前に名前付けの規則を作っておかないと・・・
名前変更は大変だべー

>>719　ですね…
一般のプログラミングでの変数、クラス、関数なんかと同じように
名前付けの規則だけは作って守ってるんで
不用意な重複とかはないんですが、
一覧表示のウィンドウでそれを反映した表示になってくれればいいなぁ、
という無理な要求。

>>717
Format(Date, "yyyymmdd-01")なんてやると

「コンパイルエラー
　プロジェクトまたはライブラリが見つかりません」

てでませんか？

>>720
自分は名前と説明欄の命名？規則を作り、
２系統の並べ替えが可能なようにしてます。

>>720
Access2000以降ならデータベースウィンドの「グループ」を
うまく使えば？

DAOを使ったプログラム講座のサイトとか、リファレンスを置いているページってあります？

レコード数が１０万件くらいになりそうなテーブルが2・3個あるのだが
検索とかｸｴﾘ開く時間が気になります。
余裕で使える範囲でしょうか？

余裕
300万件ぐらいやったことがある

但し、設計に寄るが・・・

>726
詳しくｵｼｴﾃ。

テキストボックスに４文字以上いれるとメッセージを発する
プログラムを作りたいのですが、MIDやLENじゃできません。
いい方法はありますか？

例
if me!テキストボックス　＞　4文字以上　then
msgbox("4文字以上はダメ")
else
・・・・
END　if

の4文字以上って所をどのような記述にすればいいでしょうか？

Lenでできるでしょ。

If Len(Me!テキストボックス) > 4 Then
msgbox "4文字以上はダメ"
else
・・・・
END　if

keyは２つ以上あったほうがよい
そのうちのひとつを大雑把に絞り込める分類などにしておいて
indexの順番を最上位にしておき、まずここで絞り込む

これで少ない単語のLike検索とかしない限り普通のスピードだった

直接ソースにつなげるとか、コンボやリストボックスに使うのは無謀だと思う

レコード数10万件ってaccessで充分運用できる数なの？
たまに聞くけどmdbが破損するってよくある事なんでしょうか

>>731 MDBの破損は件数の多少に関係なく起こる気がする。
やだなぁ。

システム開発には詳しくない運用部署の者ですが
うちの部内システムがフロントエンドを含め全て
Access95で作られてて、テキストファイルから
千件のデータを取り込むのに一時間かかってしまうとか
一事が万事こんな調子です。
データベースってこんなに取り込みが遅いもんなんですか？

>>733
マシンスペックがショボイに一票！

>>734 いやぁ、それでもちょっとかかりすぎだろう。
メモリが足りなくてスワップがりがりしまくりならありえる話だが。
メモリが足りていれば1000件で一時間はかかりすぎ。

>730
やはりそうか。リストビューやコンボにいれるのにかかっていた時間は省けないのね。。
ﾚﾌﾟﾘｶの同期も時間かかりすぎ。。。

ｻﾝｸｽ。

>736
ローカルに必要なデータだけ吐き出して
それを参照すれば　(・∀・)ｲｲ!!

>>735
　御意
　テキストのインポート処理自体の前後で何か
やっているとか、Access95の機能を使わずに
VBAで無理やり処理していれば、内容によっては
ありえるかも。
　一行読み込んでは既存のレコードを検索して
突合せをして、加工処理をして登録して・・・

ACCESS2000で、CGIからSQL文で１つのフィールドに対してビットで検索する、
（たとえば、SELECT * FROM TABLE_A WHERE (FIELD_A AND 4)=4
FIELD_Aの中で4=(2進数の100)で3つ目のビットが立ってるものだけ取り出す）
みたいなことって出来ないんでしょうか？
（604でも同様の質問が出てたみたいですけど）
MYSQLでは出来てるみたいなんですが。

>>739
標準モジュールで
Public Function bitand(a, b)
　　bitand = a And b
End Function
みたいに関数を作ってから
SELECT * FROM TABLE_A WHERE bitand([FIELD_A],4)<>0
とやればとりあえず目的達成だと思います（当方Access97）。
けど、SQLの中だけでなんとかしたいでしょ？　私もなん
とかしようとしたんだけど、And演算の結果がtrueかfalse
にしかならなくてうまくできなかった。スマソ

>>740
レスありがとうございます。
そうですか、やっぱりそれしかないですか。
私も観念します。

Access2000以降でもmdbへの接続はADOよりDAOの方が
速いのでしょうか？

>>742
　はっきり言って、今のPCでは体感出来るほどの差は
出ない。
　厳密に計測すれば、DAOの方が有利とは思うが。

　ちなみに、ADOでmdbに接続する場合、レコードセットの
レコードを削除すると、連結先のテーブルのレコードまで
削除されると言う仕様になっていて悩まされる訳だが。
　削除されないようにSQL文を工夫して記述するとエラーに
なるしね。

ループ処理で10万件ほどINSERTを繰り返すんですけど、
そうなるとかなり違ってきますか？

>>744
とりあえず、ためしてみれば？
みんな細かい条件がわからないから何とも言えないでしょ。

ちなみにADOだとDBがMDBの場合、SQL文でINSERT INTOで追加するより
レコードセットでAddNewする方が速いらしい。

ACCESS2000を使用して開発しているのですけれども、
ACCESSのラベルってリフレッシュする機能は無いのでしょうか？

VBだとラベル名.Refresh
で実現できたのですが･･･。

ループして行う処理の中でラベルのキャプションを更新しているのですが、
何にも表示してくれなくて困っています。

うまくRefreshさせる方法、ありませんでしょうか(;´Д`）

>746
RepaintObject

>>747ﾀﾝありが�d
無事出来ますた｡･ﾟ･(ﾉД`)･ﾟ･｡

アクセス大大大初心者です。
基礎の基礎がわかりません。どなたか助けてください(つД｀)
ちなみに本は３冊買いました・・

売上管理のＤＢを作っているのですが、売上データを入力するフォームに
商品番号と商品名を入力するフィールドを複数（３つくらい）おきたいのです。
両方ともコンボボックスで選択入力可能にするつもりです。
いわゆる単票形式と帳票形式の合体してるフォームです。

コンボボックスの作り方などはわかったのですが、フォームに複数の同じ番号、
商品名が選択できるフィールドの作り方がさっぱりわかりません・・・・。
どのようなテーブルとフォームを作成すればよいのでしょうか？
何か参考になるサイトなどがあったらどうか教えてください！

かなりＤＱＮな質問で失礼いたしました。

>749
本は買うだけじゃなく、読んで実際に作り理解する所までやらないと意味が無い。
入門書の内容を一通り理解する事が一番の近道。
手取り足取り教えて欲しいなら金払って習いましょう。

>>750
買った本の何処にも求めているものが載っていなかった者ですから。汗

ちなみにフォームウィザードで複数のテーブルから項目を選択すると
フォームが真っ白（というか灰色）でフィールドが何もありません。
これはバグなのでしょうか？バージョンは２００３でＯＳはＸＰです。

載ってないとできないのはつまり理解できてないって事でそ。

　それよりも、データベースの概念とデータの持ち方と
言った基礎の基礎知識を勉強する事を強くお薦めする。
　そこらの解説書に載っているのは操作方法とフォームの
作り方と、そんなもんだよね。
　基礎知識が無いと躓くんですよ。

質問です！どなたか知ってたら教えてください。
Access2000では、Access97形式のDBを読込・出力することができますが、
Access2003では、Access97形式のDBを読込・出力することができるでしょうか？

バージョンの異なる作業環境が複数あり、かつ今度新しく
Access2003を購入しても良いものかどうかを確認したいのです。

>>751

>>753の言うとおり、Accessの知識どうこうではないと思う。
少なくともあなたのやらんとしていること程度なら即興で１時間くらいで作れるよ。

＞コンボボックスの作り方などはわかったのですが、フォームに複数の同じ番号、
＞商品名が選択できるフィールドの作り方がさっぱりわかりません・・・・。

いや、フォーム内でコンボボックスに必要なテーブルを表示できてこそ作り方が
わかった、でしょう？
多分あなたは、フォームへコンボボックスを配置するやり方がわかっただけだ。
プロパティ開いて、表示したいコントロール（この場合はテーブル）を指定してみな。

参考にするなら、
インプレス発行『できるAccess2000ビジネス活用編』という本がかなり役に立つ。
まだあればの話だが･･･

Access2000つかってます。電話のフィールドがあり、形態電話番号が入ってます。
これをクエリ上で下４桁しか見えないようにしたいです

具体的な方法を教えてください

　　　　　　／　　 ／　　　　　　　　ヽ　　　＼
　　　　　/　 　 :/　　　　　　　　　　　}　 ヽ 　ヽ
　　　　/ :::/::// 　 / /　　　　ﾉ　/ i　ﾄ､ 　 ヽ　ﾞ ､
　　　 / .:/:::::/: 　/../　　..::／,ｲ:ﾉ .ﾉ ,ｲﾊi::: i iヽヽヽ
　　　 i .::i:::::/　　i:::ノ ...::::::::／ .ｨイ :/_}___i:::.ｉ: ｉ ﾄ ､ｉﾞ､
　　　 | ::i:::::i::.　　ｲ, -'" ／ ／ /ﾉノ ,ﾉ　 }ｉ: }: } l::. }　}
　　　 ! ::i:::::i:: 　　ﾚｼﾝﾗミ<"／／　ｼﾃﾐ;ﾒﾘ::,ｲ l:: ﾉ ノ
　　　 | ::i ::ri:::..::..|'　l::;;ﾞ '}　 　 　 　 l:;;ﾞ;:} ｿ:/i:ﾚ::/
　　　｜::l:::{ﾊ::::::::ｉ ､ゞ:;;'ﾉ 　 　 　　 ゞ;ｼ /ｲｲ:ﾘ/
　　 　 Vﾉ:}::ヽゞ;::ﾊ ｀"::::::::.　＿_' 　:::: ノ,ｲ:} ﾚ'
　　 　//::ﾉ:/ｲ::l::ﾄゞ､　　 　ヽ__ノ　 　,.ｲ;}::ﾘ 　
　　 ノ/::/:/::ﾊ::kﾊ. . . ﾞヽ､　_＿_ , ィ/::ﾉﾉ:ﾊ 　
　／/ｲ:/:／⌒ﾊ::::Ｖ￣ﾆヽ＼/　 rｰ'^ヽ､ﾘﾊ
　／ｲ:::::ﾉ, へ 　Ｙ<　　　 ､〉r ヽ {Ｙ/i　　｀}＼

>>757
right([形態電話番号],4)

>759 GJ

tbl.Find "id like '*1*' "
と書くとエラーにはなりませんが、１のついているもの総てを拾ってしまいます。
2*1とか**1って言う風にしたいのですがどうすればエラーにならないようにできますか？

>>761
2?1とか??1に汁

>762
だめでした・・・。

>>761
| １のついているもの総てを拾ってしまいます。
そうなるように指定してるからだろ。
| 2*1とか**1って言う風にしたいのですが
わかってなさそうだから、どういうデータの絞込みを
したいのか書けよ。

>>763
だからどうダメだったのか書けよ。

right([data],1)
抽出条件　1
（下1桁1でしたらどぞ）

ネタ野郎じゃないの？わざわざageてるし・・・。

そうなんですか？

access2000 を　win2000 で使う予定です。

住所録を作るとします。

ファイルの数は１つだけにしておきたいです。

あるアカウントでは、全項目を入力・閲覧できるようにします。

別のアカウントからは制限された項目しか閲覧できないように
します。

このような運用は具体的にはどうすれば可能でしょうか？

>>768
ttp://www2.moug.net/app/bbs/message.php?cat=acopr&id=20040414-000001

サブフォームの中にサブフォームってあり？

アリ・ナシの前に、完全に設計ミス。１からやりなおせ。

グループ化したレポートで、グループフッターを常にページの下部に表示する、
もしくはグループの最後のページだけフッターをつける方法はありますか？

色々試したんですが、グループフッターはどうしても最後のレコードの
すぐ後にしか出せなかったので、ページフッターの可視・不可視を
グループヘッダー・フッターのフォーマット時に切り替える方法をやってみたのですが、
ちゃんと表示される場合とされない（ページフッターが可視にならない）場合があります。

やっているのは、単純に
　グループヘッダーフォーマット時に ページフッター.visible = False
　グループフッターフォーマット時に ページフッター.visible = True
だけです。
ページフッター.visible = True を、１０行くらい繰り返すとうまくいくことが多いので、
切り替えが表示に間に合っていないだけのような気もします。

うまくやる方法はないでしょうか。

クエリで出した演算結果をレポートで集計させたいのですがやり方が
良くわかりません。泣
レポートだけでなくクエリ上でも一度演算したものを集計できるのでしょうか？

>>770
多分無し
ただしサブフォーム１の特定のレコードと連動したサブフォーム２を同じFromの
別の場所に貼り付けるのは簡単
どんなことができれば良いかを、具体的に書いたほうが良いと思うがどうだろう。

2000。列ごとに着色できますか？

自己解決しまｽﾀ。

>>774
まず大きな取引のデータを作って
そこに複数の取引先を入力するためのサブフォームを作る
で、取引先ごとの取引明細を入力するためにサブフォームの中にサブフォーム（とりあえず孫フォームと呼んでいるが）を作ってみた

ACCESSで打ち出すレポート毎にプリンタ名やその他もろもろ、
モジュールを作って、グローバル定数で決めて使いたいんだけど、

レポート側でApplication.Printerとかコードかけないですよね。
何かいい方法ないでしょうか？

>>778
　出来なくは無い。構造体で探してみるべし。
　APIの制限がモロに入ったり、非常に癖があるが。

追記すると、DEVMODE構造体。
とても面倒で大変だと思うけど、くじけず頑張れ。

AccessからExcel形式でデータを出力したいのですが、出力先のExcelファイルとして
すでに計算式が入っているような既存のシート上にデータを書き出すという事は可能でしょうか？
計算式の入ったボックス部分にデータを出力して、シートを開いたときには自動的に計算されて
いる、というようなイメージの物です。

>>781
計算用のブックを別にしたら？

>>782
レスありがとうございます。
そもそも計算用のブックに手入力するのが面倒という話だったもので、
Excel上で後から修正も効くようにそのような仕様にしたかったのですが
色々調べてますが、やはり難しいでしょうか。

>>778 >>779
Access2002からはVB6のようにPrinterオブジェクトを使えるようになったのでは？
（と聞いているが実際に触っていないので断言できない）

>>781
VBAでEXCELファイルを開いて埋め込むことはできると思いますが…
1. AcceessのAutomationで計算式の入ったXLSファイルをGetObjectし、
　ワークシートオブジェクトを取得する
2. 出力するデータのレコードセットをDAOかADOで取得
3. レコードセットをループしながら、Excelワークシートオブジェクトの指定範囲に、
　レコードセットのフィールドから取得したデータをセル指定してデータを代入する
4. ブックを保存、閉じる

Access2003で、

ttp://www.ontvjapan.com/program/gigapocket.php3?s_hsid=200404220004015

このような特殊なMIMEのファイルを読み込みたいのですが、IEコントロールのNavigate2だと
外部プログラムを呼ぼうとしてしまって読むことができません。
こういう場合はどのようにしたらよいのでしょうか？
よろしくお願いします。

ACCESS2000でレポートを作成しているのですが、
レポート上にあるテキストボックスの背景色を
変えるため、関数を作成し、その関数の引数に
テキストボックスを渡すように作成したのですが、
うまく動作してくれなくて困っています。

Sub PaintTEXTBG(TX As TextBox)

Select Case TX.Text

Case "0"
Me.Controls!TX.BackColor = RGB(10, 100, 0)
・
・
・
指定した式で参照されている'TX'フィールドが見つかりません。
とメッセージが出てしまうんですが、何か間違ってるのでしょうか(;´Д`）
誰かわかる方がいらっしゃったら解決策をおながいすます

>>787
Me.Controls!TX.BackColor = RGB(10, 100, 0)
を
TX.BackColor = RGB(10, 100, 0)
にする。

>>788ﾀﾝ
ｱﾘｶﾞﾄﾝ｡ﾟ(ﾟ´Д｀ﾟ)゜｡

料金計算のプログラムをつくっているのですが、
tbl.Find "id like '*1*' "
と書くとエラーになりませんよね。idとかいてあるテーブルには221、211、201、
222、202、212と6種類あるのですが、このうち下一桁が1のものだけに対して
検索をかけて処理を行いたいのですが、どうしても212のものにも処理が施されて
しまいます。どのような記述をすればいいでしょうか？
ちなみに'2?1'とか'??1'とやっても「引数が間違った型、許容範囲外、又は競合
しています」というエラーが出てしまいます。いい方法を教えていただけないでしょうか？

>>790
like *1

>>790
idって数値型のフィールドじゃないか？
だったらLike検索させる場合は、対象をCStr(id)とかにするのが普通

いや普通、数値型には「#」を使う。
わざわざ文字列にする必要なし。

まぁ「*」でも「?」でも「%」でも逝けるんだけどね。
右の「*」が余分なだけだろ。

>791-793

>761 >763 とそれに対するレス群の
>762 >764 >765 って、デジャヴか?

>>793
SQL予約語のLikeは、本来文字列に対して行う検索。
それが数値型のフィールドに対して行えるのは、型の違う値の比較を常に
バリアント処理で行ってくれるAccessの親切設計によるものだが時折>>790
のようなバグが生じることがある。
バグ回避の策としては>>792の考え方が最も安全。

ODBC環境があるならビューやパススルークエリでテストしてみ

はじめまして。
初心者です・・・お尋ねしたい事があります。
AccessでフィールドA(オートナンバー型)、フィールドB(テキスト型)。仮にここではAとBとおきます。
そしてフォームでテキストボックスにAの数字を打ち込むと自動的にそれに対応するBを表示させたいです。
それを同じフォーム上に20個程作ってそれぞれ独立させて、そのフォーム上ごと印刷したいです。

調べたのですがどうもわかりません。
どなたかお助けください。

ここでも読め
http://www.mahoutsukaino.com/

>795
ＡＤＯ参照でLIKEをつかった検索をすると確かに
**1とかはエラーが出てしまいます。
一度フィールドを文字型にしてやってみましたが、結果は同じ。
そこでフィールドの設定とかは全く同じで
ＤＡＯでやると**1は上手く行きます。
もしかしたらＡＤＯでやっているんじゃないでしょうか？
ＡＤＯではこれはできないようになっているんじゃ・・・。

そもそもidにlikeは使わないと思うんですけど
みなさんはどうですか？

>798
根本的にワイルドカードの使い方を間違っているのは
理解しているのか?
それをADOの責任にするのは何故かと。

>799
idが数値型のフィールドならな・・・

>>800
まったくだｗ

>>800
799です
コード体系が決められているものとかですかね？
私は管理しにくいんで区分とか設けてしまうんですが・・・
私ダメダメですか？

>802
いや、そう言う風に区分を持たせて管理するのが
正当でしょう。
コード体系に意味を持たせて管理なんてやっていたら、
使えるコードが無くなって来て困る、と言う現象に
ぶち当たって困っているのが勤務先・・・
で、コードに意味を持たせたコード体系が禁止されました。

やっぱね、それ用の区分をもたせた方がすっきりするし、
扱い易いし、却って分かり易かったりする。

sylkファイルをテーブルにインポートするVBAの記述を教えていただけませんか。
ワンクリックで…。

Access2000でレポート表示時に画像を使ってるんですけど、
画像を用意しないでデータぼんぼん追加してくれるものだから、
ところどころ画像の参照先が無いところがあるんですが、
画像が存在しないレコードを一覧として抽出できないでしょうか？
現状では、画像が格納されているフォルダがあり、
テーブルで作成された画像パスの項目に画像が、
「格納されているフォルダパス&画像ファイル名」の画像パスが記述されていっている状態です。
何とか良い知恵を拝借できないでしょうか。
外部のリストソフト使ってcsvで画像パス一覧を吐き出して、それと重複クエリでやろうと思ったんですが、
これだとあまりスマートな方法ではないし、手間も掛かってしまうので。

>>805
>画像を用意しないでデータぼんぼん追加してくれるものだから、
画像パスのフィールドにファイル名は入ってないだろうから、クエリーでも作ってみたら。

Accessデータベースをネットワークで使用するのは根本的に間違ってますか？

テーブルの「日」
というフィールドに
01　02　03・・・・などと入っていたとします

クエリでこれに 2004/4/を加えてさら年月日として認識させたいんですが、どうすればよいのでしょうか？

"2004/04/"&[日] で。書式を年月日に変えるだけではダメなんでしょうか？

よろしくお願いします

>>808
そこまで具体的に思いつくなら、直ぐに試せ。
10分で結果が分かるだろうに。

>>809
やったけどだめだったの（TT

>>810
"2004/04/" ＆ [日]の結果が「2004/04/04」になるなら、
そのままでも自動変換で認識する筈だが・・・
Cdate使ってみ。

>>807
排他使用なら、ネットワークの速度次第。

>812
やっぱり排他は絶対条件なのね。
MSDEにしたほうがよさげか・・・
よくわかんねぇんだよなぁ。

>>808
CDate("2004/04/"&[日])
データ型を100回調べろ！

>808は
日1　日2　日3　・・・　日31
01　　02　　03　・・・　　31
ってかんじの横に長いテーブルを元に
日1　2004/04/01
日2　2004/04/02
・・・
日31　2004/04/31
という結果を求めたいとか言い出さないだろうな。