Access VBA質問箱 IV

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

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


1637 / 2272 ツリー ←次へ | 前へ→

【6125】演算子が無い!とのメッセージ 初心者の弱い猫 05/9/1(木) 17:23 質問[未読]
【6127】Re:演算子が無い!とのメッセージ Gin_II 05/9/1(木) 17:27 回答[未読]
【6129】Re:演算子が無い!とのメッセージ 初心者の弱い猫 05/9/1(木) 17:44 お礼[未読]
【6164】Re:スペースの有無 たん 05/9/6(火) 9:06 発言[未読]

【6125】演算子が無い!とのメッセージ
質問  初心者の弱い猫  - 05/9/1(木) 17:23 -

引用なし
パスワード
   ACESS2002
WINXPの環境なのですが
演算子が無い!とのメッセージでうまくいきません。


Public Function WT_個別原価管理表_仕掛追加()
Dim xSQL As String
xSQL = "INSERT INTO WT_個別原価管理表 ( 工事番号 )" & _
    "SELECT 工事番号" & _
    "FROM T_工事台帳" & _
    "WHERE 売上修正損益='1';"
DoCmd.RunSQL xSQL
End Function

【6127】Re:演算子が無い!とのメッセージ
回答  Gin_II  - 05/9/1(木) 17:27 -

引用なし
パスワード
   半角スペースがないですね。

> xSQL = "INSERT INTO WT_個別原価管理表 ( 工事番号 )" & _
>     "SELECT 工事番号" & _
>     "FROM T_工事台帳" & _
>     "WHERE 売上修正損益='1';"

xSQL = "INSERT INTO WT_個別原価管理表 ( 工事番号 ) " & _
    "SELECT 工事番号 " & _
    "FROM T_工事台帳 " & _
    "WHERE 売上修正損益='1';"


> Public Function WT_個別原価管理表_仕掛追加()

場合によってはエラーになることがありますので、半角英数の名前に
しておいた方が無難だと思います。

【6129】Re:演算子が無い!とのメッセージ
お礼  初心者の弱い猫  - 05/9/1(木) 17:44 -

引用なし
パスワード
   確かに動きました!
ありがとうございます。
しかし、ビミョーなんですね。

▼Gin_II さん:
>半角スペースがないですね。
>
>> xSQL = "INSERT INTO WT_個別原価管理表 ( 工事番号 )" & _
>>     "SELECT 工事番号" & _
>>     "FROM T_工事台帳" & _
>>     "WHERE 売上修正損益='1';"
>
>xSQL = "INSERT INTO WT_個別原価管理表 ( 工事番号 ) " & _
>    "SELECT 工事番号 " & _
>    "FROM T_工事台帳 " & _
>    "WHERE 売上修正損益='1';"
>
>
>> Public Function WT_個別原価管理表_仕掛追加()
>
>場合によってはエラーになることがありますので、半角英数の名前に
>しておいた方が無難だと思います。

【6164】Re:スペースの有無
発言  たん  - 05/9/6(火) 9:06 -

引用なし
パスワード
   ▼初心者の弱い猫 さん:
>確かに動きました!
>ありがとうございます。
>しかし、ビミョーなんですね。
>
>▼Gin_II さん:
>>半角スペースがないですね。

スペースの有無は大事です。ビミョーでもなんでもありません。

例えば「佐々木優」という名前の人がいるとします。

この方の姓は、「佐々木」ですか?「佐々」ですか?

人の名前の場合、スペースを置くことで姓と名を区別できます。

で、Accessではスペースを置くことで、各コマンドのパラメータ位置を
特定しているのです。

そして、今回の質問者のSQLには、スペースが無いので、SQL文が、
各パラメータを分けて認識できない。

それだけの事です。質問者がそれをビミョーと感じるのは自由ですが、
実際には、PCに仕事をさせるための決まりなのです。

1637 / 2272 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
1078248
(SS)C-BOARD v3.8 is Free