vb6 sql数据库错误
我试图用以下代码中的SQL查询提取的信息填充文本框:vb6 sql数据库错误,sql,sql-server,sql-server-2005,vb6,odbc,Sql,Sql Server,Sql Server 2005,Vb6,Odbc,我试图用以下代码中的SQL查询提取的信息填充文本框: Dim Sqlstring As String Dim rstCurrentTicket As Recordset Sqlstring = "SELECT SubmiterName, Department, Description, Urgency, SubmitDate, ResolvedDate FROM TroubleTickets WHERE Title = "
Dim Sqlstring As String
Dim rstCurrentTicket As Recordset
Sqlstring = "SELECT SubmiterName, Department, Description, Urgency, SubmitDate, ResolvedDate
FROM TroubleTickets
WHERE Title = " + Trim(TicketComboBox.Text)
SET rstCurrentTicket = cnnSel.OpenRecordset(Sqlstring)
Do While Not rstCurrentTicket.EOF
TicketComboBox.AddItem (rstCurrentTicket!TroubleTicketTitle)
Loop
调试器当前正在标记Set-rstCurrentTicket语句。给我一个错误,说
运行时错误3146 ODBC调用失败
假设标题是一个字符串,请尝试将分配给
Sqlstring
的内容更改为:
Sqlstring = "Select SubmiterName, Department, Description, Urgency, SubmitDate, ResolvedDate from TroubleTickets where Title ='" & Trim(TicketComboBox.Text) & "'"
您需要在ticketmbobox文本周围使用单引号限定符来告诉SQL语句您正在使用字符串。我按照您的建议执行了操作,现在收到了另一个错误。它现在表示编译错误:找不到方法或数据成员。调试器突出显示了我用来实现这段代码的方法:“Public Sub SelectButton_Click()”@John在不查看更多项目的情况下很难说出发生了什么,但是您的项目中是否缺少SelectButton_Click()事件?如果有这样一个事件,可能它超出了代码调用它的范围。。谢谢你