LOGIN PRESSIONANDO TECLAS
olha, eu criaria 2 classes, uma para conexão e outra para pesquisa no banco de dados, depois eu jogaria na form, a comparação do que foi digitado na textbox, com o resultado da pesquisa, exemplo:
Try
Dim Login As New clnLogin
Dim drDadosUser As System.Data.SqlClient.SqlDataReader
Dim drDadosPass As System.Data.SqlClient.SqlDataReader
drDadosUser = Login.VerUser(txtUsername.Text)
drDadosPass = Login.VerPass(txtPassword.Text)
If drDadosUser.Read And drDadosPass.Read Then
MsgBox([Ô]Logado[Ô])
Me.Close()
Else
MsgBox([Ô]Usuario e/ou Login invalido[Ô])
End If
Catch ex As Exception
MsgBox([Ô]Erro ao logar[Ô])
End Try
é isso mais ou menos como ficaria na form, as classes q teria todo o trabalho para fazer a varredura no banco de dados e buscar as informaçoes do texbox, para buscar e ver se realmente existe, se quiser eu posso postar a classe de conexão com o banco SQL e da varredura. Este sim eu garanto q da certo...
Try
Dim Login As New clnLogin
Dim drDadosUser As System.Data.SqlClient.SqlDataReader
Dim drDadosPass As System.Data.SqlClient.SqlDataReader
drDadosUser = Login.VerUser(txtUsername.Text)
drDadosPass = Login.VerPass(txtPassword.Text)
If drDadosUser.Read And drDadosPass.Read Then
MsgBox([Ô]Logado[Ô])
Me.Close()
Else
MsgBox([Ô]Usuario e/ou Login invalido[Ô])
End If
Catch ex As Exception
MsgBox([Ô]Erro ao logar[Ô])
End Try
é isso mais ou menos como ficaria na form, as classes q teria todo o trabalho para fazer a varredura no banco de dados e buscar as informaçoes do texbox, para buscar e ver se realmente existe, se quiser eu posso postar a classe de conexão com o banco SQL e da varredura. Este sim eu garanto q da certo...
Boa noite obrigado pela dica, mas a minha ideia é somente login no caso sem senha,
meu form oculto
então digamos no desktop do meu pc eu digito a senha e abre o form.
Meu exemplo:
Public Class Form1
Private Declare Function GetAsyncKeyState Lib [Ô]user32[Ô] (ByVal Tecla As Keys) As Keys
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Opacity = 0
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If GetAsyncKeyState(Keys.A) Then
Me.Opacity = 1
End If
End Sub
End Class
Revisando:
Quando eu pressionar a tecla A o form abre certo...
Porem eu queria definir como senha uma palavra ao invés da letra [Ô]A[Ô]
Assim eu digito uma palavra especifica e abre o form
meu form oculto
então digamos no desktop do meu pc eu digito a senha e abre o form.
Meu exemplo:
Public Class Form1
Private Declare Function GetAsyncKeyState Lib [Ô]user32[Ô] (ByVal Tecla As Keys) As Keys
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Opacity = 0
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If GetAsyncKeyState(Keys.A) Then
Me.Opacity = 1
End If
End Sub
End Class
Revisando:
Quando eu pressionar a tecla A o form abre certo...
Porem eu queria definir como senha uma palavra ao invés da letra [Ô]A[Ô]
Assim eu digito uma palavra especifica e abre o form
Alguém pode ajudar?
vou dar uma estudada no seu código, fique tranquilo q conseguindo achar alguma solução, estarei postando para vc...
Obrigado =)
Tópico encerrado , respostas não são mais permitidas