Estação do Ano atual

Pessoal, estou tentando fazer um script que mostre a estação do ano atual no wikipedia diz o seguinte

Dia 21 de dezembro - Início do verãoDia 21 de março - Início do outono

Dia 21 de junho - Início do inverno

Dia 21 de setembro - Início da primavera

Sendo assim

Verão - começa 21/12 termina 21/03

Outono - começa 21/03 termina 21/06

Inverno - começa 21/06 termina 21/09

Primavera - começa 21/09 termina 21/12

Desta forma estou tenando montar um uma função em asp que mostre a estação do ano de acordo com a data especificada, montei o seguinte...

Function Estacao(vData)
d = day(vData)
m = month(vData)
if d>21 and m=12 or d<21 and m=03 then Estacao = "Verão"
if d>21 and m=03 or d<21 and m=06 then Estacao = "Outono"
if d>21 and m=06 or d<21 and m=09 then Estacao = "Inverno"
if d>21 and m=09 or d<21 and m=12 then Estacao = "Primavera"
Response.Write Estacao
End function

E chamo da seguinte maneira

<% Estacao(date()) %>

Massssss não ta indo, não exibe nenhum valor, tenho certeza que o erro esta na montagem, porém não to encontrando aonde estou falhando.

Se alguém puder me da um help!

Valew.