[ACCESS 2007] Query di ricerca su dati compilati nella maschera

[Markz345]

Salve a tutti sono nuovo , premetto non sono molto pratico con access e vorrei imparare passo passo.
Dunque arrivo al problema

Si tratta di un database di film e mi sono inceppato sul come fare una ricerca dei dati ...riportati nelle tabelle.
io ho una maschera con 4 caselle di testo e 2 bottoni


casellaA[Film.titolo] casellaB[Genere.Genere1]

casellaC[Film.Anno] casellaD[Regista.Regia]


bottone[CercaFilm] bottone[chiudiricerca]


vorrei proprio capire come fare una query basata su i dati che scrivo nelle caselle di testo.


Un altra cosa...
sempre con lo stesso modello , al posto di fare una ricerca vorrei aggiungere i dati scritti in quelle caselle.
Dico subito grazie a chi mi dà una mano
se non mi sono spiegato bene , mi spiego meglio

[Holidaysoft.it]

Mik

Scusa, avevo risposto nell'altro topic sotto database

Ciao,
ipotizzando le seguenti tabelle per il tuo gestionale film:



la query per estrarre tutti i dati è questa:

SELECT TB_FILM.ID_FILM, TB_FILM.[NOME FILM], TB_GENERE.GENERE, TB_REGIA.REGIA
FROM TB_LINK, TB_FILM, TB_GENERE, TB_REGIA
WHERE TB_LINK.ID_FILM = TB_FILM.ID_FILM
AND TB_LINK.ID_GENERE = TB_GENERE.ID_GENERE
AND TB_LINK.ID_REGIA = TB_REGIA.ID_REGIA

invece per filtrare i dati in modo da gestire la valorizzazione di tutti i filtri o alcuni, dovresti creare la query in modo dinamico tramite vba. Es:

V_STRSQL = "  SELECT TB_FILM.ID_FILM, TB_FILM.[NOME FILM], TB_GENERE.GENERE, TB_REGIA.REGIA"
V_STRSQL = V_STRSQL & "  FROM TB_LINK, TB_FILM, TB_GENERE, TB_REGIA"
V_STRSQL = V_STRSQL & "  WHERE TB_LINK.ID_FILM = TB_FILM.ID_FILM"
V_STRSQL = V_STRSQL & "  AND TB_LINK.ID_GENERE = TB_GENERE.ID_GENERE"
V_STRSQL = V_STRSQL & "  AND TB_LINK.ID_REGIA = TB_REGIA.ID_REGIA"

If V_NOME_FILM_FILTER <> "" Then
    V_STRSQL = V_STRSQL & "  AND  TB_FILM.[NOME FILM]='" & V_NOME_FILM_FILTER & "'"
End If

If V_GENERE_FILTER <> "" Then
    V_STRSQL = V_STRSQL & "  AND  TB_GENERE.GENERE='" & V_GENERE_FILTER & "'"
End If

If V_REGIA_FILTER <> "" Then
    V_STRSQL = V_STRSQL & "  AND  TB_REGIA.REGIA='" & V_REGIA_FILTER & "'"
End If

Prova a vedere se è il tuo caso
Ciao

[Markz345]

Originariamente inviato da Holidaysoft.it
Mik

Ciao,
ipotizzando le seguenti tabelle per il tuo gestionale film:



la query per estrarre tutti i dati è questa:

SELECT TB_FILM.ID_FILM, TB_FILM.[NOME FILM], TB_GENERE.GENERE, TB_REGIA.REGIA
FROM TB_LINK, TB_FILM, TB_GENERE, TB_REGIA
WHERE TB_LINK.ID_FILM = TB_FILM.ID_FILM
AND TB_LINK.ID_GENERE = TB_GENERE.ID_GENERE
AND TB_LINK.ID_REGIA = TB_REGIA.ID_REGIA

invece per filtrare i dati in modo da gestire la valorizzazione di tutti i filtri o alcuni, dovresti creare la query in modo dinamico tramite vba. Es:

V_STRSQL = "  SELECT TB_FILM.ID_FILM, TB_FILM.[NOME FILM], TB_GENERE.GENERE, TB_REGIA.REGIA"
V_STRSQL = V_STRSQL & "  FROM TB_LINK, TB_FILM, TB_GENERE, TB_REGIA"
V_STRSQL = V_STRSQL & "  WHERE TB_LINK.ID_FILM = TB_FILM.ID_FILM"
V_STRSQL = V_STRSQL & "  AND TB_LINK.ID_GENERE = TB_GENERE.ID_GENERE"
V_STRSQL = V_STRSQL & "  AND TB_LINK.ID_REGIA = TB_REGIA.ID_REGIA"

If V_NOME_FILM_FILTER <> "" Then
    V_STRSQL = V_STRSQL & "  AND  TB_FILM.[NOME FILM]='" & V_NOME_FILM_FILTER & "'"
End If

If V_GENERE_FILTER <> "" Then
    V_STRSQL = V_STRSQL & "  AND  TB_GENERE.GENERE='" & V_GENERE_FILTER & "'"
End If

If V_REGIA_FILTER <> "" Then
    V_STRSQL = V_STRSQL & "  AND  TB_REGIA.REGIA='" & V_REGIA_FILTER & "'"
End If

Prova a vedere se è il tuo caso
Ciao

Grazie lo proverò in questi giorni , ti faccio sapere