codice:
<% data = "03/08/2005"

     gg_ = Left(data,2)
     mm_ = Mid(data,4,2)
     aaaa_ = Right(data,4)

%>
            <select name="gg">
              <% for i = 1 to 31
                   if i < 10 then i = 0 & i  end if %>
                      <option value="<%= i %>"  <% if CInt(i) = CInt(gg_) then response.Write("selected") end if %>><%= i %></option>
              <% Next %>
            </select>
            <select name="mm">
              <% for g = 1 to 12
                   if g < 10 then g = 0 & g end if %>
                       <option value="<%= g %>"  <% if CInt(g) = CInt(mm_) then response.Write("selected") end if %>><%= g %></option>
              <% Next %>
            </select>
            <select name="aaaa">
              <% for h = 2004 to 2010 %>
                   <option value="<%= h %>"  <% if CInt(h) = CInt(aaaa_) then response.Write("selected") end if %>><%= h %></option>
              <% Next %>
            </select>
prova così...a me funziona...ho prvato con un po' di date