Autor Tema: Re: obtener la hora del sistema (Leído 8614 veces)

yamilita · « **en:** Domingo 3 de Noviembre de 2002, 01:56 »

me urge saber como obtengo la fecha del sistema en una variable para luego guardala en una bd para guardar la fecha de algun evento...
espero me ayuden por favor...
me urge

Avalon

Utiliza la función localtime

($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);

Los valores obtenidos son, por este orden:

- segundos
- minutos
- horas
- dia del mes
- mes (retorna un valor del 0 al 11)
- año (retorna los años transcurridos desde 1900, de manera que en el año 2002 retorna 102)
- dia de la semana (retorna un valor del 0 al 6, siendo 0 el domingo y 6 el sábado)
- dia del año (retorna un valor entre 1 y 366)
- Daylight Saving Time (retorna 0 o 1, dependiendo del momento del año en que nos encontremos)

Espero que te sirva.

Salu2,
Avalon

yamilita

si me sirve de muuuucho, lo unico es q a la hora q yo necesito meterlo a la bd, pues, es un solo campo el de fecha, entonces, estas variables q me dices estan separadas...
como las junto? las concateno o que?
es q no se:(

si me pudieran ayudar please...

saludos

Avalon

Dependerá del formato del campo fecha que tengas en la BD. Si por ejemplo tiene el formato dd/mm/aaaa (dia/mes/año) pués tendrías que hacer algo como:

Código: Text

 
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
 
$mon++;
$year += 1900;
 
if ($mday < 10) {
    $mday = "0" . $mday;
}
if ($mon < 10) {
    $mon = "0" . $mon;
}
 
$fecha = $mday . "/" . $mon . "/" . $year;
 
 

Salu2,
Avalon

explorer

Con el sprintf, que es como si pintaras, pero en vez de pantalla, a una variable:

Código: Text

my (&#036;sec,&#036;min,&#036;hour,&#036;mday,&#036;mon,&#036;year,&#036;wday,&#036;yday,&#036;isdst) = localtime(time);
 
&#036;mon++;
&#036;year += 1900;
 
my &#036;fecha = sprintf &#34;%04d/%02d/%02d %02d:%02d&#34;,
    &#036;year, &#036;mon, &#036;mday, &#036;hour, &#036;min;
 

Aunque siempre es mejor usar el módulo DateTime...

Código: Text

&#62; perl -le 'use DateTime; print DateTime-&#62;now-&#62;ymd(&#34;/&#34;)'
2006/07/09
 

su - · Citar Noviembre 03, 2002 12:56 am Report Post

Citar

Noviembre 03, 2002 12:56 am
Report Post