{"MySqlTimeSpan может сериализовать только объекты TimeSpan"} с помощью VB.NET - PullRequest
Новая
       8

{"MySqlTimeSpan может сериализовать только объекты TimeSpan"} с помощью VB.NET

0 голосов
/ 27 ноября 2018

У меня есть form2, чтобы добавить новые данные в мою таблицу, тогда я получил эту ошибку: 

 {"Only TimeSpan objects can be serialized by MySqlTimeSpan"}

когда я удалил эту часть кода, она работает: 

 cm.Parameters.Add(New MySqlParameter("@Time_Operation",  MySqlDbType.Time)).Value = Time_OperationTextBox.Text
    cm.Parameters.Add(New MySqlParameter("@Start_Time", MySqlDbType.Time)).Value = Start_TimeTextBox.Text
    cm.Parameters.Add(New MySqlParameter("@End_Time", MySqlDbType.Time)).Value = End_TimeTextBox.Text

это означаетdatetime работает хорошо, но проблема с этими тремя параметрами, которые я сделал их как 

 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

    Dim str As String = "Server=localhost;Port=3306;Database=springdb;Uid=root;Pwd=2342"


    Using con As New MySqlConnection(str)

        Dim query As String = "Insert Into springdata (full_name,rfid_tag,spring_size,operation_time,Date_Operation,
                                    Time_Operation,Start_Time,End_Time,Qty_Needed) values
                                    (@full_name, @rfid_tag, @spring_size, @operation_time,
                                    @Date_Operation, @Time_Operation, @Start_Time, @End_Time, @Qty_Needed) 
                                      " 'Note:TextBox3 is the RFID number come from RFID arduino

        Dim cm As New MySqlCommand(query, con)
        cm.Parameters.Add(New MySqlParameter("@full_name", MySqlDbType.LongText)).Value = TextBox1.Text
        cm.Parameters.Add(New MySqlParameter("@rfid_tag", MySqlDbType.LongText)).Value = TextBox2.Text
        cm.Parameters.Add(New MySqlParameter("@spring_size", MySqlDbType.MediumText)).Value = TextBox3.Text
        cm.Parameters.Add(New MySqlParameter("@operation_time", MySqlDbType.DateTime)).Value = DateTimePicker1.Value
        cm.Parameters.Add(New MySqlParameter("@Date_Operation", MySqlDbType.Date)).Value = DateTimePicker2.Value
        cm.Parameters.Add(New MySqlParameter("@Time_Operation", MySqlDbType.Time)).Value = Time_OperationTextBox.Text
        cm.Parameters.Add(New MySqlParameter("@Start_Time", MySqlDbType.Time)).Value = Start_TimeTextBox.Text
        cm.Parameters.Add(New MySqlParameter("@End_Time", MySqlDbType.Time)).Value = End_TimeTextBox.Text
        cm.Parameters.Add(New MySqlParameter("@Qty_Needed", MySqlDbType.Int32)).Value = TextBox7.Text


        con.Open()

        cm.ExecuteNonQuery()

        MessageBox.Show("success")
    End Using

End Sub

Ответы [ 2 ]

0 голосов
/ 28 ноября 2018

В сообщении об ошибке говорится, что вы даете значение параметра типа string, но ваш метод mySQL ожидает TimeSpan - вам нужно разобрать введенную строкув текстовое поле как TimeSpan, а затем передайте результирующую переменную TimeSpan в параметр mySQL вместо строки.

Метод TimeSpan.Parse() принимает строку в качестве входных данных, а затем выводит объект TimeSpan, используя значения, которые он читает из строки. 

cm.Parameters.Add(New MySqlParameter("@Time_Operation",  MySqlDbType.Time)).Value = TimeSpan.Parse(Time_OperationTextBox.Text)
cm.Parameters.Add(New MySqlParameter("@Start_Time", MySqlDbType.Time)).Value = TimeSpan.Parse(Start_TimeTextBox.Text)
cm.Parameters.Add(New MySqlParameter("@End_Time", MySqlDbType.Time)).Value = TimeSpan.Parse(End_TimeTextBox.Text)

Конечно, перед этим вы должны убедиться, чтото, что ваши пользователи вводили в текстовые поля, имеет правильный формат, понятный по коду TimeSpan (см. ссылку на документацию ниже для получения информации о принятых форматах).

Документация: https://docs.microsoft.com/en-us/dotnet/api/system.timespan.parse?view=netframework-4.7.2

0 голосов
/ 27 ноября 2018

Я понял это следующим образом: 

        Dim cm As New MySqlCommand(("Insert Into springdata (full_name,rfid_tag,spring_size,operation_time,Date_Operation,
                                    Time_Operation,Start_Time,End_Time,Qty_Needed )  Values ('" & TextBox1.Text & "', '" & TextBox2.Text & "',
                                    '" & ComboBox1.Text & "', '" & DateTimePicker1.Value.ToString("yyyy-MM-dd HH:mm:ss") & "',
                                     '" & DateTimePicker2.Value.ToString("yyyy-MM-dd") & "', '" & Time_OperationTextBox.Text & "', 
                                      '" & Start_TimeTextBox.Text & "', '" & End_TimeTextBox.Text & "', 
                                      '" & TextBox7.Text & "')"), con)

К сожалению, я не смог решить это с помощью timespan,parse: -)

...