的MS Access VBA SQL查詢調試選擇的情況下

Question

在MS Access 2013 VBA我得到一個語法錯誤在此SQL字符串：

strSQL = "INSERT INTO [man_year] (man_year_val, year_int, main_research_area, organisation, man_year_source) SELECT KU.[2007], '2007' AS Expr1, " _ 
& "select case right(left(KU.man_year_source;6);2) like 'Hu' 3 case right(left(KU.man_year_source;6);2) like 'Sa' 1 case right(left(KU.man_year_source;6);2) like 'Te' 2 case right(left(KU.man_year_source;6);2) like 'Su' 4 case right(left(KU.man_year_source;6);2) like 'Ud' 5 AS Expr2, " _ 
& "4 AS Expr3, " _ 
& "select switch" _ 
& "(left(KU.man_year_source;3) like '1. '; 1;" _ 
& "left(KU.man_year_source;3) like '1.1'; 4;" _ 
& "left(KU.man_year_source;3) like '1.2'; 5;" _ 
& "left(KU.man_year_source;3) like '1.3'; 6;" _ 
& "left(KU.man_year_source;3) like '1.4'; 7;" _ 
& "left(KU.man_year_source;3) like '1.5'; 8;" _ 
& "left(KU.man_year_source;3) like '1.6'; 9;" _ 
& "left(KU.man_year_source;3) like '2. '; 2;" _ 
& "left(KU.man_year_source;3) like '2.1'; 47;" _ 
& "left(KU.man_year_source;3) like '2.2'; 48;" _ 
& "left(KU.man_year_source;3) like '2.3'; 49;" _ 
& "left(KU.man_year_source;3) like '2.4'; 50;" _ 
& "left(KU.man_year_source;3) like '2.5'; 51;" _ 
& "left(KU.man_year_source;3) like '2.6'; 52;" _ 
& "left(KU.man_year_source;3) like '3. '; 3;" _ 
& "left(KU.man_year_source;3) like '3.1'; 53;" _ 
& "left(KU.man_year_source;3) like '3.2'; 54;" _ 
& "left(KU.man_year_source;3) like '3.3'; 55;" _ 
& "left(KU.man_year_source;3) like '3.4'; 56;" _ 
& "left(KU.man_year_source;3) like '3.5'; 57;" _ 
& "left(KU.man_year_source;3) like '3.6'; 58) from KU;" 

我得到的CASE部分的錯誤，但可能是因爲它尚未達到SWITCH部分。 :-)任何人都可以請幫忙，我找不到錯誤。

最佳pmelch

Answer 1

我看到至少有兩個問題與你的SQL語句：

首先，訪問SQL不支持CASE關鍵字。如果您考慮T-SQL（Microsoft SQL Server）中的CASE ... WHEN構造，則Access SQL中的等效項爲Switch()函數（ref：here）。你可以把Switch()功能如做

Switch(when1, then1, when2, then2, ...) 

其次，據我所知訪問SQL只支持期（.）作爲作爲列表分隔小數點符號和逗號（,），即使區域設置在您的機器上指定其他值（例如逗號（,）作爲小數點符號和分號（;）作爲列表分隔符）。換句話說，我很確定

left(KU.man_year_source;3) 

永遠不會工作;您需要使用

left(KU.man_year_source,3) 

改爲。