[Resolvido] Criando um Sistema de Login
então
minha duvida agora é no codigo que fiz. Nao me permitiram usar o ADO. =/
Private Sub bntOK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnOk.Click
Dim conn As New SqlConnection
Dim comando As New SqlCommand
Dim Senha As String
conn.ConnectionString = My.Settings.clientes2ConnectionString
Try
conn.Open()
comando.Connection = conn
comando.CommandText = "SELECT Senha FROM usuario Where Nome = " & txtNome.Text & "'"
Senha = comando.ExecuteScalar
conn.Close()
If txtSenha.Text = Senha Then
frmPrincipal.Show()
Me.Hide()
Else
MessageBox.Show("Senha/Usuário Incorreto(s)", "Senha incorreta", MessageBoxButtons.OK, MessageBoxIcon.Information)
txtSenha.Focus()
End If
Catch ex As SqlException
MessageBox.Show("Erro ao efetuar a conexão com a base de dados : " + ex.Message)
conn.Dispose()
End Try
End Sub
EU PEGUEI o material no link http://www.macoratti.net/vbn5_cw3.htm
mas entao, eu n sei criptografar senha no banco de dados
entao a função a mais q ele deu n serve pra mim
pq nao roda meu codigo?
alguem sabe?
abcs
Discussão (10)
Carregando comentários...