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 中的连接运算符是与号 &。
您会收到类型不匹配错误，因为如果您使用 +，VB 需要一个数字。

您还应该考虑使用准备好的语句将参数插入 SQL 查询。