Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


7430 / 9994 ←次へ | 前へ→

【5756】Re:1日を越えた時間はどうすれば良いので...
回答  小僧  - 05/8/4(木) 19:30 -

引用なし
パスワード
   ▼わん さん:
こんばんは。

>1つめは、
>If DCount("*", "社員労働時間", "社員番号=Forms!社員用タイムレコーダー!社員番号 And " _
>     & "打刻日付=#" & MyDate & "#") " & "And Not IsNull(退勤時間)") > 0 Then

閉じカッコの位置がおかしい…ですね。

If DCount("*", "社員労働時間", "社員番号=Forms!社員用タイムレコーダー!社員番号 And " _
     & "打刻日付=#" & MyDate & "# And Not IsNull(退勤時間)") > 0 Then


>2つめは、
>ちなみにテーブルは以下のようになっています。
>勤怠ID 社員番号  打刻日付   出勤時間  退勤時間 
>1    太郎   2005年8月1日  9:50:00  22:10:10
>2    花子   2005年8月1日  9:55:00  22:10:30
>3    一郎   2005年8月1日  11:50:20        ←ここが問題です。
>・     ・      ・      ・
>・     ・      ・      ・
>・     ・      ・      ・     
>
>出勤時(追加クエリ)と退勤時(更新クエリ)となっています。
>お忙しいとは思いますが宜しくお願いします。

直接の原因かどうかは解りませんが、「2005年8月1日」という表記ですと
打刻日付は「日付型」でなくて「テキスト型」でしょうか?
そうですと、「#」の部分が「'」となりますね。

あとは
>DoCmd.OpenQuery "退勤打刻"

にある「退勤打刻」クエリの中身ですが…。
ここにもDate関数を使っていませんでしょうか?

475 hits

【5751】1日を越えた時間はどうすれば良いのでしょ... わん 05/8/4(木) 13:40 質問
【5752】Re:1日を越えた時間はどうすれば良いので... 小僧 05/8/4(木) 14:27 発言
【5753】Re:1日を越えた時間はどうすれば良いので... わん 05/8/4(木) 15:35 質問
【5754】Re:1日を越えた時間はどうすれば良いので... 小僧 05/8/4(木) 16:46 回答
【5755】Re:1日を越えた時間はどうすれば良いので... わん 05/8/4(木) 19:05 質問
【5756】Re:1日を越えた時間はどうすれば良いので... 小僧 05/8/4(木) 19:30 回答
【5757】Re:1日を越えた時間はどうすれば良いので... わん 05/8/4(木) 20:28 質問
【5760】Re:1日を越えた時間はどうすれば良いので... 小僧 05/8/5(金) 11:11 回答
【5768】Re:1日を越えた時間はどうすれば良いので... 小僧 05/8/5(金) 13:53 発言
【5776】Re:1日を越えた時間はどうすれば良いので... わん 05/8/6(土) 20:30 お礼
【5777】Re:1日を越えた時間はどうすれば良いので... わん 05/8/7(日) 14:17 お礼
【5783】Re:1日を越えた時間はどうすれば良いので... 小僧 05/8/8(月) 11:49 発言
【5784】Re:1日を越えた時間はどうすれば良いので... 小僧 05/8/8(月) 12:59 発言
【5822】Re:1日を越えた時間はどうすれば良いので... わん 05/8/10(水) 20:08 お礼

7430 / 9994 ←次へ | 前へ→
ページ:  ┃  記事番号:
1078259
(SS)C-BOARD v3.8 is Free