Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - ~ Yoya ~

#701
Foro Libre / Re: cuidando el cuerpo...
23 Agosto 2010, 01:29 AM
Comer mas y en menor cantidad...

La dieta aveces no ayudas de mucho, en el primer mes bajas 5kilos, el segundo subes 10 kilos...



Recuerda que, si produces mas calorías que la que quemas, seguirás siempre engordando. En cambio si quemas mas colorías que la que produces, tu cuerpo tomara del tejido muscular de tu cuerpo y por lo tanto rebajaras.

Mas o menos eso fue lo que escuche en un programa de TV y es muy lógico...

Pd: Lo escuche hace algunos meses, disculparme si no me refiero bien en algunas palabras.
#702
jajaja, las comas ya son otro tema...
#703
No entiendo a que te refieres con la coma final...

el signo de interrogación ?, sirve para indicar que algo puede aparecer máximo una sola vez...
#704
Bueno, aunque leo dio una respuesta, ps detallo un poco mas.

Tu error esta aqui.
http://(.+)\net
Estas indicando que existe una nueva linea y por lo tanto siempre la expresión fallara...

Nose porque usas los paréntesis, ya que no capturas nada....
Código (python) [Seleccionar]
#!/usr/bin/python
import re
while True:
  palabra = raw_input("Introduce tu expresion para ver si coincide:\n");
  if re.match("http://\w+?\.?\w+\.?[net|com|org]", palabra):
     print "Cierto"
  else:
     print "Falso"

Acepto http://www.google.net, http://google.net, http://www.google.com, etc...
#705
Ejemplo:

Código (php) [Seleccionar]
<?php
for($i=0;$i<=10;$i++){
$valor[] = $i;
}
foreach(
$valor as $result){
echo 
$result;
}
?>

Salida:
012345678910
Lee sobre Arrays en PHP, es mejor saber lo que haces para no liarte mas....
#706
Bueno, ando en mi macbook y es un poco incomodo responder esto tipos de temas, prefiero hacerlo en Linux, ya que testeo directamente....


Citartengo un problema,resulta que esto solo me funciona con el ultimo registro de la tabla
Código (php) [Seleccionar]
  while($sRow = mysql_fetch_array($sQuery)){
    $sCategoria = $sRow['id'];
  }


Ese es tu problema, se ejecuta el primer ciclo del bucle while(), y a la variable $sCategoria se le da el valor del primer registro de la columna id de la tabla Categorias, luego entra el segundo ciclo y se le da el valor a la variable $sCategoria el valor del segundo registro del campo id, osea el valor anterior se cambia por este nuevo y al final la variable $sCategoria contendra un solo valor, que seria el ultimo registro.

Lo que puedes hacer es almacenar todos los valores en un Array, asi que cada registro sera parte del array.

Ejemplo de lo que haces, aver si entiendes:
Código (php) [Seleccionar]
<?php
for($i=0;$i<=10;$i++){
$valor $i;
}
echo 
$valor;
?>

Salida:
10

Código (php) [Seleccionar]

      $incluir = $sCategoria.'.php';

Esto me acordó a Null Byte Injection, es vulnerable a LFI, pero seria necesario ingresar el PATH del archivo a la columna ID xD.
#707
El error debe estar en:

  • La conexión hacia la Base De Datos
  • La selección de la base de datos
  • La consulta SQL

Trata de usar la función mysql_error(), para que sepas donde se encuentra el error.
#708
PHP / Re: Bloquear pagina con php
17 Agosto 2010, 01:35 AM
la sentencia if() esta mal creada. Usa la función exit() para finalizar el script.
Código (php) [Seleccionar]
<?php
$saludo 
$_COOKIE['pass']; 
if(!isset(
$_COOKIE['pass'])){
echo 
'esta zona es para usuarios con contraseña';
exit;
//Finalizo el script
?>
#709
poner el source completo, incluido el de la conexion hacia la BD
#710
Scripting / Re: Scritp Perl para borrar archivos
16 Agosto 2010, 05:21 AM
Te voy comentando cada linea, si no sabes "NADA" de perl sera un problema xD.
Código (perl) [Seleccionar]
#!/usr/bin/perl
use strict;

my $directorio = '/home/yoya/Escritorio'; #Directorio

my $dir = search_backup($directorio);#Almaceno los resultado de la funcion en la variable $dir
my @archivos = split(" ",$dir);#Divido la cadena y los guardo en un arreglo
foreach my $archivos(@archivos){#Recorro el arreglo
my $path = $directorio."/".$archivos;#Path completo del archivo

my $file_time = (stat($path))[9];#Obtengo la fecha de la ultima modificacion del archivo


my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime($file_time);
my ($sec1,$min1,$hour1,$mday1,$mon1,$year1,$wday1,$yda1y,$isdst1) = localtime(time);

#Si el mes de la ultima modificacion es mayor que el mes actual y el dia de la creacion del archivo
#es mayor al dia actual, se ejecuta el if
if($mon1 > $mon && $mday1 >= $mday || $mon1 > $mon-1){
print "$path ah sido borrado\n";
unlink($path);#Se borra el backup con un mes de antiguedad

}#Fin del if()

}#Fin del bucle foreach()




#Funcion para buscar archivos dentro de un directorio
sub search_backup(){
opendir(DIR, $_[0]) || die "Error al abrir $_[0]\n";#Intentamos abrir el directorio

my $result;
while((my $archivos = readdir(DIR))){#Leemos el directorio

if($archivos !~ m/\.sql$/ig){#Si la extensión no es .sql se ejecuta el if
next;#Pasamos al siguiente ciclo
}#Fin del if
$result .= "$archivos ";#Vamos agregando cada resultado de cada ciclo a la variable $result
}#Fin del bucle while()

return $result; #Retornamo los directorios
}#Fin de la funcion

exit;