URGENTE, AJUDA NO VB
a 2 imagem
porfavor, preciso urgente, esse meu projeto de tcc é pra seg
Cara, qual o campo da TB onde voce grava o e-mail? é o campo e-mail certo, entao voce tem que comparar o campo da Tb e-mail com o texto digitado do textbox
igual foi dito anteriormente:
[Ô]SELECT * FROM Cad_Cliente where Email =[ô][Ô] & TextBox13.Text & [Ô][ô][Ô]
nao tem onde dar mensagem de operador faltando
igual foi dito anteriormente:
[Ô]SELECT * FROM Cad_Cliente where Email =[ô][Ô] & TextBox13.Text & [Ô][ô][Ô]
nao tem onde dar mensagem de operador faltando
Exato, e é isso que eu estou fzd, só q n vai... vou te mostrar o código
Dim sqll As String = [Ô]SELECT * FROM Cad_Cliente where Email =[ô][Ô] & TextBox13.Text & [Ô][ô][Ô]
[ô]Dim sqll As String = [Ô]SELECT * FROM Cad_Cliente where Email =[ô][Ô] & cod & [Ô][ô][Ô]
Dim cm1 As New OleDb.OleDbCommand(sqll, dbcon)
Dim dr1 As OleDb.OleDbDataReader
Dim flag As Boolean
Try
dbcon.Open()
dr1 = cm1.ExecuteReader
If dr1.HasRows Then
While dr1.Read
If dr1.Item([Ô]Email[Ô]) = cod Then
flag = True
MessageBox.Show([Ô]Você já é cadastrado, caso ão consiga entrar, por favor, acessar a opção recuperar senha na página de login[Ô])
End If
End While
End If
If flag = False Then
MessageBox.Show([Ô]Ocorreu algum erro[Ô])
End If
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
dbcon.Close()
Dim sqll As String = [Ô]SELECT * FROM Cad_Cliente where Email =[ô][Ô] & TextBox13.Text & [Ô][ô][Ô]
[ô]Dim sqll As String = [Ô]SELECT * FROM Cad_Cliente where Email =[ô][Ô] & cod & [Ô][ô][Ô]
Dim cm1 As New OleDb.OleDbCommand(sqll, dbcon)
Dim dr1 As OleDb.OleDbDataReader
Dim flag As Boolean
Try
dbcon.Open()
dr1 = cm1.ExecuteReader
If dr1.HasRows Then
While dr1.Read
If dr1.Item([Ô]Email[Ô]) = cod Then
flag = True
MessageBox.Show([Ô]Você já é cadastrado, caso ão consiga entrar, por favor, acessar a opção recuperar senha na página de login[Ô])
End If
End While
End If
If flag = False Then
MessageBox.Show([Ô]Ocorreu algum erro[Ô])
End If
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
dbcon.Close()
Boa tarde! Se seu Ãndice primário é o e-mail?
N entendi Leandro, pode repetir por favor
Seu Ãndice primário é qual informação do seu cadastro?
Minha chave primária é o número da matrÃcula, o que eu quero fzr é que apareça uma mensagem caso o cara queira se registrar com um email já registrado
Qual seu banco de dados?
No access, o nome do banco é Tec_Alfa, o nome da tabela Cad_Cliente
Tópico encerrado , respostas não são mais permitidas