VB6和SQL错误

Question

这是我尝试在 VB6 中使用的 SQL 中的一行代码。

Dim Sqlstring As String

Sqlstring = "Update TroubleTickets set ResolvedDate = ' " + DateValue(Now) + "' where      Title ='" + Trim(TicketComboBox.Text) + "'"

当我运行调试器时，我收到一个错误，指出类型不匹配。

有什么建议吗？

Answer 1

Dim Sqlstring As String

Sqlstring = "Update TroubleTickets set ResolvedDate = ' " & DateValue(Now) & "' where      Title ='" & Trim(TicketComboBox.Text) & "'"

VB 中的 concat 运算符是 & 符号 &。 你会得到一个类型不匹配的错误，因为如果你使用+，VB 需要一个数字。

您还应该考虑使用prepared statements 将参数插入到 SQL 查询中。