data referente a tds os dias da semana corrente

[filipefurriel 0]

Gente eu toh pensando aqui como eu poderia fazer uma tabela que imprimisse as datas da semana referente ao dia da semama....por exe....

 

seg - 30/08

ter - 31/08

qua - 01/09

qui - 02/09

--- - 03/09

sab - 04/09

dom - 05/09

 

sendo que ... como ele imprimiria a data refrente a seg se por exe hj fosse quarta..entaum pensei em fazer da seguinte forma...se for determinado dia da semana, entaum diminue tanto da data ou soma tanto da data....ficou assim...

 

<%	  sabedia = day(now)sabesemana = weekday(now)if sabesemana = 1 thenenviadia = sabedia - 6end ifif sabesemana = 2 thenenviadia = sabediaend ifif sabesemana = 3 thenenviadia = sabedia - 1end ifif sabesemana = 4 thenenviadia = sabedia - 2end ifif sabesemana = 5 thenenviadia = sabedia - 3end ifif sabesemana = 6 thenenviadia = sabedia - 4end ifif sabesemana = 7 thenenviadia = sabedia - 5end if	  mes = month(now)dia= enviadiadia2= dia + 1 dia3= dia2 + 1dia4= dia3 + 1dia5= dia4 + 1dia6= dia5 + 1dia7= dia6 + 1if mes= 1 or 3 or 5 or 7 or 8 or 10 or 12 then				if dia=31 then				dia2= 1 				dia3= dia2 + 1				  dia4= dia3 + 1				  dia5= dia4 + 1				  dia6= dia5 + 1				  dia7= dia6 + 1				end if								if dia2=31 then				dia3= 1 				dia4= dia3 + 1				  dia5= dia4 + 1				  dia6= dia5 + 1				  dia7= dia6 + 1				end if								if dia3=31 then				dia4= 1 				dia5= dia4 + 1				  dia6= dia5 + 1				  dia7= dia6 + 1				end if								if dia4=31 then				dia5= 1 				dia6= dia5 + 1				  dia7= dia6 + 1				end if								if dia5=31 then				dia6= 1 				dia7= dia6 + 1				end if								if dia6=31 then				dia7= 1 				dia= dia7 + 1				end if				else									if mes= 2 then				if dia=29 then				dia2= 1 				dia3= dia2 + 1				  dia4= dia3 + 1				  dia5= dia4 + 1				  dia6= dia5 + 1				  dia7= dia6 + 1				end if								if dia2=29 then				dia3= 1 				dia4= dia3 + 1				  dia5= dia4 + 1				  dia6= dia5 + 1				  dia7= dia6 + 1				end if								if dia3=29 then				dia4= 1 				dia5= dia4 + 1				  dia6= dia5 + 1				  dia7= dia6 + 1				end if								if dia4=29 then				dia5= 1 				dia6= dia5 + 1				  dia7= dia6 + 1				end if								if dia5=29 then				dia6= 1 				dia7= dia6 + 1				end if								if dia6=29 then				dia7= 1 				dia= dia7 + 1				end if			else				if dia=30 then				dia2= 1 				dia3= dia2 + 1				  dia4= dia3 + 1				  dia5= dia4 + 1				  dia6= dia5 + 1				  dia7= dia6 + 1				end if								if dia2=30 then				dia3= 1 				dia4= dia3 + 1				  dia5= dia4 + 1				  dia6= dia5 + 1				  dia7= dia6 + 1				end if								if dia3=30 then				dia4= 1 				dia5= dia4 + 1				  dia6= dia5 + 1				  dia7= dia6 + 1				end if								if dia4=30 then				dia5= 1 				dia6= dia5 + 1				  dia7= dia6 + 1				end if								if dia5=30 then				dia6= 1 				dia7= dia6 + 1				end if								if dia6=30 then				dia7= 1 				dia= dia7 + 1				end if							end if					end if%>

sendo que o problema é que ele imprimi 0 e números negativos dependendo da data testada...serah que eh mais fácil fazer o mesmo processo com case....de que forma eu poderia fazer com case....ou implementar nessa estruturas objetivando um melhor resultado.....

vwl glr...

[jrcardozo 4]

veja se ajuda

http://forum.imasters.com.br/index.php?showtopic=193846