Discussione:
criterio OR
(troppo vecchio per rispondere)
Phoenix Coop
2021-10-27 15:40:05 UTC
Permalink
Buonasera a tutti.
E' da stamattina che ci provo ma quando modifico da SQL a Vba non funziona.
Ho questa riga funzionate:
("SELECT tblAutomezzoAssegnazioni.IdAutomezzoAssegnazione, tblAutomezzoAssegnazioni.IdAutomezzo, tblAutomezzoAssegnazioni.IdStruttura, tblAutomezzoAssegnazioni.DataFine, tblUtenteAutorizzazioni.IDUtente FROM tblAutomezzi INNER JOIN (tblUtenteAutorizzazioni INNER JOIN tblAutomezzoAssegnazioni ON tblUtenteAutorizzazioni.IdAutorizzazioneOggetto = tblAutomezzoAssegnazioni.IdStruttura) ON tblAutomezzi.IDAutomezzo = tblAutomezzoAssegnazioni.IdAutomezzo GROUP BY tblAutomezzoAssegnazioni.IdAutomezzoAssegnazione, tblAutomezzoAssegnazioni.IdAutomezzo, tblAutomezzoAssegnazioni.IdStruttura, tblAutomezzoAssegnazioni.DataFine, tblUtenteAutorizzazioni.IDUtente HAVING (((tblAutomezzoAssegnazioni.DataFine) Is Null) AND ((tblUtenteAutorizzazioni.IDUtente)=1 Or (tblUtenteAutorizzazioni.IDUtente)=2))")
che devo cambiare sostituendo all'ultimo rigo il 2 con la variabile lngIDUtente.
Sostituendo il 2 con " & lngIdUtente come vanno messe le virgolette ?
Grazie.
Giuseppe
Phoenix Coop
2021-11-09 17:53:54 UTC
Permalink
Post by Phoenix Coop
Buonasera a tutti.
E' da stamattina che ci provo ma quando modifico da SQL a Vba non funziona.
("SELECT tblAutomezzoAssegnazioni.IdAutomezzoAssegnazione,
tblAutomezzoAssegnazioni.IdAutomezzo, tblAutomezzoAssegnazioni.IdStruttura,
tblAutomezzoAssegnazioni.DataFine, tblUtenteAutorizzazioni.IDUtente FROM
tblAutomezzi INNER JOIN (tblUtenteAutorizzazioni INNER JOIN
tblAutomezzoAssegnazioni ON tblUtenteAutorizzazioni.IdAutorizzazioneOggetto =
tblAutomezzoAssegnazioni.IdStruttura) ON tblAutomezzi.IDAutomezzo =
tblAutomezzoAssegnazioni.IdAutomezzo GROUP BY
tblAutomezzoAssegnazioni.IdAutomezzoAssegnazione,
tblAutomezzoAssegnazioni.IdAutomezzo, tblAutomezzoAssegnazioni.IdStruttura,
tblAutomezzoAssegnazioni.DataFine, tblUtenteAutorizzazioni.IDUtente HAVING
(((tblAutomezzoAssegnazioni.DataFine) Is Null) AND
((tblUtenteAutorizzazioni.IDUtente)=1 Or
(tblUtenteAutorizzazioni.IDUtente)=2))") che devo cambiare sostituendo
all'ultimo rigo il 2 con la variabile lngIDUtente. Sostituendo il 2 con " &
lngIdUtente come vanno messe le virgolette ? Grazie. Giuseppe
.IDUtente)=" & lngIdUtente & "))")
Dovrebbe finire così, ma senza poter provare...
Bruno
Perfetto.
Grazie Bruno.

Continua a leggere su narkive:
Loading...