Scribling Doodle Ответов: 2

Как исправить исключение nullexception

Привет,
Со вчерашнего дня я имею дело с проблемой NullException. где я пытаюсь добавить значения в свою базу данных в соответствии с моим запросом, но я продолжаю получать эту ошибку:

"The object reference was not defined as an instance of an object"

Что я уже пробовал:

If CheckBox1.Checked = True Then
           Try
               con.ConnectionString = "The connection is good! I've used it on select statements and it works fine!"
           Catch ex As Exception

           End Try
           Dim da As New MySqlDataAdapter()
           Dim dt As New DataTable()
           dt.Clear()
           Dim cmd As New MySqlCommand("INSERT INTO D8_ALERTAQUALIDADE(CLIENTE, PROJETO, REFERENCIA, DESCRICAO, DATA_ENTRADA, DURACAO, DATA_SAIDA, FOTO1_OK, FOTO2_OK, FOTO3_OK, FOTO4_OK, FOTO1_NOK, FOTO2_NOK, FOTO3_NOK, FOTO4_NOK) VALUES(@D1,@D2,@D3,@D4,@D5,@D6,@D7,@D8,@D9,@D10,@D11,@D12,@D13,@D14,@D15)", con)
           cmd.Parameters.AddWithValue("@d1", cmbCliente.SelectedValue)
           cmd.Parameters.AddWithValue("@d2", cmbProjeto.SelectedValue)
           cmd.Parameters.AddWithValue("@d3", cmbReferencia.SelectedValue)
           cmd.Parameters.AddWithValue("@d4", TextBox1.Text)
           cmd.Parameters.AddWithValue("@d5", dtpEntrada.Value.ToString("yyyy-mm-dd"))
           cmd.Parameters.AddWithValue("@d6", cmbMeses.SelectedItem)
           cmd.Parameters.AddWithValue("@d7", dtpDataSaida.Value.ToString("yyyy-mm-dd"))
           cmd.Parameters.AddWithValue("@d8", PictureBox1.Image)
           cmd.Parameters.AddWithValue("@d9", PictureBox2.Image)
           cmd.Parameters.AddWithValue("@d10", PictureBox3.Image)
           cmd.Parameters.AddWithValue("@d11", PictureBox4.Image)
           cmd.Parameters.AddWithValue("@d12", PictureBox5.Image)
           cmd.Parameters.AddWithValue("@d13", PictureBox6.Image)
           cmd.Parameters.AddWithValue("@d14", PictureBox7.Image)
           cmd.Parameters.AddWithValue("@d15", PictureBox8.Image)
           con.Open()
           cmd.ExecuteNonQuery()
           con.Close()
           da.Fill(dt)
       ElseIf CheckBox1.Checked = False Then
           Try
               con.ConnectionString ="The connection is good! I've used it on select statements"
           Catch ex As Exception

           End Try
           Dim da As New MySqlDataAdapter()
           Dim dt As New DataTable()
           Dim cmd As New MySqlCommand("INSERT INTO D8_ALERTAQUALIDADE(CLIENTE, PROJETO, REFERENCIA, DESCRICAO, DATA_ENTRADA, DURACAO, DATA_SAIDA, FOTO1_OK, FOTO2_OK, FOTO3_OK, FOTO4_OK, FOTO1_NOK, FOTO2_NOK, FOTO3_NOK, FOTO4_NOK) VALUES(@D1,@D2,@D3,@D4,@D5,@D6,@D7,@D8,@D9,@D10,@D11,@D12,@D13,@D14,@D15)", con)
           cmd.Parameters.AddWithValue("@d1", cmbCliente.SelectedValue)
           cmd.Parameters.AddWithValue("@d2", cmbProjeto.SelectedValue)
           cmd.Parameters.AddWithValue("@d3", cmbReferencia.SelectedValue)
           cmd.Parameters.AddWithValue("@d4", TextBox1.Text)
           cmd.Parameters.AddWithValue("@d5", dtpEntrada.Value.ToString("yyyy-mm-dd"))
           cmd.Parameters.AddWithValue("@d6", cmbUmMes.SelectedItem)
           cmd.Parameters.AddWithValue("@d7", dtpDataSaida.Value.ToString("yyyy-MM-dd"))
           cmd.Parameters.AddWithValue("@d8", PictureBox1.Image)
           cmd.Parameters.AddWithValue("@d9", PictureBox2.Image)
           cmd.Parameters.AddWithValue("@d10", PictureBox3.Image)
           cmd.Parameters.AddWithValue("@d11", PictureBox4.Image)
           cmd.Parameters.AddWithValue("@d12", PictureBox5.Image)
           cmd.Parameters.AddWithValue("@d13", PictureBox6.Image)
           cmd.Parameters.AddWithValue("@d14", PictureBox7.Image)
           cmd.Parameters.AddWithValue("@d15", PictureBox8.Image)
           con.Open()
           cmd.ExecuteNonQuery()
           con.Close()
           da.Fill(dt)
       End If

Richard MacCutchan

Какая строка вызывает ошибку?

Scribling Doodle

на обоих da.Fill(dt). Теперь он выдает мне такую ошибку: "свойство SelectedCommand не было инициализировано перед вызовом метода Fill." Есть идеи?

Richard MacCutchan

Вы не читали никаких данных в MySqlDataAdapter, поэтому нет ничего доступного, чтобы поместить в DataTable.

Scribling Doodle

Как это? Я просто использовал код из предыдущей программы, которую я сделал, и работал нормально. Теперь, на этот раз, это не работает ИДК почему. хотите, чтобы я обновил свой вопрос и установил код из другой программы, которая действительно работает?

Richard MacCutchan

Не имеет значения, что делает ваша другая программа. То, что вы закодировали здесь, просто неправильно, и простое чтение кода ясно показывает это.

Scribling Doodle

Я, кажется, не нахожу, где я ошибаюсь, вот почему я пришел сюда. Можете ли вы сказать мне, где я допустил какие-либо ошибки? Потому что я просто не могу его найти...

Richard Deeming

Один INSERT запрос не возвращает никаких данных.

Richard MacCutchan

Даже если это и так, окружной прокурор ни с чем не связан.

Richard MacCutchan

Как я уже сказал выше, вы не поместили никаких данных в свой DataAdapter. И даже если вы измените свой запрос на команду SELECT, da все равно не будет подключен к этой команде. Если вы действительно не понимаете этого, то вам следует получить книгу или учебник о том, как использовать эти классы.

Scribling Doodle

Мне пришла в голову еще одна идея: используя "Условия использования", я сумел сделать именно то, что хотел. В любом случае спасибо :)

2 Ответов

Рейтинг:
12

Scribling Doodle 

Using SQLConnection As New MySqlConnection("Server=192.168.50.57;Port=3306;Database=zestagio;Uid=tiago.j.turella;Pwd=123abc.;")
    Using cmd As New MySqlCommand()
        With cmd
            .CommandText = "INSERT INTO D8_ALERTAQUALIDADE(CLIENTE, PROJETO, REFERENCIA, DESCRICAO, DATA_ENTRADA, DURACAO, DATA_SAIDA, FOTO1_OK, FOTO2_OK, FOTO3_OK, FOTO4_OK, FOTO1_NOK, FOTO2_NOK, FOTO3_NOK, FOTO4_NOK) VALUES(@D1,@D2,@D3,@D4,@D5,@D6,@D7,@D8,@D9,@D10,@D11,@D12,@D13,@D14,@D15)"
            .Connection = SQLConnection
            .CommandType = CommandType.Text
            .Parameters.AddWithValue("@d1", cmbCliente.SelectedValue)
            .Parameters.AddWithValue("@d2", cmbProjeto.SelectedValue)
            .Parameters.AddWithValue("@d3", cmbReferencia.SelectedValue)
            .Parameters.AddWithValue("@d4", TextBox1.Text)
            .Parameters.AddWithValue("@d5", dtpEntrada.Value.ToString("yyyy-mm-dd"))
            .Parameters.AddWithValue("@d6", cmbMeses.SelectedItem)
            .Parameters.AddWithValue("@d7", dtpDataSaida.Value.ToString("yyyy-MM-dd"))
            .Parameters.AddWithValue("@d8", PictureBox1.Image)
            .Parameters.AddWithValue("@d9", PictureBox2.Image)
            .Parameters.AddWithValue("@d10", PictureBox3.Image)
            .Parameters.AddWithValue("@d11", PictureBox4.Image)
            .Parameters.AddWithValue("@d12", PictureBox5.Image)
            .Parameters.AddWithValue("@d13", PictureBox6.Image)
            .Parameters.AddWithValue("@d14", PictureBox7.Image)
            .Parameters.AddWithValue("@d15", PictureBox8.Image)
        End With
        Try
            SQLConnection.Open()
            cmd.ExecuteNonQuery()

        Catch ex As MySqlException
            MsgBox(ex.Message.ToString)
        Finally

            SQLConnection.Close()
        End Try
    End Using
End Using


Придумал это решение, которое работает довольно хорошо.

Richard MacCutchan

Ну, это совершенно отличается от кода в вашем вопросе.

Scribling Doodle

Основа та же. Я просто использовал некоторые функции вместо переменных и объявлял их вручную. Использование функций намного чище и проще в работе. Рад, что нашел способ использовать его правильно.

Рейтинг:
1

OriginalGriff

Это одна из самых распространенных проблем, которые нам задают, и это также та, на которую мы меньше всего готовы ответить, но вы больше всего готовы ответить сами.

Позвольте мне просто объяснить, что означает ошибка: вы пытались использовать переменную, свойство или возвращаемое значение метода, но оно содержит null - что означает, что в переменной нет экземпляра класса.
Это немного похоже на карман: у вас есть карман в рубашке, в котором вы держите ручку. Если вы сунете руку в карман и обнаружите, что там нет ручки, вы не сможете подписать свое имя на листе бумаги - и вы получите очень забавный вид, если попытаетесь! Пустой карман дает вам нулевое значение (здесь нет ручки!), поэтому вы не можете сделать ничего такого, что обычно делали бы, когда извлекли свою ручку. Почему он пуст? Вот в чем вопрос - может быть, вы забыли взять ручку, когда уходили из дома сегодня утром, или, возможно, вы оставили ручку в кармане вчерашней рубашки, когда снимали ее вчера вечером.

Мы не можем сказать, потому что нас там не было, и, что еще важнее, мы даже не можем видеть вашу рубашку, не говоря уже о том, что находится в кармане!

Вернемся к компьютерам, и вы каким - то образом сделали то же самое-и мы не можем увидеть ваш код, а тем более запустить его и узнать, что содержит null, когда это не должно быть.
Но вы можете - и Visual Studio поможет вам здесь. Запустите свою программу в отладчике, и когда она выйдет из строя, VS покажет вам строку, на которой она обнаружила проблему. Затем вы можете начать просматривать различные его части, чтобы увидеть, какое значение равно null, и начать просматривать свой код, чтобы выяснить, почему. Поэтому поставьте точку останова в начале метода, содержащего строку ошибки, и снова запустите программу с самого начала. На этот раз VS остановится перед ошибкой и позволит вам изучить, что происходит, пройдя через код, глядя на ваши значения.

Но мы не можем этого сделать - у нас нет вашего кода, мы не знаем, как его использовать, если бы он у нас был, у нас нет ваших данных. Так что попробуйте - и посмотрите, сколько информации вы сможете узнать!

Scribling Doodle

забыл упомянуть, что это дает мне эту ошибку на ds.Fill(dt). Я опробую некоторые другие переменные и посмотрю, не выходит ли что-нибудь из ряда вон.