Problema con while y fechas

[tatoman]

Buenos dias a todos.

Estoy intentando hacer un while siguiendo la condicion que 2 fechas no sean iguales. Para ello creo 3 variables, que serian 2 fechas introducidas en un form y una temporal que va sumando 1 dia en el bucle a la fecha1 hasta que llega al valor de la fecha 2:

Pongamos
fecha1= 01/08/2010
Fecha2=10/08/2010

<%
Dim fecha1, fecha2, fecha_temporal
fecha1 = request.form("fecha_1")
fecha2 = request.form("fecha_2")
fecha_temporal = fecha1

while fecha2 <> fecha_temporal

Fecha_Control = dateadd("d",1,Fecha_Control)
Response.Write(Fecha_Control)

wend

Pero me produce un problema en el bucle:
Invalid procedure call or argument: 'dateadd'

Si elimino el bucle escriber correctamente 1 vez 02/08/2010 lo que quiere decir que si suma 1 dia a la fecha

Tambien he probado directamente con
fecha_temporal = fecha_temporal + 1

pero me aparece un fallo de:
Microsoft VBScript runtime (0x800A000D)
Type mismatch:...

¿Me podeis ayudar?

1000 thnks