トップページ⇒tech
1001コメント375KB

Access使い集合!

■ このスレッドは過去ログ倉庫に格納されています
0001名無しきぼうNGNG
UNIX時間(1970年から秒単位10桁やつ)を
Access or VB で yyyy/mm/dd hh:mm:ss に変換する方法を
教えて下され!
0357デフォルトの名無しさんNGNG
上のほうに書いてある スナップショットって
ACCESSのVBAの処理でエクスポートの処理を
することって可能なのでしょうか?

当方 ACCESS97です。
0358353NGNG
>>356
えと、わざわざDAO作って同じSQL文を流してやる以外に、レコード件数知る方法ってあるのでしょうか?(^^;
0359デフォルトの名無しさんNGNG
RecordsetCloneのRecordCount、又はEOFを調べるのが楽かも。
これなら1行だべ。
0360デフォルトの名無しさんNGNG
すいません。超初心者です・・誰か教えてください。

メニューフォームの「入力」ボタンを押すと以下の手順で
DBの入力フォームが開きます。

1.メニューフォームから入力フォーム(単票形式)を「追加」モードでオープン
2.入力フォームにあるいくつかのフィールドをマクロで設定

こうすると、入力フォームが立ち上がりデフォルト値が表示されます。
この入力フォームに「キャンセル」ボタンをつけ、追加をキャンセルさせたい
のですが、どうやっても出来ません。

DBを直接「テーブル」で編集する時、追加の途中で「ESC」を押せば、追加をキャンセルできます。
これと同じ事を実現したいだけなので、必ずできる方法があると思うのですが・・
誰か、その方法を教えてください。
(現在、どうしても追加されてしまうため、「キャンセル」ボタンが押された時
追加したレコードを削除する・・という無駄な処理を走らせてとりあえず逃げています)

可能であれば、マクロでの実現方法を教えてください
VBは今のところ詳しくないので・・
0361デフォルトの名無しさんNGNG
沈んでしまったーよ。推薦書スレッド。
というわけでアクセス使いの皆様。アクセスVBAの良書を教えてください。
0362名無しNGNG
>>360
えっと、一行なんだけどだめかな? <VBA
Private Sub コマンドボタン名称_Click()
Me.Undo '←これだけ
DoCmd.Close
End Sub
0363デフォルトの名無しさんNGNG
>>362
ESCでダメっていう状態なんだから、Me.Undoしても無駄と思われ。
むしろ、フィールド値を設定してるマクロに問題がある気がする。
0364デフォルトの名無しさんNGNG
>361
 AccessVBAの良書って何かなー。谷尻かおりの本はよく見ていたけど。
VBAなら、VBの本見たっていいし、どっちかといえば、DAO、ADOについて
ページ割いてる本があればいいね。

>360
 VBよかマクロの方がよっぽど実現が難しいと思うけど。
0365デフォルトの名無しさんNGNG
俺としてはAccess2000表現百科500(技術評論社)を挙げとく。
いわゆるTips集だが例が沢山あるので重宝する。
薄っぺらい本なので割高に思えるが、よく見ると薄い紙を使っていてそれなりにページ数がある。
本はかさばるという理由で嫌がる人とか考慮してるのかな。
0366デフォルトの名無しさんNGNG
>362
ありがとうございました!出来ました。

>みなさん
あの、、お聞きしたいのですがマクロってあんまり使わないものなんですか?
僕が初心者ってのもあるんだけど、VBAでがしがし組むと
バグりそうでコワイんです
マクロだとなんとなく安心できるし、一覧から選択するだけの
簡単プログラミングだしって事で

1.マクロで可能な事は徹底的にマクロで組む
2.マクロで不可能な事は仕方なくVBAを使う

ってスタイルでやっていこうと思っていたのですが
間違ってますか??
0367デフォルトの名無しさんNGNG
>>366
マクロめんどくさいので、漏れはVBAで全部組んでしまう。
>>360みたいなやつもVBAでADOなり使ってレコード追加関数作って
やってるしな。
0368デフォルトの名無しさんNGNG
>366
 貴方の立場次第だな。事務片手にAccessやってる人間なら、
いちいちVB覚えるのめんどいべー、ってのはわからんではないが、
こっち側(開発サイド)の人間なら、おそらく間違っている。
 「マクロだけの販売管理」みたいな「マクロのみ」を謡う本が
あるが、結局はVBAへ移行しよう、ってまとめられているはずだ。

 だまされたと思って、2、3ヶ月やってみ、VBA。ごたくはいいから。
その際、必ずHelp(F1)と良書を片手にすることだ。良質サイトを
お気に入りにいれとけ。
0369デフォルトの名無しさんNGNG
>>367,368
判りました、ありがとうございます。
今やっている仕事は、(自分的に)短納期なので
まずはマクロを考えますがこの先はVBAへ移行しようと思います。

あとマクロを優先に考えていた理由の一つとして、
完成したアプリのメンテを他の人にお願いする場合
VBAを極力使わない方が多くの人に投げる事が出来ると考えたからです
でも、「Accessでプログラムできる人」のほとんどはVBAを使える人
なんですね。
0370デフォルトの名無しさんNGNG
他人がマクロで書いたソフトをメンテする…。
とてもじゃないけど無理だ。
0371デフォルトの名無しさんNGNG
折れ、VBAは普通に使えるけどマクロはほとんど知らないや。
逝ってヨシっすか?
0372デフォルトの名無しさんNGNG
用意されているマクロの組み合わせだけで「実現し得る処理」の有限範囲と
VBAでプロシージャを記述して「実現し得る処理」の有限範囲が等しいなら
マクロオンリーでも構わないわけでして。。。
しかし現実的にはVBAで表現できる世界の方が広いわけで。(と、思っています)

ちなみに「マクロをVBAコードに展開」する機能を使えば、マクロで表現されて
いる処理はVBAコードにおちてしまうので、「マクロ=VBAコードの塊」なんだなぁと。
それなら、マクロ->VBAと進むより、始めからVBAで記述したほうが良いだろうと
いう判断で今日に至っているわけです。

既にVBAで記述できるのであれば、マクロの存在は忘れちゃって結構ではないかと。
0373デフォルトの名無しさんNGNG
マクロでもVBAどっちでもいいが、一つだけ。


「混在はやめとけ」


0374デフォルトの名無しさんNGNG
おしえてくださいな

プロジェクトの起動時にDBに繋ぎにいかないようなことって出来るの?
メンテ用サーバと実稼動用のサーバとでいちいち接続変えるのはユーザさんは無理なのねん
0375デフォルトの名無しさんNGNG
>>374
えーと、サッパリわからん。
リンクテーブル?
0376デフォルトの名無しさんNGNG
Access2002の*.adpで出来るプロジェクトってやつです〜
リンクテーブルはMDBだよねー たしかー
んでプロジェクトって直接DBのテーブルとかビューとか表示してるので、
起動時にサーバーに繋ぎに行っちゃうんですよ
繋がないとテーブルとかない状態なんだよ 何も出来ん
だけど前にも書いたけどバックアップ用にサーバー置いてるのね
今は問答無用でメインのサーバーに繋ぎに行ってるからいいけど、
ユーザー側ではあまりの問答無用さに
とらぶったらバックアップ用に切り替えられないのさー
ってことで起動時にプログラムで接続先切り替えられるようにしたいのね
だけどやっぱり問答無用でつなぎにいっちゃって・・・ってかんじです
0377デフォルトの名無しさんNGNG
2002使ったことないや。
ゴメン。
0378デフォルトの名無しさんNGNG
AccessXPを違法コピーしてる人おしえて!

AccessXP違法コピーして、ライセンス認証したがまずい?
しかも使ってるうちに、「この機能はまだインストールされていません、CDを入れてOKボタンおして」
みたいな事言われて、違法コピーしたCDつっこんでもxxx.cabがみつかんないとかいって怒られるのはなぜ?
単にコピーのしかたが悪かったのか?それとも手の混んだプロテクトでもかかってるのか?
0379デフォルトの名無しさんNGNG
>>378
通報しますた
0380デフォルトの名無しさんNGNG
>>378
オープンライセンスのプロダクトキーと
ディスクキットがあれば・・・

とりあえずやめとけ
0381デフォルトの名無しさんNGNG
すいません、どなたか教えて下さい。

フォームに入力したメールアドレスを、SQLを使ってテーブルに書き込む処理において、
以下のようなコードを書きました。

DoCmd.RunSQL
("INSERT INTO NewTable (MailAddress, field1,field2, field3)
 SELECT " & MailAddress & ", " & NewData1 & ", " & NewData2 & ", " & NewData3 &";")

MailAddressはString型の変数で、フォームに入力されたメールアドレスは
一旦ココに格納されます。
で、これを実行するとメールアドレスの@(アットマーク)が抜けてしまうらしく、
SQLの構文でエラーになってしまうのです。

 例)[フォームにて入力]
   [email protected] (MailAddress変数に格納)
   ↓
   [エラー]
   実行時エラー '3075'
   クエリー式 'omaemona

   2ch.net' の 構文エラーです。

これは@が何か別な処理を行っている、と言う事なのでしょうか?
やはりエスケープ文字のような処理が必要だったりするのかな…。

お時間ございましたら宜しくお願いします ( ´ω`)ノ
0382デフォルトの名無しさんNGNG
>>381
'[email protected]'ってなるようにしてるよね あたりまえか・・・
0383382NGNG
シングルコーテーションでくくっているかってことだから
0384381NGNG
>>382さん

正直、シングルコーティションが抜けてました(汗

 DoCmd.RunSQL
 ("INSERT INTO NewTable (MailAddress, field1,field2, field3)
  SELECT '" & MailAddress & "' , '" & NewData1 & "' , '" & NewData2 & "' , '" & NewData3 &"' ;")

…なんだか点ばかりですが動きましたw
解説どもです。
0385デフォルトの名無しさんNGNG
とある市販のAccessソフトを解析中
セキュリティがアマアマでコードまるわかり(ワラ

コードもSQLが全くなく、findfirstだけだ
こんなんで5万以上取るなよ(ワラ
0386デフォルトの名無しさんNGNG
すいません、JavaやってたVBA初心者です。

DoCmd.OpenFormからリターン地を受け取りたいのですがどのようにすればよいのでしょうか?
(MsgBoxみたいにOK,NGボタンの判断がしたい)

教えてください。
0387デフォルトの名無しさんNGNG
モーダル(acDialog)でOpenFormして
Form_Close()のとき、呼び出し側の適当なPublic変数に値を返そう。
0388デフォルトの名無しさんNGNG
>> 387
やっぱりその手しかないのですね・・・
Javaやってた的にはここらへんがしっくりこないが、、、
でもVBAほんと判りやすいね
0389デフォルトの名無しさんNGNG
>385
 晒してくれんか?
 ホントにFindFirstだけで検索投げてんの?Seekもなし?
0390デフォルトの名無しさんNGNG
>>389
いくらなんでも晒すのはまずいだろ(ワラ

社外秘とかゆうパスジェネレートコードも混じってるし(ワラ
バレバレだが(ワラ
0391デフォルトの名無しさんNGNG
初心者です

単票フォームに入力したデータをレコードに登録する方法教えて下さい
←→キーとか押した時レコードに登録されるんだけど
そうじゃなくてボタンとか押したら強制的に登録!・・としたいんですが・・

具体的には「ESC」キーを押しても再編集できないようにしたい
0392デフォルトの名無しさんNGNG
>>391
VBAでDAOやADO使って、追加関数を作成してしまうのが一番らくだと思う。
これで分からなかったら、さらに質問して。
0393デフォルトの名無しさんNGNG
>>392
返答ありがとうございます。
すいません←→キーじゃなくて、[<][>]ボタンの間違いでした。

単票フォームで編集中のデータを強制的に[<][>]ボタンを押さずして登録する方法を知りたいのですが
DAO,ADOでできますか?
0394デフォルトの名無しさんNGNG
できるよ。
登録ボタン作って、そこからVBAコードを呼び出すだけ。
DAOのが簡単だが、ADOのがエレガントなコードが書ける(ワラ
0395デフォルトの名無しさんNGNG
>>394
ありがとうございます。ちょっと調べてみます
0396デフォルトの名無しさんNGNG
左にある鉛筆ボタン押しておけばOKだ(w
0397デフォルトの名無しさんNGNG
全くの初心者質問ですがご容赦下さい。

現在Accessを使って社内のちょっとしたシステムを構築中でして、
テーブル名、フォーム名、そのオブジェクト名、
その他モジュール名、関数、変数と自分で作る部分が多い訳なんですが、
これらは日本語で宣言(作成)しても大丈夫でしょうか?
一応VB、Delphiとプログラミングを行ってきたので
あの宣言方法

 Dim strItteyoshi As String
 Dim intOmaemona As Integer

型や形式を変数の頭に英字で省略して付記するやり方で良いのかどうか
ちと判断に苦しんでいる状態です。

プログラミングの性質上、2バイト文字を使うのは多少いただけない気がするのですが、
後々保守などを考えた場合かな表記の方がいいのかな、
とも思っている次第で…。
自分のやりやすい方でやれと言われればそれまでですが、
Accessシステムにおいて通例などございましたら御教示頂きたい次第です。
(´ω`)ノ
0398デフォルトの名無しさんNGNG
>>397
>型や形式を変数の頭に英字で省略して付記するやり方で良いのかどうか
>ちと判断に苦しんでいる状態です。
ソレがベストだと思って作っているがなにか?
0399デフォルトの名無しさんNGNG
つまり、↓こう言う感じですね。

テーブル:tblSample
クエリ:querySamle
フォーム:frmSample
レポート:repSample
ページ:pgSample
マクロ:mcrSample
モジュール:modSample

日本語での宣言に関してはどんなもんでしょうか。
0400デフォルトの名無しさんNGNG
>397
宣言方法はそれでいいと思う。
要はシステム内で統一されていれば良い訳で。

2バイト文字の名称は不具合を呼び込む可能性が高くなるので使用しないほうが吉。
...なんだけど、分かりやすいという意味では否定出来ない。
そのへんは、どっちを優先するかを量りにかけて決めてくらはい。
0401質問君NGNG
1.AccessMDB(テーブルのみ)を共有フォルダに置く
2.実行PCのMDBに共有テーブルへのリンクを貼る。
3.クエリーで抽出する → 1万件のテーブルから抽出で、結果は10件

この場合、イメージとしては1万レコードをダウンロードして
ローカルで検索する、って感じになるんでしょうか?
0402デフォルトの名無しさんNGNG
>>397
ベタベタな方法だけど、テーブル名や項目名を[]でくくれば不都合は防げる

>>401
この場合はリンク先へクエリーを投げて、リンク先からその結果(10件)だけを
取得するイメージでいいんじゃないかな?>ALL
0403質問君NGNG
>402
レスどうもっす。
ちょっと質問が悪かったみたいですが、考えたいのは通信量等なんです。

VB+oo4oな場合のクライアント側の負荷ってOracleへクエリー投げるのと
検索結果10件の受信と画面表示等の処理だと思うんです。

MDB共有Accessの場合だとクライアントPCにかかる負荷が
・1万件の受信
・その1万件をSELECTする
この2つがもろにクライアントにかぶってくる気がするんです。

0404デフォルトの名無しさんNGNG
>>402
残念だがJetDBE3.5までで確認した範囲では、その認識はハズレです。
対象としているリンク先テーブルのデータ数が1万件なら、その全データが
ローカル側に流れ、ローカル側のJetDBEでSQLの処理が行われますです。

>>401&403
そんな訳で、ローカル側のJetDBEの負担を気にするならば、共有DBを
ODBC対応DBMSに置き換えるなどの工夫が必要になると思います。
0405デフォルトの名無しさんNGNG
>>404
そうだね。漏れも以前ネットワークでDB組んだときにそうだった気がした。
なんで、DBをSQLServerにしたらものすごい速度が向上したよ。
クライアントはAccessだったけどね。
0406デフォルトの名無しさんNGNG
その辺が気になるなら、MSDEっていう選択肢もあるね。
SQL鯖使っててクライアントツールが揃ってるなら楽〜
0407質問君NGNG
>404-406
ありがとうございます。
それに合わせてもう1つお願いします。

DBMS(OracleなりSQLServerなり)に対してリンクテーブルを貼り、
そのリンクテーブルにクエリで抽出・集計した場合はどうなるんでしょう?

例1)SELECT * FROM table WHERE Prikey<5 ; (0−4が抽出されて5レコード)
例2)SELECT SUM( kingaku ) FROM table ; (1万レコードの合計で結果は1レコード)

おのおの5レコード・1レコード分の通信しか行われない、って認識でOKですか?


SQLServerやMSDEは経験無いので良くわかないのですが、OO4OのCreateDynasetで
SQL投げた時とほぼ同じって見てもいいのなら楽だな〜
もしそうならAccessマンセーになってしまうかも。
0408デフォルトの名無しさんNGNG
>>407
詳しく計ってないが、SQLServerではそんな感じだったよ。
0409デフォルトの名無しさんNGNG
旧バージョンの話(Access97[Jet3.5])で申し訳ないですが
・リンクテーブル
 リモートDBMSとAccessの間にJetDBEを介在する
 リモートDBMSとのセッションはAccessを終了するまで切れない
 クエリーは基本的にリモートDBMSに丸投げだが、Access固有の
 方言SQL構文が含まれている場合は、一部リモートDBMS、固有部分は
 JetDBEで処理される(JetがSQLの解釈、翻訳をして処理を投げる)

・パススルークエリー
 JetDBEを中間に介さず、クエリーをリモートDBMSに丸投げ
 セッションはクエリー開始から終了までの間だけ。その後は開放
 SQL構文はリモートDBMSのものに従う。Access固有の構文は不可

ということで、どちらを利用するか悩みどころ&手放しに楽できない
って想いを引きずっているんですが。。。
一応、リモートDBMSへの接続パフォーマンスは
パススルークエリー > リモートテーブルだそうです。

Access2000以降では、こういったわずらわしさは無いのでしょうか?
0410デフォルトの名無しさんNGNG
昨年まで勤務していた会社で市販パッケージシステム(SQLServer7 & VB5)を
相手にAccessでデータ抽出、帳票を作成する仕事をした時の話なんですが
パッケージ開発元のエンジニアから、「SQLServerのテーブルにリンクは
"絶対に"張らないでインポート使ってください」と釘を刺されました。

理由として「データ整合性を保てなくなる恐れがある」ということでしたが
これって、Accessでセッション張りっぱなしになると他のプログラムの
データ処理にどの様な影響をおよぼすのでしょうか?
0411デフォルトの名無しさんNGNG
>>410
そんなドキュソ開発会社は手を引いて、別なとこに作成依頼しなさい。
0412デフォルトの名無しさんNGNG
>>411
いや、元勤務先ともパッケージ開発元とも既に縁が切れているので
あとの事はどうでもいいんですが。
ただ、モヤモヤしたものが残って気持ち悪いんですよ。
DBMSに心得有りって人に聞いても最終的には「わからん」で終わって
しまうんで。
想定で良いので「起こりうる事象」を知りたいだけなんですよ。

# 何が起こるかわからんけど問題が噴出しなけりゃOKってことで
# システム組んでいると言うなら、それはそれでいいんですけど。
0413デフォルトの名無しさんNGNG
SQLServer側で何一つ制約をつけてないっていうだけだったりして〜
0414デフォルトの名無しさんNGNG
 日本語を変数に使うのはヤメトケって示唆がやっとMSから出てるね。

http://www.microsoft.com/JAPAN/support/kb/articles/J070/3/15.asp

 これどーよ?具体的に何が起こるか明記されてないところが、以下にもMSっぽいが。
0415デフォルトの名無しさんNGNG
>具体的に何が起こるか明記されてない

パルプンテ!!
0416デフォルトの名無しさんNGNG
>>414
で、たまに半角英数使ってると、勝手に全角に変換されるのは
何とかならんのか(w
0417デフォルトの名無しさんNGNG
>>412
おそらく急なDB仕様変更が頻繁におこると想定して作ったんだろ。
平たく言えば、未完成品をつかまされたわけだ。
0418デフォルトの名無しさんNGNG
>>417
世の中には10年以上前のテクノロジーで停滞しているエンジニアが
混じっているってことでよろしいですか?

少なくとも約300社は"未完成品"と称す代物を掴まされているわけで。:-P

>>411殿や>>417殿に製作依頼したら良品を納めてくれたのかな?・・・
0419デフォルトの名無しさんNGNG
グループ設定しているのに、レコードによってグループ集計できているところと
できてないところがあるのは、日付制御の関係か?思う節が見当たらなくて
困っているのだが・・・
0420デフォルトの名無しさんNGNG
>>419
日付制御ってなに?
つーか、やっている処理の内容を書かなくちゃ答えようが無いと思うが。
0421デフォルトの名無しさんNGNG
条件式は大丈夫?
0422419NGNG
初心者でスマソ。
グループ集計させたい項目が5つあって、その中に日付が2つあります。
一つは入力日付で一つは伝票日付みたいな感じで、当然同じ日付のものは
合計して数値を出したいのですが、不思議なことにあるデータ部分は合算
できていて、ある部分は合算してくれない・・・データの記述ミスも探し
問題は無いのだが。
0423デフォルトの名無しさんNGNG
条件式を晒してみそ。
0424419NGNG
SELECT Sum(KENSADT.DENPDT) AS DENPDTの合計, KENSADT.SEIHINCD, KENSADT.DENPMON, KENSADT.DENPWEK, KENSADT.CHECKDT, MS_KB.KBNM, Sum(KENSADT.UKESU) AS UKESUの合計, Sum(KENSADT.FAL1) AS FAL1の合計
FROM KENSADT INNER JOIN MS_KB ON KENSADT.KBCD = MS_KB.KBCD
GROUP BY KENSADT.SEIHINCD, KENSADT.DENPMON, KENSADT.DENPWEK, KENSADT.CHECKDT, MS_KB.KBNM, KENSADT.KBCD,
ORDER BY KENSADT.SEIHINCD, KENSADT.DENPMON, KENSADT.DENPWEK, KENSADT.CHECKDT;

sum(DENPDT)は動作確認でつけています。
0425デフォルトの名無しさんNGNG
どれが何をさしてるかよく分からんのだが。。。
0426デフォルトの名無しさんNGNG
あなたは7桁プログラマーですかい?
0427デフォルトの名無しさんNGNG
>>425
これだけ(>>422 >>424)で>>419さんの思惑が理解できる人は神ですね。
0428デフォルトの名無しさんNGNG
見にくいよぉウワァァlン
SELECT Sum(KENSADT.DENPDT) AS DENPDTの合計,
KENSADT.SEIHINCD,
KENSADT.DENPMON,
KENSADT.DENPWEK,
KENSADT.CHECKDT,
MS_KB.KBNM,
Sum(KENSADT.UKESU) AS UKESUの合計,
Sum(KENSADT.FAL1) AS FAL1の合計
FROM
KENSADT INNER JOIN MS_KB ON KENSADT.KBCD = MS_KB.KBCD
GROUP BY
KENSADT.SEIHINCD,
KENSADT.DENPMON,
KENSADT.DENPWEK,
KENSADT.CHECKDT,
MS_KB.KBNM,
KENSADT.KBCD,
ORDER BY
KENSADT.SEIHINCD,
KENSADT.DENPMON,
KENSADT.DENPWEK,
KENSADT.CHECKDT;
0429デフォルトの名無しさんNGNG
>414
これって更新日が4/10だが、最近になって出た記事って事?
0430デフォルトの名無しさんNGNG
>>424
これのどこに日付処理がある?
0431デフォルトの名無しさん NGNG
すみません質問です。
アクセス使って、Exchangeのパブリックフォルダにメールを投稿する
ツールを作っているんですが、その際に

「指定した名前のフォルダがExchange内に存在するか」
を調べる関数がわかんなくて困っています。
ローカルフォルダに存在するかどうかなら
dir関数とか使えばいいんでしょうけど、Exchange内の存在チェックって
どんな関数使って確かめられるんでしょうか。
0432デフォルトの名無しさんNGNG
VBA超初心者の質問・・・
「コンボボックスに何も指定されていない」ということを取得するにはどうすればよいのでしょうか?

コンボボックスの値に何も指定されていない場合

>> MsgBox コンボボックス1

とすると Nullの使い方が不正です。というようなエラーが出ます。

それならば・・と

>> If コンボボックス1 <> Null Then
>> MsgBox コンボボックス1
>> End If

とすると、常にMsgBoxが表示されません。(常にIf文の値はNullと判断されているようです??)

環境はWinWP / AccessXPです。
どなたか教えてください
0433デフォルトの名無しさんNGNG
>>432
Nullの判定は IsNull() 関数で行います
If IsNull( コンボボックス1 ) Then ...
0434デフォルトの名無しさんNGNG
>>433
あ、ありがとうございます!!なるのど、そーやってやるのか・・
これで3時間悩みました(>_<)ありがとうございます!!
0435デフォルトの名無しさんNGNG
>>428
DENPDT=伝票データ
KEMSADT=検査データ
DENPMON=月伝票
DENPWEK=週伝票
CHECKST=チェックデータ
までは想像できたけど、

UKESU=受け数?
FAL1=不合格?
SEIHINCD=製品CD?
KBCD=???
0436デフォルトの名無しさんNGNG
>>435
既に質問した彼はここを見ていないでしょう? 放置、放置。

# しかし振り出しといて姿を現さないのは無責任だよなぁ。。。
# 意思伝達にも難あり。
0437デフォルトの名無しさんNGNG
>433
 重箱のスミ突っつくようだけど、評価をするときとか、規定値省略に
頼らない方が後々イイと思うが。

If IsNull(HOGE)=True Then

0438デフォルトの名無しさんNGNG
>>437
Isなんたらは関数名から真偽値を返すと予測できるため別にかまわないと思われ。
0439デフォルトの名無しさんNGNG
>>437,438
てゆーかどちらでもいいと思われ。
0440デフォルトの名無しさんNGNG
>>437
なんか、感感俺俺みたいでキモチワルイなぁ・・・
0441デフォルトの名無しさんNGNG
いや、Accessたんは明示的にTrueをつけとかないとメモリが云々と聞いたことが
あるようなないような気がする
0442デフォルトの名無しさんNGNG
>>441
ソース希望
0443デフォルトの名無しさんNGNG
>>422
日付、時分秒まで入っているんじゃない?
0444デフォルトの名無しさんNGNG
(ノ゜ρ゜)ノ ォォォ・・ォ・・ォ・・・・
0445デフォルトの名無しさんNGNG
access2002の場合、フォームまたはレポートの存続期間中に追加できる
コントロールおよびセクションの最大値は754とある。そしてこれは、
コントロールを削除して再追加した場合でも追加数が754でアウトとなる。

これは、accessがフォームへのコントロールの追加数をカウントしている
ためだと私は思う。

ではフォームも同様に、ヘルプの「データベースのオブジェクトの数 32,768」
ということから、フォームを削除して追加した場合でもその追加の回数が
32,768になったらアウトになるのだろうか?


だれか分かる人いる?
0446デフォルトの名無しさんNGNG
>>445
そんなに追加したこと無い
0447デフォルトの名無しさんNGNG
ファー眠い・・誰かたすけて・・
初心者の質問・・

表形式のフォームでフッターに値の合計値を出しているのですが
表形式のフォームってカーソルとかで「レコードを移動」するまで
編集中状態で合計値も変わらないですよね?
カーソルを移動しなくても合計値に値を反映させたいのですが、、

>> Private Sub 値_Change()
>> Me.Recordset.Update
>> End Sub

とすると、「対応するaddNew,Editが必要」といって怒られます。。
ちなみに合計値は
コントロールソースプロパティに
>> =Sum([値])
と指定。。何が悪いんだ!?つーか根本的に間違ってる???・・・
0448デフォルトの名無しさんNGNG
>>447
こうしろ

Private Sub 値_Change()
 DoCmd.RunCommand acCmdSaveRecord
End Sub
0449デフォルトの名無しさんNGNG
>>448
できました!やったー涙出そう・・ありがとうございます
0450デフォルトの名無しさんNGNG
>>446
そうですか。そりゃそうだろうな。

要は、データシートビューのサブフォームがありまして、
そのソースになっているクエリのフィールド数・ソース・
名前が動的に変化するのに対応したいのですわいな。
0451デフォルトの名無しさんNGNG
フォームでパスワード入力画面を作りたいのですが、
パスワード文字列を隠す為に"*"にするにはどうしたらいいでしょうか?
(よくパスワード入力であるやつです)

ご存知の方、お教え願います。
0452デフォルトの名無しさんNGNG
「パスワード」か「パスワード入力コントロール」を検索キーワードに
ヘルプを引いてみそ
0453デフォルトの名無しさんNGNG
>>451
2000か2002だったら「定型入力の構文と例」の「有効な定型入力の文字」って
ところを見るのだ。(ヘルプな)その一番下
0454451NGNG
ありました^^;
お騒がせして済みません^^;
0455デフォルトの名無しさんNGNG
文字列比較についてなんですが、
ACCESS(VB?)の場合、
”AAA"="aaa"がTRUEになってしまいますよね。
これをちゃんと大文字小文字の判別を行いたいんですが・・・
(検索でいう大文字と小文字の区別)
HELPとか見てもそれらしいものがなく・・・

ご存知の方、よろしくお願いします。

0456山太郎NGNG
>455
Option Compareステートメントを調べてみよう。
■ このスレッドは過去ログ倉庫に格納されています