none
Evento do FinishButtonClick no createwizard RRS feed

  • Pergunta

  • Caros, boa tarde!

    Estou desenvolvendo um sistema onde o acesso é hierarquico. São cinco niveis, administrador, vendas, administrativo, clientes, técnicos.

    Para este acesso eu estou usando a ferramenta de configuração do ASP NET para criar os controles de login etc. Após a configuração via ferramenta ele criou algumas tabelas, consultas e relações no meu banco de dados, minha dúvida é a seguinte:

    Já configurei o controle createuserwizard com 3 steps (Sign Up, Dados Cadastrais(criado por mim), e Complete) em dados cadastrais inserir um formview deixei como Insert por padrão, retirei os botões de insert e cancel e configurei o evento do FinishButtonClick com o seguinte código:

            Dim myConnectionString As String = "Data Source=DPI-TI-PC\SQLEXPRESS;Initial Catalog=guard_house;Integrated Security=True"
            Dim SQL As String = "INSERT INTO [tbl_clientes] ([UserName], [Nome_Completo], [Endereco], [Bairro], [Cidade], [UF], [CEP], [Telefone], [E-mail], [CPF_CNPJ], [RG], [Sexo], [Observacoes]) VALUES (@UserName, @Nome_Completo, @Endereco, @Bairro, @Cidade, @UF, @CEP, @Telefone, @column1, @CPF_CNPJ, @RG, @Sexo, @Observacoes)"
            Dim connection As New SqlConnection(myConnectionString)
            Dim command As New SqlCommand(SQL, connection)

            command.Parameters.Add("@Nome_Completo", SqlDbType.NVarChar).Value = "Nome_CompletoTextbox"
            command.Parameters.Add("@Endereco", SqlDbType.NVarChar).Value = "EnderecoTextBox"
            command.Parameters.Add("@Bairro", SqlDbType.NVarChar).Value = "BairroTextbox"
            command.Parameters.Add("@Cidade", SqlDbType.NVarChar).Value = "CidadeTextbox"
            command.Parameters.Add("@UF", SqlDbType.NVarChar).Value = "UFTextbox"
            command.Parameters.Add("@CEP", SqlDbType.NVarChar).Value = "CEPTextBox"
            command.Parameters.Add("@Telefone", SqlDbType.NVarChar).Value = "TelefoneTextBox"
            command.Parameters.Add("@column1", SqlDbType.NVarChar).Value = "column1TextBox"
            command.Parameters.Add("@CPF_CNPJ", SqlDbType.NVarChar).Value = "CPF_CNPJTextBox"
            command.Parameters.Add("@RG", SqlDbType.NVarChar).Value = "RGTextBox"
            command.Parameters.Add("@Sexo", SqlDbType.NVarChar).Value = "SexoTextBox"
            command.Parameters.Add("@Observacoes", SqlDbType.NVarChar).Value = "ObservacoesTextBox"


            connection.Close()

            connection = Nothing

            command = Nothing

    Gostaria de saber pq o código não popula minha tabela tbl_clientes, sendo que a mesma já está com a relação com a tabela Users criada.

    Att.,

    quarta-feira, 29 de junho de 2011 19:28

Respostas

  • Olá,

    Bom não sei se o código acima que você postou esta completo, mais caso seja, faltou abrir a conexão com banco de dados executar o comando:

    ...
    
     'Verificando se a conexão ja não esta aberta
     If connection.State <> ConnectionState.Open Then
     'Abrindo conexao com banco de dados
     connection.Open()
     End If
    
     Try
     'Executando
     command.ExecuteNonQuery()
    
     Catch ex As Exception
     'Rotina para tratamento de erro
    
     Finally
     'Fechando conexao
     connection.Close()
     
     End Try
    ...
    

     



    • Sugerido como Resposta Vitor Mendes segunda-feira, 4 de julho de 2011 01:34
    • Marcado como Resposta weduardopaiva segunda-feira, 11 de julho de 2011 17:41
    quinta-feira, 30 de junho de 2011 01:55

Todas as Respostas

  • Olá,

    Bom não sei se o código acima que você postou esta completo, mais caso seja, faltou abrir a conexão com banco de dados executar o comando:

    ...
    
     'Verificando se a conexão ja não esta aberta
     If connection.State <> ConnectionState.Open Then
     'Abrindo conexao com banco de dados
     connection.Open()
     End If
    
     Try
     'Executando
     command.ExecuteNonQuery()
    
     Catch ex As Exception
     'Rotina para tratamento de erro
    
     Finally
     'Fechando conexao
     connection.Close()
     
     End Try
    ...
    

     



    • Sugerido como Resposta Vitor Mendes segunda-feira, 4 de julho de 2011 01:34
    • Marcado como Resposta weduardopaiva segunda-feira, 11 de julho de 2011 17:41
    quinta-feira, 30 de junho de 2011 01:55
  • Puxa cara que vacilo!

     

    Agradeço a dica, já marquei como resposta válida!

    segunda-feira, 11 de julho de 2011 17:41