Question

VB如何删除MySQL数据库的记录

ODBC 3.1.5
mysql 5.6.17
连接数据库正常，求一句删除命令，谢谢。
If Reco.State = adStateOpen Then Reco.Close
Reco.Open "select * from RolSQL where Account='" & Account_Table & "' and ID=1", Conn, 1, 3
If Reco.RecordCount = 0 Then
MsgBox "数据异常，请重试！错误代码：40101"
End
Else
（Reco.Delete）*****************************************
End If

Answer 1

不需要动用Reco 直接试试以下代码
dim strSQL as string
if conn.state = adstateOpen then
strSQL = "DELETE FROM [表名称] WHERE [列名称] =" & 查找值变量 & ";"
'strSQL = "DELETE FROM [表名称] WHERE [列名称] ='" & 查找字串变量 & "';"
Conn.Excute strSQL
end if