Sql visual basic类错误

Sql visual basic类错误,sql,vb6,sql-like,clause,Sql,Vb6,Sql Like,Clause,我犯了一个从句错误。请帮我解决这个错误。多谢各位 试试这个: 首先,在下一步继续执行错误时删除,因为这很危险(您应该使用非常的错误处理程序) 注意:无论如何,对于文本类型的字段,应使用always Replace$()替换为“双引号”,以避免字符串值包含单引号时出错。例如: Adodc1.RecordSource = "select * from members where Mmid = '" & Mmid & "'" 否则,在这种情况下,如果您(错误地)使用: 您将得到一个错

我犯了一个从句错误。请帮我解决这个错误。多谢各位

试试这个:

首先,在下一步继续执行错误时删除
,因为这很危险(您应该使用非常的错误处理程序)

注意:无论如何,对于文本类型的字段,应使用always Replace$()替换为“双引号”,以避免字符串值包含单引号时出错。例如:

Adodc1.RecordSource = "select * from members where Mmid = '" & Mmid & "'"
否则,在这种情况下,如果您(错误地)使用:


您将得到一个错误。

您确定txtmid是一个成员表字段吗?@Giorgio:谢谢您的回复。在数据库中是Mmid,但在循环表单文本框中是txtmid@Siddhi,就你在问题上所付出的努力而言,我不确定你能期望StackOverflow社区付出多少努力。代码需要格式化(有人帮你做了),你的标题需要对扫描问题列表的人有用。看见话虽如此,试着在任何数据库中手动运行select语句(标签也会有帮助),看看它说了什么。然后修复它。从您上面的注释来看,SQL可能应该读为“SELECT*From Members WHERE Mmid LIKE'”&txtmid.text&“”。我认为您的名称混淆了。您永远不应该使用直接用户输入形成SQL命令。使用参数化查询和SQL注入攻击进行查找。
Adodc1.RecordSource = "select * from members where Mmid = '" & Mmid & "'"
Dim sql As String
Dim sSearch As String
sSearch = "You are 'magic' developer"
sql = "SELECT * FROM Users WHERE Note = '" & Replace$(sSearch, "'", "''") & "'"
sql = "SELECT * FROM Users WHERE Note = '" & sSearch & "'"