Я создаю этот код для использования двух comboboxes, которые зависят от первого, но когда я пытаюсь выбрать «code_Zone» из таблицы «Зона», у меня есть это исключение :Параметр @ code1 не имеет значения по умолчанию
Параметр @ code1 не имеет значения по умолчанию
Это мой код:
Dim cmd3 = New OleDbCommand("select [Code_Zone] from [Zone] where [Nom_Zone]= '@code';", connection)
cmd3.Parameters.AddWithValue("@code", ComboBoxNomZoneDeclaration.SelectedText.ToString)
Dim valeur = cmd3.ExecuteScalar
Dim commande = New OleDbCommand("select [Code_Cable] from [CableEnFibre] where [Code_Zone][email protected];", connection)
commande.Parameters.AddWithValue("@code1", valeur)
Dim reader = commande.ExecuteReader 'there is the exception
While reader.Read
ComboBoxPanneCentreAppel.Items.Add(reader.GetInt32(reader.GetOrdinal("Code_Cable")))
End While
reader.Close()
Вам не нужно '' 'вокруг имени параметра в запросе когда вы используете параметры. И строка в запросе должна быть '@ code1' – OneFineDay
@OneFineDay вы правы, но неправильный шаг - это цитата вокруг' @ code', а не '@ code1'. Это не дает результата из первого ExecuteScalar, а затем сообщение об ошибке во втором запросе, когда он пытается использовать переменную valeur, которая, вероятно, равна Nothing – Steve
@Steve, см. Это сейчас! – OneFineDay