Jump to content
  • Revista PROGRAMAR: Já está disponível a edição #60 da revista programar. Faz já o download aqui!

Sign in to follow this  
antidzrt

Erro no Registo [ Resolvido ]

Recommended Posts

antidzrt

Boas pessoal

Isto na minha base dados so insere bem a  1º matricula a 1º Marca e o 1ª ano

Se eu quiser meter mais que uma matricula mesmo que eu escreva a matricula ou seleccione uma marca ou um Ano regista na base dados "False" ou "true" e para o  Ano "1" ou "0"

Dim strConn As String
        strConn = WebConfigurationManager.ConnectionStrings("gesviaConnectionString").ConnectionString

        Dim SQl As String = "INSERT INTO Marca ([Marca1],[Marca2],[Marca3],[Marca4],[Marca5],[Marca6],[Marca7],[Marca8],[Marca9],[matricula1],[matricula2],[matricula3],[matricula4],[matricula5],[matricula6],[matricula7],[matricula8],[matricula9],[ano1],[ano2],[ano3],[ano4],[ano5],[ano6],[ano7],[ano8],[ano9])Values(@Marca1,@marca2,@marca3,@marca4,@marca5,@marca6,@marca7,@marca8,@marca9,@matricula1,@matricula2,@matricula3,@matricula4,@matricula5,@matricula6,@matricula7,@matricula8,@matricula9,@ano1,@ano2,@ano3,@ano4,@ano5,@ano6,@ano7,@ano8,@ano9);"

        Dim connection As New SqlConnection(strConn)

        Dim valores As New SqlCommand(SQl, connection)
        valores.Parameters.Add("@Marca1", SqlDbType.VarChar).Value = Marca1.SelectedItem.Value
        valores.Parameters.Add("@marca2", SqlDbType.VarChar).Value = Marca3.SelectedItem.Value = IIf(String.IsNullOrEmpty(Marca2.SelectedValue), "NULL", Marca2.SelectedValue)
        valores.Parameters.Add("@marca3", SqlDbType.VarChar).Value = Marca3.SelectedItem.Value = IIf(String.IsNullOrEmpty(Marca3.SelectedValue), "NULL", Marca3.SelectedValue)
        valores.Parameters.Add("@marca4", SqlDbType.VarChar).Value = Marca4.SelectedItem.Value = IIf(String.IsNullOrEmpty(Marca4.SelectedValue), "NULL", Marca4.SelectedValue)
        valores.Parameters.Add("@marca5", SqlDbType.VarChar).Value = Marca5.SelectedItem.Value = IIf(String.IsNullOrEmpty(Marca5.SelectedValue), "NULL", Marca5.SelectedValue)
        valores.Parameters.Add("@marca6", SqlDbType.VarChar).Value = Marca6.SelectedItem.Value = IIf(String.IsNullOrEmpty(Marca6.SelectedValue), "NULL", Marca6.SelectedValue)
        valores.Parameters.Add("@marca7", SqlDbType.VarChar).Value = Marca7.SelectedItem.Value = IIf(String.IsNullOrEmpty(Marca7.SelectedValue), "NULL", Marca7.SelectedValue)
        valores.Parameters.Add("@marca8", SqlDbType.VarChar).Value = Marca8.SelectedItem.Value = IIf(String.IsNullOrEmpty(Marca8.SelectedValue), "NULL", Marca8.SelectedValue)
        valores.Parameters.Add("@marca9", SqlDbType.VarChar).Value = Marca9.SelectedItem.Value = IIf(String.IsNullOrEmpty(Marca9.SelectedValue), "NULL", Marca9.SelectedValue)
        valores.Parameters.Add("@matricula1", SqlDbType.VarChar).Value = Matricula1.Text
        valores.Parameters.Add("@matricula2", SqlDbType.VarChar).Value = Matricula2.Text = IIf(String.IsNullOrEmpty(Matricula2.Text), "NULL", Matricula2.Text)
        valores.Parameters.Add("@matricula3", SqlDbType.VarChar).Value = Matricula3.Text = IIf(String.IsNullOrEmpty(Matricula3.Text), "NULL", Matricula3.Text)
        valores.Parameters.Add("@matricula4", SqlDbType.VarChar).Value = Matricula4.Text = IIf(String.IsNullOrEmpty(Matricula4.Text), "NULL", Matricula4.Text)
        valores.Parameters.Add("@matricula5", SqlDbType.VarChar).Value = Matricula5.Text = IIf(String.IsNullOrEmpty(Matricula5.Text), "NULL", Matricula5.Text)
        valores.Parameters.Add("@matricula6", SqlDbType.VarChar).Value = matricula6.Text = IIf(String.IsNullOrEmpty(matricula6.Text), "NULL", matricula6.Text)
        valores.Parameters.Add("@matricula7", SqlDbType.VarChar).Value = matricula7.Text = IIf(String.IsNullOrEmpty(matricula7.Text), "NULL", matricula7.Text)
        valores.Parameters.Add("@matricula8", SqlDbType.VarChar).Value = matricula8.Text = IIf(String.IsNullOrEmpty(matricula8.Text), "NULL", matricula8.Text)
        valores.Parameters.Add("@matricula9", SqlDbType.VarChar).Value = matricula9.Text = IIf(String.IsNullOrEmpty(matricula9.Text), "NULL", matricula9.Text)
        valores.Parameters.Add("@Ano1", SqlDbType.Int).Value = Ano1.SelectedItem.Value
        valores.Parameters.Add("@Ano2", SqlDbType.Int).Value = Ano2.SelectedItem.Value = IIf(String.IsNullOrEmpty(Ano2.SelectedValue), "NULL", Ano2.SelectedValue)
        valores.Parameters.Add("@Ano3", SqlDbType.Int).Value = Ano3.SelectedItem.Value = IIf(String.IsNullOrEmpty(Ano3.SelectedValue), "NULL", Ano3.SelectedValue)
        valores.Parameters.Add("@Ano4", SqlDbType.Int).Value = Ano4.SelectedItem.Value = IIf(String.IsNullOrEmpty(Ano4.SelectedValue), "NULL", Ano4.SelectedValue)
        valores.Parameters.Add("@Ano5", SqlDbType.Int).Value = Ano5.SelectedItem.Value = IIf(String.IsNullOrEmpty(Ano5.SelectedValue), "NULL", Ano5.SelectedValue)
        valores.Parameters.Add("@Ano6", SqlDbType.Int).Value = Ano6.SelectedItem.Value = IIf(String.IsNullOrEmpty(Ano6.SelectedValue), "NULL", Ano6.SelectedValue)
        valores.Parameters.Add("@Ano7", SqlDbType.Int).Value = Ano7.SelectedItem.Value = IIf(String.IsNullOrEmpty(Ano7.SelectedValue), "NULL", Ano7.SelectedValue)
        valores.Parameters.Add("@Ano8", SqlDbType.Int).Value = Ano8.SelectedItem.Value = IIf(String.IsNullOrEmpty(Ano8.SelectedValue), "NULL", Ano8.SelectedValue)
        valores.Parameters.Add("@Ano9", SqlDbType.Int).Value = Ano9.SelectedItem.Value = IIf(String.IsNullOrEmpty(Ano9.SelectedValue), "NULL", Ano9.SelectedValue)
         connection.Open()

        Dim x As Integer = valores.ExecuteNonQuery()

   
        connection.Close()
        connection = Nothing
        valores = Nothing

Share this post


Link to post
Share on other sites
jnetic

:argue:

Tou com o mesmo problema que ele mas eu tenho mesmo de deixar os campos vazios nao os preencho todos

abro novo topico?

Podias ter esperado um bocadinho... Estás a pedir que dupliquem a discussão que se passa ao mesmo tempo, num outro tópico igual a este!

Vai seguindo o outro tópico, e se no final não obteres solução para o teu problema, então sim... crias (ou continuas) o tópico.

:spank:

Este deveria ser bloqueado ou apagado, justamente por double-post.

Share this post


Link to post
Share on other sites
jnetic

Desculpa a "explosão"... Espero que saibas que não é nada pessoal.

Penso que a função de bloqueio é exclusiva dos moderadores. O melhor é esperar que algum o faça (ou pedir directamente ao Weasel ou ao ribeiro55 ou a outro que possa fazê-lo)

Share this post


Link to post
Share on other sites
jnetic

E a solução lá encontrada, não te serve?

🤔

Input string was not in a correct format

Isto é porque estás a enviar uma string "NULL" para o campo Ano que é numérico!

Share this post


Link to post
Share on other sites
bioshock

Presumo que a combobox Ano, já tenha um index predefinido. Se tiver, ele vai sempre adicionar um valor, independentemente de a pessoa ter escolhido ou não algum item da combobox, esse valor vai lá estar sempre, cabe à pessoa que se está a registar mudar o valor da combobox para o pretendido..

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Sign in to follow this  

×

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.