回答編集履歴

1

バグ修正

2019/03/29 07:44

投稿

kai_keitai
kai_keitai

スコア344

test CHANGED
@@ -5,12 +5,6 @@
5
5
  SQL文で構文エラーになっていると推測します。
6
6
 
7
7
  確か、日付なのに文字で指定しないと動かない記憶です。
8
-
9
-
10
-
11
- シングルコーテーション(')で、ダメなら、シャープ ( #) で試してください。
12
-
13
-
14
8
 
15
9
 
16
10
 
@@ -22,11 +16,11 @@
22
16
 
23
17
  If strWhere <> "WHERE " Then
24
18
 
25
- strWhere = strWhere & "AND 実施日1 >= '" & Format(src実施日, "yyyy/mm/dd") & "' "
19
+ strWhere = strWhere & "AND 実施日1 >= #" & Format(src実施日, "yyyy/mm/dd") & "# "
26
20
 
27
21
  Else
28
22
 
29
- strWhere = strWhere & " 実施日1 >= '" & Format(src実施日, "yyyy/mm/dd") & "' "
23
+ strWhere = strWhere & " 実施日1 >= #" & Format(src実施日, "yyyy/mm/dd") & "# "
30
24
 
31
25
  End If
32
26