Tenho uma pesquisa que possui dois formulários. No formpesquni, eu tenho um DataGrid com dados de uma tabela. Então, ao clicar no botão "Pesquisar", é aberto o formulário pesquni, que contem apenas uma combo com o tipo de pesquisa, uma caixa de texto para digitar o registro a ser encontrado e um botão para executar o comando.
Nessa combobox, estão listadas três opções: "Código da unidade", "Descrição da unidade" e "Responsável pela unidade".
O problema é que quando eu faço a pesquisa por código da unidade, ele encontra normalmente, selecionando o registro encontrado no Grid do formpesquni, mas se eu tento fazer a pesquisa por descrição da unidade ou pelo responsável da unidade, ele retorna sem encontrar nenhum registro! Vejam o código:
Private Sub lista_Click()
If (formpesquni.data1.SelBookmarks.Count <> 0) Then formpesquni.data1.SelBookmarks.Remove 0
If rs2.RecordCount <> 0 Then rs2.MoveFirst
Select Case cbo.Text
Case "Código da unidade"
rs2.Find "codigo = '" & pesq.Text & "'"
If rs2.EOF Then
MsgBox "registro não encontrado"
Else
formpesquni.data1.SelBookmarks.Add rs2.Bookmark
formpesquni.formata
End If
Case "Descrição da unidade"
rs2.Find "descricao = '" & pesq.Text & "'"
If rs2.EOF Then
MsgBox "registro não encontrado"
Else
formpesquni.data1.SelBookmarks.Add rs2.Bookmark
formpesquni.formata
End If
Case "Responsável pela unidade"
rs2.Find "responsavel = '" & pesq.Text & "' "
If rs2.EOF Then
MsgBox "registro não encontrado"
Else
formpesquni.data1.SelBookmarks.Add rs2.Bookmark
formpesquni.formata
End If
End Select
End Sub
Quando eu escolho a opção "Descrição..." ou "Responsável..." ele retorna o msgbox da condição no código acima.
No banco de dados, o campo codigo está como decimal(10,0) e os campos descricao e responsavel estão como text.
Pergunta
Marco Canhoto
Olá a todos!
Tenho uma pesquisa que possui dois formulários. No formpesquni, eu tenho um DataGrid com dados de uma tabela. Então, ao clicar no botão "Pesquisar", é aberto o formulário pesquni, que contem apenas uma combo com o tipo de pesquisa, uma caixa de texto para digitar o registro a ser encontrado e um botão para executar o comando.
Nessa combobox, estão listadas três opções: "Código da unidade", "Descrição da unidade" e "Responsável pela unidade".
O problema é que quando eu faço a pesquisa por código da unidade, ele encontra normalmente, selecionando o registro encontrado no Grid do formpesquni, mas se eu tento fazer a pesquisa por descrição da unidade ou pelo responsável da unidade, ele retorna sem encontrar nenhum registro! Vejam o código:
Quando eu escolho a opção "Descrição..." ou "Responsável..." ele retorna o msgbox da condição no código acima.
No banco de dados, o campo codigo está como decimal(10,0) e os campos descricao e responsavel estão como text.
Obrigado!
Link para o comentário
Compartilhar em outros sites
4 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.