使用VBA更新查询

Iam试图通过Excel更新sql中的logging。 我已经写了一些在Excel中的button上的代码来插入和更新SQL Server中的logging。 我设法插入logging，但得到更新查询错误。 我已经检查了解决scheme已经stackoverflow，但仍然出现错误。 任何人都可以检查下面的代码行我做错了什么

conn.Execute = "UPDATE dbo.EmployeeInfo" _ & "SET Week= ('" & Week& "') " _ & "Time= ('" & Time & "') " _ & "DateFrom = ('" & DateFrom & "') " _ & "DatoTo = ('" & DatoTo & "') " _ & "Name= ('" & Name & "') " _ & "Description= ('" & Description & "') " _ & "Codes= ('" & Codes& "')" _ & "WHERE Week= (" & .Cells(iLoop, 1) & ") AND DateFrom = (" & .Cells(iLoop, 3) & ") AND DatoTo = (" & .Cells(iLoop, 4) & ") AND Name= (" & .Cells(9, oLoop) & ")" 

Answer 1

每列之间需要逗号

  conn.Execute = "UPDATE dbo.EmployeeInfo" _ & "SET Week= ('" & Week& "'), " _ & "Time= ('" & Time & "'), " _ & "DateFrom = ('" & DateFrom & "'), " _ & "DatoTo = ('" & DatoTo & "'), " _ & "Name= ('" & Name & "'), " _ & "Description= ('" & Description & "'), " _ & "Codes= ('" & Codes& "')" _ & "WHERE Week= (" & .Cells(iLoop, 1) & ") AND DateFrom = (" & .Cells(iLoop, 3) & ") AND DatoTo = (" & .Cells(iLoop, 4) & ") AND Name= (" & .Cells(9, oLoop) & ")"