2014-02-19 3 views
3

죄송합니다. VBA에 새로운 기능이있어서 변수 및 업데이트에서 값을 가져와야하는 업데이트 쿼리를 실행하려고합니다. 이미 존재하는 테이블. 이 작업은 VBA를 사용하여 수행됩니다. 실행시 오류 메시지가 표시되지 않지만 테이블이 새 값으로 업데이트되지 않습니다. 코드는 다음과 같다 :Access VBA에서 테이블의 일부 필드를 업데이트하려고합니다.

Query = "UPDATE Results " & _ 
     "SET fk_Report='" & Report & "'" & _ 
      ",fk_Name='" & Namevar & "'" & _ 
      ",fk_Age='" & Agevar & "'" & _ 
      ",fk_Sex='" & Sexvar & "'" & _ 
     "WHERE [Count]='" & Countvar & "'" & _ 
      ",[Positives]='" & Posvar & "'" & _ 
      ",[Negatives]='" & Negvar & "'" & _ 
      ",[Unknow]='" & Unkvar & "';" 
    CurrentDb.Execute (Query) 

누군가가 도움을 줄 수 있다면 ...

답변

1

당신은 (쉼표), where 절

Query = "UPDATE Results " & _ 
    "SET fk_Report='" & Report & "'" & _ 
     ",fk_Name='" & Namevar & "'" & _ 
     ",fk_Age='" & Agevar & "'" & _ 
     ",fk_Sex='" & Sexvar & "'" & _ 
    "WHERE [Count]='" & Countvar & "' " & _ 
     "AND [Positives]='" & Posvar & "' " & _ 
     "AND [Negatives]='" & Negvar & "' " & _ 
     "AND [Unknow]='" & Unkvar & "';" 
CurrentDb.Execute (Query) 
0

사용 및 대신 쉼표가 필요하지 않습니다 WHERE 절 다음에

관련 문제