Duvida ao adicionar parametros sql command

Question

Bom dia colegas,

eu sou iniciante em VB.NET, porém tenho grandes desafios pela frente. Aqui na empresa onde eu trabalho, estamos migrando os sistemas de VB para VB.NET, de access para SQL Server, porém me deparei com um erro que não estou conseguindo consertar:

Devido a estrutura das tabelas vindo do access, precisei em uma delas permitir uma chave estrangeira nula, porém na hora de dar o insert aparece o seguinte erro:

Um pouco do código:

Dim dc As New SqlCommand("", conexao3)
                dc.CommandText = "Insert into TB_GRUPOS values (@GrupoCod,@Teste,@GrupoDesc)"
                dc.Parameters.Add("@GrupoCod", SqlDbType.Int).Value = codigoGrupo

dc.Parameters.Add("@AudespID", SqlDbType.Int).Value = teste
                dc.Parameters.Add("@GrupoDesc", SqlDbType.VarChar).Value = descricaoGrupo.ToString

                conexao3.Open()
                dc.ExecuteNonQuery()

ERRO: Column name or number of supplied values does not match table definition.

Essa variavel 'teste' que representa o parametro @Teste, que preencho, ela pode ser null, porém nao estou conseguindo fazer o insert

Valew

Answer 1

Olá Célio,

Tente algo como o código abaixo:

Dim dc As New SqlCommand("", conexao3)
dc.CommandText = "Insert into TB_GRUPOS values (@GrupoCod,@Teste,@GrupoDesc)"
dc.Parameters.Add("@GrupoCod", SqlDbType.Int).Value = codigoGrupo
dc.Parameters.Add("@Teste", SqlDbType.Int).Value = DbNull.Value
dc.Parameters.Add("@GrupoDesc", SqlDbType.VarChar).Value =
 descricaoGrupo.ToString
conexao3.Open()
dc.ExecuteNonQuery() 

[]s!

---

Fernando Henrique Inocêncio Borba Ferreira
Microsoft MVP - Data Platform Development
while(alive){ this.WriteCode(); }
Blog: http://ferhenriquef.com/
Twitter: @ferhenrique
Entity Framework - Brasil: https://www.facebook.com/EntityFrameworkBrasil