Hola que tal tengo el siguiente problema
Nececito generar una tabla en la cual tengo que colocar nombre del dia dada una fecha determinada por el usuario. El problema que tengo es a la hora de generar la fecha cuando a las fechas son de 2 meses distintos por ejemplo un reporte que va desde el15/11/2010 al 17/12/2010, el problema esta a la hora de sacar los nombres de los dias correspondientes al mes de diciembre he intentado lo siguiente:
Código ASP:
Ver original<%funcion para obtener el nombre del dia
function nomdia(fecha)
if left(fecha,5)="32/01" or left(fecha,5)="32/03" or left(fecha,5)="32/05" or left(fecha,5)="32/07" or left(fecha,5)="32/08" or left(fecha,5)="32/10" then
m2=mid(fecha,4,2)+1
y=right(fecha,4)
fechaa="01/"&m2&"/"&y
elseif left(fechaa,5)="31/04" or left(fechaa,5)="31/06" or left(fechaa,5)="31/09" or left(fechaa,5)="31/11"then
m2=mid(fecha,4,2)+1
y=right(fecha,4)
fechaa="01/"&m2&"/"&y
elseif left(fechaa,5)="29/02" then
m2=mid(fecha,4,2)+1
y=right(fecha,4)
fechaa="01/"&m2&"/"&y
elseif left(fechaa,5)="32/12" then
m2=mid(fecha,4,2)+1
y2=right(fecha,4)+1
fechaa="01/"&m2&"/"&y2
end if
response.Write(fecha)
nomdia= weekdayname(weekday(fecha))
end function
%>
<%
'parte en la que se genera la tabla
while diac<=dias
fechaa=d1&"/"&m&"/"&y
if left(fechaa,5)="32/01" or left(fechaa,5)="32/03" or left(fechaa,5)="32/05" or left(fechaa,5)="32/07" or left(fechaa,5)="32/08" or left(fechaa,5)="32/10" then
d1=1
elseif left(fechaa,5)="31/04" or left(fechaa,5)="31/06" or left(fechaa,5)="31/09" or left(fechaa,5)="31/11"then
d1=1
elseif left(fechaa,5)="29/02" then
d1=1
elseif left(fechaa,5)="32/12" then
d1=1
end if
%>
<td width="2%"><div align="center"><strong><%=d1%><br><%=nomdia(fechaa)%> </strong></div></td>
<%
d1=d1+1
diac=diac+1
wend
%>