|
|
|
|
|
|
|
|
Dicas
|
|
|
ASP - Active Server Page (Miscelâneas)
|
|
 |
Título da Dica: Pegar ultimo dia util do mes
|
 |
|
|
|
Postada em 30/1/2004 por messohal
Function UDU(Mes,Ano)
Data = DateSerial(Ano,Mes,01)
Data = DateAdd("m",1,Data)
Data = DateAdd("d",-1,Data)
Until WeekDay(Data)>=2 And WeekDay(Data)<=6
Data = DateAdd("d",-1,Data)
Loop
UDU = Data
End Function
|
|
|
|
|
