Драйвер ODBC 5.1 [mysqld-5.1.41] Синтаксическая ошибка

Question

вот код

Public Sub DeleteRoom(Room_ID As String)
 Dim CNo As Object
    Set CNo = SQLDNSCONNECT("TEST")
     Dim RSo As Recordset
    Set RSo = New Recordset
    Dim msql As String
     With CNo
        .Open

        If RSo.State = adStateOpen Then RSo.Close

           msql = "DELETE * FROM Room WHERE Room_ID='" & Room_ID & "'"

           RSo.Open msql, CNo
           MsgBox "Record(s) Deleted", vbInformation, ""
        End With
End Sub

Ошибка: «RSo.State = adStateOpen Then RSo.close»

Я не знаю почему, но это действительно кажется правильным.

Может ли кто-нибудь мне помочь?

Answer 1

Предложение DELETE не принимает столбцы:

• http://dev.mysql.com/doc/refman/5.5/en/delete.html

Просто удалите *:

DELETE FROM Room WHERE Room_ID=...