VB Code:
SQL = _
"select" & _
" Sum(IIF(dt_morte1 Is Null or dt_morte1='', 0, 1) ) as total1, " & _
" Sum(IIF(dt_morte2 Is Null or dt_morte2='', 0, 1) ) as total2, " & _
" Sum(IIF(dt_morte3 Is Null or dt_morte3='', 0, 1) ) as total3, " & _
" Sum(IIF(dt_morte4 Is Null or dt_morte4='', 0, 1) ) as total4, " & _
" Sum(IIF(dt_morte5 Is Null or dt_morte5='', 0, 1) ) as total5, " & _
" Sum(IIF(dt_morte6 Is Null or dt_morte6='', 0, 1) ) as total6, " & _
" Sum(IIF(dt_morte7 Is Null or dt_morte7='', 0, 1) ) as total7, " & _
" Sum(IIF(dt_morte8 Is Null or dt_morte8='', 0, 1) ) as total8 " & _
" from " & ano & _
" WHERE especie = 'especie'" & _
" And [COLOR=Red]([/COLOR]dt_morte1 = 'Goro'" & _
" Or dt_morte2 = 'Goro'" & _
" Or dt_morte3 = 'Goro'" & _
" Or dt_morte4 = 'Goro'" & _
" Or dt_morte5 = 'Goro'" & _
" Or dt_morte6 = 'Goro'" & _
" Or dt_morte7 = 'Goro'" & _
" Or dt_morte8 = 'Goro'[COLOR=Red])[/COLOR]"