Ciao e grazie ancora del tuo aiuto,
il codice è questo
codice:
sSql = ""
sSql = sSql & "SELECT *" & vbCrLf
sSql = sSql & "FROM Gest_rapp" & vbCrLf
sSql = sSql & "WHERE data >= '" & da & "' AND "
sSql = sSql & "data <= '" & a & "' OR "
sSql = sSql & "(Tipo_lavoro = '" & cbo_tip.Text & "' OR Tipo_lavoro IS NULL) OR "
sSql = sSql & "(N_rapp = '" & cbo_num(0).Text & "' OR N_rapp IS NULL) OR "
sSql = sSql & "(Cliente = '" & cbo_cli(0).Text & "' OR N_rapp IS NULL) "
If ty_ute <> "Amministratore" Then
sSql = sSql & "AND id_ute = " & ute
End If
fammi sapere