Add date og vis billedet

Hej

Jeg har et spørgsmål omkring add date og få en scriptet til at gøre noget hvis en dato er overskrevet.

Det er sNewDatePSA som er problemet. Hvis sNewDatePSA er =< skal den gå videre til næste og vise et billede, men der sker ikke noget. Det er denne del som jeg tror det går galt -

if Session("SNewDatePSA").Value =< date

Håber Ikan hjælpe her :-)
-----------------------------------------------
            <% if rsErsendtpsa.Fields.Item("delleveringsdatopsa").Value <> "" then ' Adv Conditional Region %>
                      <% If rsErsendtpsa.Fields.Item("landID").Value =1 Then %>
                      <%
  sDatePSA = (rsErsendtpsa.Fields.Item("delleveringsdatopsa").Value)
  sNewDatePSA = DateAdd("d", 1, sDatePSA)
  sMonthNextPSA = Monthname(Month(sNewDatePSA))
 
%>
                      <% Else %>
                      <%
  sDatePSA = (rsErsendtpsa.Fields.Item("delleveringsdatopsa").Value)
  sNewDatePSA = DateAdd("d", 4, sDatePSA)
  sMonthNextPSA = Monthname(Month(sNewDatePSA))

%>
   
           
<%    if Session("SNewDatePSA").Value =< date AND rsErsendtpsa.Fields.Item("delpavejhjem").Value =True Then  %>
                <img src="../gfx/pakke25_25.png" alt="Del på vej hjem fra PSA, tjek Astro hvor langt delen er nået" name="pakkePSA" width="25" height="25" border="0" id="pakkePSA" title="Del på vej hjem fra PSA, tjek Astro hvor langt delen er nået" />
               
                      <% else %>
                          <% end if %>
                      <% end if %>
                     
                      <% end if %>