Question

提前谢谢你。我的目标是从excel更新sql表。所以我写了一个vbscript来从my-sql获取sql表，只需点击一下即可。表格如下： -

id  rule    length  isactive    date
1   rule 1     3       1        NULL
2   rule 2     5       0        NULL
3   rule 3     6       1        NULL
4   rule 4     7       1        8/10/2015
5   rule 5     3       0        NULL

现在我将更新length，isactive，date字段，只需点击一下即可在表格中更新此数据。请帮我这个脚本。我尝试了更新查询失败的运行时错误 -

80040E14。

脚本的一部分是

For iCount = 2 To 6
intRLength = CInt(objSheet.Cells(iCount, 3).Value)
intID = CInt(objSheet.Cells(iCount, 1).Value)
strQuerie = "UPDATE" & strDatabase & "." & strTable & "SET retentionlength=" & intRLenth & "where id= " & intID

rs.Open strQuerie   ' --- Getting run time error- 80040e14 message here
Next

Answer 1

这很可能是因为你形成的查询的某些部分存在间距问题

您的查询应该看起来像

strQuerie = "UPDATE " & strDatabase & "." & strTable & " SET retentionlength=" & intRLenth & " where id= " & intID

否则，就目前而言;你的查询看起来像下面哪个明显错误

UPDATEDB_NAME.TABLE_NAMESET retentionlength=somevaluewhere id= someid

需要帮助来使用vb脚本从excel表更新sql表

1 个答案: