int GetYearWeek()
{
time_t to,tf;
tm * Fecha,*Fecha1;
unsigned int Week;
tf=time(0); //fecha actual
Fecha=gmtime(&tf);
Fecha1=gmtime(&tf);
Fecha1->tm_hour=0;
Fecha1->tm_min=0;
Fecha1->tm_sec=0;
Fecha1->tm_mon=0;
Fecha1->tm_mday=1;
Fecha1->tm_yday=0;
to=mktime(Fecha); //dia 1 de enero de este año
to-=Fecha1->tm_wday*24*60*60; //ajustamos el t segun el dia que sea el 1
Fecha1=gmtime(&to);
tf-=to; //segundos desde la semana del 1
tf/=3600; //horas desde semana del 1
tf/=24; //dias desde semana del 1
if (Fecha->tm_year%4==0) tf++; //es bisiesto?
tf/=7; //semanas
Week= (unsigned int)tf+1; //ajusto de 0 -> 1
return Week;
}