Dato frem og tilbage

Jeg skal ha lavet en nem lille ting hvor man kan springe frem og tilbage i datoer, men jeg gør et eller andet helt forkert ?

Her er den del af min kode
<%

   
    session("TmpDato") = request.QueryString("tp")

    If session("TmpDato") = "" Then
       
      TmpDato = date
       
        Else
       
        TmpDato = Session("TmpDato")
       
    End If
%>

<form id="form1" name="form1" method="post" action="">
<table width="852" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="320" height="18" align="left" valign="top"><a href="forside.asp?tp=<% =TmpDato-1 %>" > << tilbage</a></td>
<td width="197" valign="top">
      <%
        response.write TmpDato
   
    %></td>
<td align="right"><a href="forside.asp?tp=<% =TmpDato+1 %>">Frem >></a></td>
</tr>
</table>