Ciao, prova questo script:

<%
inizio_mese = CDate("01/02/2003")
fine_mese = DateAdd("d",-1,"01/03/2003")
while WeekDay(inizio_mese) <> 2
inizio_mese = DateAdd("d",1,inizio_mese)
wend
Response.write "La settimana inizia il " & inizio_mese & "<br>"
settimane = Int((Day(fine_mese) - Day(inizio_mese))/7)+1
Response.write "Questo mese ha " & settimane & " settimane"
%>

la prima parte determina in che giorno del mese capita il primo lunedi. Nel caso di febbraio come hai detto tu, il giorno è il 3/2/2003.
La funzione weekday restituisce un numero intero a seconda del giorno della settimana: da 1 (domenica) a 7 (sabato).
Per determinare il numero di settimane devi quindi fare ((28 - 3)/7)+1
Cioè i giorni del mese meno il numero del primo lunedi fratto 7.
Se sostituisci i valori delle variabili inizio_mese e fine_mese con:

inizio_mese = CDate("01/03/2003")
fine_mese = DateAdd("d",-1,"01/04/2003")

vedrai che ti da come risultato 5 settimane per il mese di marzo

<%
giorno = 01
meseincorso = month(date())
annoincorso = year(date())
inizio_mese = CDate(giorno&"/"&meseincorso&"/"&annoincorso)

'inizio_mese = CDate("01/04/2003")
'fine_mese = DateAdd("d",-1,"01/05/2003")

fm = DateAdd("m",1,inizio_mese)
fine_mese = DateAdd("d",-1,fm)

while WeekDay(inizio_mese) <> 2
inizio_mese = DateAdd("d",1,inizio_mese)
wend
Response.write "La settimana inizia il " & inizio_mese & "<br>"
settimane = Int((Day(fine_mese) - Day(inizio_mese))/7)+1
Response.write "Questo mese ha " & settimane & " settimane"

GapTraOggieLunedi = weekday(inizio_mese)-2

lunedi=inizio_mese-GapTraOggieLunedi
domenica = lunedi+6
'response.write ("OGGI= " & date & "<br>LUNEDI= " & lunedi & "<br>DOMENICA=" & domenica)
For I = 1 to settimane
if I = 1 Then
lunedi = lunedi
domenica = domenica
'response.write ("La " & I & "° settimana<br>LUNEDI= " & lunedi & "<br>DOMENICA=" & domenica)
else
lunedi = DateAdd("d",7,lunedi)
domenica = DateAdd("d",7,domenica)
'response.write ("La "&I&"° settimana<br>LUNEDI= " & lunedi & "<br>DOMENICA=" & domenica)
end if
response.write ("<br>La "&I&"° settimana<br>LUNEDI= " & lunedi & "<br>DOMENICA=" & domenica)
next
%>

questo è il codice come l'ho modificato per i miei scopi ( magari a qualcun altro può servire)
Volevo chiederti un altra cosa posso eseguire una select chiedendo di sommare il contenuto dedi campi value?
(credo che la select che faccia la somma si può fare l'ho letto su un libro di sql, ma siccome non è un buon libro accenna è basta, potresti postarmi la sintassi?)
grazie

Ciao brightsoul , ho trovato la query sul forum in un vecchio tread ora la provo.....
grazie ancora e buona serata