URGENTE, AJUDA NO VB
Tem como em enviar seu BD
Uso um Access uso pesquisar um e-mail assim
[Ô]SELECT * FROM Clientes WHERE Email = [ô][Ô] & Trim(VariávelComOEmail) & [Ô][ô][Ô]
no access
SELECT * FROM Clientes WHERE Email = [ô]teste@gmail.com[ô]
[Ô]SELECT * FROM Clientes WHERE Email = [ô][Ô] & Trim(VariávelComOEmail) & [Ô][ô][Ô]
no access
SELECT * FROM Clientes WHERE Email = [ô]teste@gmail.com[ô]
O que trocaria no meu código no caso?
Dim sqll As String = [Ô]SELECT * FROM Cad_Cliente where Email =[ô][Ô] & TextBox13.Text & [Ô][ô][Ô]
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 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()
Dá uma olhada nisso que com certeza você vai resolver
http://www.macoratti.net/vbn_vdt1.htm
http://www.macoratti.net/vbn_vdt1.htm
Eu olhei, tentei, mais nada...
No caso não entendi porque fazer vários processos para o resultado se sua SQL só tá filtrando só o e-mail, se no caso a consulta trás resultado é que existe já o e-mail no BD, no caso se o recordcount for maior que 0(zero) então tem resultado e no caso existe um registro com este e-mail, não entendi para que comparar o mesmo....
Você pode demonstrar isso para mim utilizando o código acima citado pfv?
Crie uma tabela com o resultado da SQL e a partir daà você testa se a tabela está com o recordcount > 0(zero)
Continuo sem entender...
Eu só queria saber porque com esse meu código está aparecendo que o usuário foi cadastrado, sendo que não era pra ser, era pra aparecever a mensagem que aparece depois, e essa mensagem que aparece depois aparece duas vezes
Tópico encerrado , respostas não são mais permitidas