Ciao a tutti,
ho uno scritp che visualizza un calendario. Vorrei che si evidenzino i giorni di questo calendario quando la data corrisponde alla data di una notizia presente in un db access.

Poi andrò a recupererei l'id della notizia e cliccando sul numerino del giorno mi si aprirà la pagina col dettaglio della notizia.

Come posso fare per la prima parte?

codice:
<style type="text/css">
span {font: bold 8pt Verdana,Arial;}
select {font: 8px Verdana,Arial;}
td {font: 7pt Verdana,Arial; width:12px; height:12px; padding: 0px; }
.giorni { font: bold; color:#ffffff; background: #660000; text-align:center}
.normale {color: #990000; background: #fff9f9;}
.oggi { font: bold; color: #990000; background: #ffffff; border: 1px solid #660000}
.attivo { font: bold; color: #ffffff; background: #990000; }
.vuoto { background: #ffffff; }
a {color: #990000; text-decoration:none;}
</style>

<%
nomi_mesi=",Gennaio,Febbraio,Marzo,Aprile,Maggio,Giugno,Luglio,Agosto,Settembre,Ottobre,Novembre,Dicembre"
array_mesi=split(nomi_mesi,",")
nomi_giorni=",Lu,Ma,Me,Gi,Ve,Sa,Do"
array_giorni=split(nomi_giorni,",")

giorno_ora = day(date)
mese_ora = month(date)
anno_ora = year(date)
%>

<%
giorno_attivo = request("gg")
if giorno_attivo <>"" then
   giorno_attivo = cInt(request("gg"))
end if

mese_attivo = request("mm")
if mese_attivo ="" then
   mese_attivo = mese_ora
else
   mese_attivo = cInt(request("mm"))
end if

anno_attivo = request("aaaa")
if anno_attivo ="" then
   anno_attivo = anno_ora
else
   anno_attivo = cInt(request("aaaa"))
end if

'creo la data iniziale del mese

corrente= "01/"& mese_attivo &"/"& anno_attivo
'corrente= mese_attivo & "/01/" & anno_attivo
%>

<span>
 <%=array_mesi(mese_attivo)%>   <%=anno_attivo%>
</span>
<table cellpadding="1" cellspacing="0" bgcolor="#ffffff"> <%
Response.Write("<tr>")
for i = 1 to 7
  Response.Write "<td class='giorni'>"&array_giorni(i)&"</td>"
next
  Response.Write("</tr>")
conta_gg = 1
for settimana=1 to 6
 Response.Write("<tr>")
 for indice = 1 to 7
  if indice=Datepart("w",corrente,2)  then
   Response.Write("<td class='vuoto'> </td>")
  else
   if mese_attivo=Month(corrente) then
    
	if conta_gg=giorno_ora and mese_attivo=mese_ora and anno_attivo=anno_ora then %>
     <td class='oggi'><%=conta_gg%></td> <%
    elseif conta_gg = giorno_attivo then %>
     <td class='attivo'><%=conta_gg%></td> <%
    else %>
     <td class="normale"><%=conta_gg%></td> <%
    end if

    corrente=dateadd("d",1,corrente)
    conta_gg=conta_gg+1
   else
    settimana=6
   end if
  end if
 next
 Response.Write("</tr>")
next %>
</table>
grazie