Forum Pplware
Dados BD para DataGrid (VB6) - Versão de Impressão

+- Forum Pplware (http://forum.pplware.com)
+-- Fórum: Mais Tech (/forumdisplay.php?fid=11)
+--- Fórum: Programação e Web (/forumdisplay.php?fid=16)
+--- Tópico: Dados BD para DataGrid (VB6) (/showthread.php?tid=8559)

Páginas: 1 2


Dados BD para DataGrid (VB6) - BigBang - 04-03-2011 23:26

Boas pessoal.

Tenho aqui um problema que não faço a minima de como resolver.
Tenho uma BD para um clube de vídeo, tabela Filmes e Clientes.

Na tabela Filmes tenho um campo que se chama Género. Eu queria que o utilizador fizesse uma pesquisa através de data1.recordset.find e que apresentasse uma lista de todos os filmes que fossem do Género que foi pesquisado.

Disseram-me para quando o campo Genero da tabela for igual ao que foi pesquisado copiar os dados desse filme para uma DataGrid.

Os meus problemas são:

- como pesquisar nesse campo ate chegar ao fim da BD;
- como copiar os dados do filme para a DataGrid caso a confirmação se verifique.

Atenção, peço que me digam maneira sem ser com codigo SQL que ainda não aprendi.


RE: Dados BD para DataGrid (VB6) - rei007 - 05-03-2011 15:37

viva,

Dá uma vista de olhos neste link. Eles copiam para textbox mas é só realizares as respectivas alterações para a datagrid.

http://www.profsr.com/vb/vbless09.htm


RE: Dados BD para DataGrid (VB6) - BigBang - 05-03-2011 16:23

Tentei de outra forma.

Liguei a DataGrid à BD por intermédio do objecto Data.(data1)
Agora faço logo as pesquisas directamente na DataGrid.

Vi o seguinte código na Web. Como é SQL será que me podiam explicar cada parte da expressão para eu por a funcionar?

strBusca = "SELECT * FROM Employees where UserName Like '" & strTextoBusca & "%' Order By UserName"


RE: Dados BD para DataGrid (VB6) - Corvus - 05-03-2011 18:58

Melhor que explicar cada parte, dá uma vista de olhos aqui:

http://www.sql-tutorial.net/


RE: Dados BD para DataGrid (VB6) - BigBang - 05-03-2011 19:10

Obrigado, já estudei cada parte da instrução.
Não percebo é o inicio onde se tem de igualar a uma variável.

Como faço para depois na DataGrid mostrar so os resultados da pesquisa em vez dos filmes todos ?


RE: Dados BD para DataGrid (VB6) - Corvus - 05-03-2011 22:44

a parte de colocar a string numa variável já não tem a ver com sql e sim com o próprio vb. de certeza que mais abaixo essa var vai ser usada numa função que irá enviar o comando para o sql server e obter a resposta


RE: Dados BD para DataGrid (VB6) - JPedrosa - 05-03-2011 23:49

A melhor maneira de fazer isto é a seguinte:
DB Side:
Implementar uma storage procedure que te faça a pesquisa e devolva o conjunto de registos que te interessa.
VBSide:
Invocar a Storage, passando os parâmetros de pesquisa, e colocar os resultados numa data grid.

Cumps,
JP


RE: Dados BD para DataGrid (VB6) - BigBang - 06-03-2011 01:04

Private Sub Command1_Click()
Dim strBusca As String

strBusca = "SELECT * FROM Filme where Ano Like '" & Text1.Text & "%' Order By Ano"
Data1.RecordSource = strBusca
Data1.Refresh

End Sub
____________

Tenho este codigo, mas dá-me erro no data1.refresh
Estou a dar em maluco . . .


RE: Dados BD para DataGrid (VB6) - rei007 - 06-03-2011 11:27

Viva,

Quando der erro tens de dizer qual é. Dizer somente que deu é subjectivo, mas quase de certeza que é por causa das plicas (') que estão a seguir ao Like do Ano. Se o Ano for do tipo inteiro não podes ter as plicas. As plicas são só para strings. Já agora para que é a percentagem?


RE: Dados BD para DataGrid (VB6) - BigBang - 06-03-2011 14:53

rei007, obrigado foi um lapso meu, sem as plicas (') funcionou.
Segundo percebi a percentagem é para pesquisar o que tives antes da percentagem mesmo que esteja incompleto.

Por exemplo:

" & Text1.Text & "% Order By Ano"

Se pesquisar 20 acho que vai aparecer todos os anos que comecem por 20, certo ?

EDIT: Acabei de testar e não pesquisou com a percentagem, so funciona sem a percentagem. Na web quando pesquisei tinha a percentagem, não percebo porque.
_________________________________

Pessoal se me pudessem dizer uma ultima coisa.

Como editar os dados na DataGrid e depois guardar na BD ?