Select Case dtTemp Case CampFrom To CampTo '-- Case dtTemp < CampFrom ' Case dtTemp > CampTo GoTo nextt End Select
http://www.sql.ru/forum/1072892/sravnenie-korotkogo-i-dlinnogo-formata-daty