Невозможно сохранить мои данные в базе данных MySQL - PullRequest
1 голос
/ 18 июня 2020
Try
    If MsgBox("Add this Student?", vbNo + vbQuestion) = vbYes Then
        cn.Open()
        cm = New MySqlCommand("INSERT INTO stud (@studID, @LN, @FN, @MI, @Course, @Year, @Section, @Address, @CN, @BD, @Age )", cn)
        With cm
            .Parameters.AddWithValue("@studID", txtID.Text)
            .Parameters.AddWithValue("@LN", txtLN.Text)
            .Parameters.AddWithValue("@FN", txtFN.Text)
            .Parameters.AddWithValue("@MI", txtMI.Text)
            .Parameters.AddWithValue("@Course", cmbCourse.Text)
            .Parameters.AddWithValue("@Year", cmbYear.Text)
            .Parameters.AddWithValue("@Section", cmbSec.Text)
            .Parameters.AddWithValue("@Address", cmbAdd.Text)
            .Parameters.AddWithValue("@CN", txtCN.Text)
            .Parameters.AddWithValue("@BD", dtpBD.Text)
            .Parameters.AddWithValue("@Age", lblAge.Text)
            .ExecuteNonQuery()
        End With

        cn.Close()
        MsgBox("Successfully added Student", vbCritical)
        With frmList
            .Loadrecords()
        End With
        Clear()
    End If
Catch ex As Exception
    cn.Close()
    MsgBox(ex.Message, vbCritical)
End Try

1 Ответ

0 голосов
/ 18 июня 2020

Ваша инструкция вставки неверна:

cm = New MySqlCommand("INSERT INTO stud (@studID, @LN, @FN, @MI, @Course, @Year, @Section, @Address, @CN, @BD, @Age )", cn)

вы не определили столбцы, в которые будете вставлять. Сделайте это так:

cm = New MySqlCommand("INSERT INTO [stud] ([Column1], [Column2], [Column3], [Column4]) values (@value1 , @value2 , @value3 , @value4)", cn)

с заменой (Column) правильным именем столбца

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...