INSERIR DADOS NUMA TABELA VS2010
Pessoal nao consigo iseriri dados em minha tabela alguem pode me mostrar um exemplo passo a passo de como faço.
pois minha rotina parece que nao faz nada.
segue rotina que uso no botao cadastrar.
Private Sub btncadastrar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btncadastrar.Click
Dim conexao As New SqlConnection([Ô]data source=.\sqlexpress;attachdbfilename=|datadirectory|\usuarios.mdf;integrated security=true;connect timeout=30;user instance=true[Ô])
Dim cmd As SqlCommand
Dim sql As String = [Ô]insert into usuarios(nome, senha)values(@nome,@senha)[Ô]
cmd = New SqlCommand(sql)
cmd.Parameters.Add(New SqlParameter([Ô]@nome[Ô], txtusuario.Text))
cmd.Parameters.Add(New SqlParameter([Ô]@senha[Ô], txtsenha.Text))
Try
cmd.Connection.Open()
cmd.ExecuteNonQuery()
MsgBox([Ô]dados gravados com sucesso[Ô], MsgBoxStyle.OkOnly, [Ô]gravar[Ô])
Catch ex As Exception
Finally
conexao.Close()
End Try
End Sub
pois minha rotina parece que nao faz nada.
segue rotina que uso no botao cadastrar.
Private Sub btncadastrar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btncadastrar.Click
Dim conexao As New SqlConnection([Ô]data source=.\sqlexpress;attachdbfilename=|datadirectory|\usuarios.mdf;integrated security=true;connect timeout=30;user instance=true[Ô])
Dim cmd As SqlCommand
Dim sql As String = [Ô]insert into usuarios(nome, senha)values(@nome,@senha)[Ô]
cmd = New SqlCommand(sql)
cmd.Parameters.Add(New SqlParameter([Ô]@nome[Ô], txtusuario.Text))
cmd.Parameters.Add(New SqlParameter([Ô]@senha[Ô], txtsenha.Text))
Try
cmd.Connection.Open()
cmd.ExecuteNonQuery()
MsgBox([Ô]dados gravados com sucesso[Ô], MsgBoxStyle.OkOnly, [Ô]gravar[Ô])
Catch ex As Exception
Finally
conexao.Close()
End Try
End Sub
Verifique se não está caindo na exceção...
como faço issso
Try
cmd.Connection.Open()
cmd.ExecuteNonQuery()
MsgBox([Ô]dados gravados com sucesso[Ô], MsgBoxStyle.OkOnly, [Ô]gravar[Ô])
Catch ex As Exception
MsgBox([Ô]Deu zica ae mano: [Ô] & ex.Message, MsgBoxStyle.OkOnly, [Ô]Erro[Ô])
Finally
conexao.Close()
End Try
cmd.Connection.Open()
cmd.ExecuteNonQuery()
MsgBox([Ô]dados gravados com sucesso[Ô], MsgBoxStyle.OkOnly, [Ô]gravar[Ô])
Catch ex As Exception
MsgBox([Ô]Deu zica ae mano: [Ô] & ex.Message, MsgBoxStyle.OkOnly, [Ô]Erro[Ô])
Finally
conexao.Close()
End Try
Não está faltando a conexão aqui:
cmd = New SqlCommand(sql , conexao)
cmd = New SqlCommand(sql , conexao)
pessoal aparentemente esta certo, a mensagem de dados gravados com sucesso aparece mas ao verificar a tabela vejo que nao inseriu os dados.
alguem sabe me explicar o que esta errado.
alguem sabe me explicar o que esta errado.
Tópico encerrado , respostas não são mais permitidas