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 - WHK

#3031
PHP / Re: Ocultar celdas de tablas con PHP
14 Enero 2011, 05:12 AM
yo uso ! de plano y me ahorro las funciones

Código (php) [Seleccionar]
if($filas_resultados = mysql_fetch_assoc($resultados)))
echo 'ok';
else
echo 'error';


mysql_fetch_* debuelve un array solamente cuando hay resultados pero no hay ninguna función nativa que te debuelva arrays vacios o strings con un chr(0), asi que false se compara por igual a un string vacio o un array vacio a exepción cuando procesas formulartios, ahi estoy acostumbrado a usar trim() solamente y ! directo en arrays.

no se, es costumbre aunque lo mas correcto es usar empty() como dice nakp.
#3032
Scripting / Re: [Duda]Sockets en perl.
13 Enero 2011, 11:58 AM
mira, hace tiempo hize este script, talves te sirva, utilizé forks para crear funciones que conectan el socket:

Código (perl) [Seleccionar]
#!/usr/bin/perl
#Perl-xxxx Traducción en perl del originalmente xxxxx.

use IO::Socket;

# Variables ==========================
if((!$ARGV[0]) and (!$ARGV[1]) and (!$ARGV[2])) {
print "Uso: $0 [Host] [Puerto] [Nº de Sockets] [protocolo(por defecto TCP)]
Ejemplo 1: $0 xxxx.net 80 1700
Ejemplo 2: $0 xxxx.com 21 1000
Ejemplo 3: $0 xxxx.org 69 1500 UDP
";
exit(1);
} else {
if (!$ARGV[3]) {
  $protocolo = "TCP";
} else {
  $protocolo = $ARGV[3];
}
$cuenta_errores = "1";
# ====================================

# Función conectar ==================================
sub conectar {
  $conectar =  new IO::Socket::INET(PeerAddr => $ARGV[0], PeerPort => $ARGV[1], Proto => $protocolo)or exit(1);
  while (<$conectar>) {}
}
# ===================================================

# Conectar ==========================================
print "[*] $ARGV[2] Sockets cargados.\n";
print "[*] Conectando Sockets...\n";
for (1 .. $ARGV[2]) {
  next if my $kid = fork;
  die "fork: $!" unless defined $kid;
  while() {conectar;}
  exit;
}
$conectados = ($ARGV[2]-$cuenta_errores)+1;
$desconectados = $cuenta_errores-1;
print "[*] Sockets conectados.\n";
# ===================================================

# Espera el termino de fork para concluir ===========
1 while wait != -1;
print "[*] Terminado.\n";
}
exit(0);
# ===================================================
#3033
mejor usaré el array de listado multidimensional para poder manejar el id nombre y descripción de cada base de datos por sepado.

gracias de todas formas.

Código (vbnet) [Seleccionar]
            Dim DBArch As String, DBs() As String
            DBs = Directory.GetFiles(DBURL, "*.xml", SearchOption.AllDirectories)
            Dim DBXML(DBs.Length) As XmlDocument
           ReDim DB(DBs.Length)
           Dim Id As Integer = 0
           Dim NDB As Integer = 0
           For Each DBArch In DBs
               Try
                   DBXML(Id).Load(DBArch)
                   DB(Id) = DBXML(Id).SelectNodes("/AutoRemoveXDB/item")
                   NDB = NDB + DB(Id).Count
                   Id = Id + 1
               Catch ex As Exception
                   ' Next
               End Try
           Next

           If DB.Length > 1 Then
               Estado(DB.Length & " Bases de datos cargadas.")
           Else
               Estado(DB.Length & " Base de datos cargada.")
           End If
           If NDB > 1 Then
               Estado(NDB & " Tareas cargadas.")
           Else
               Estado(NDB & " Tarea cargada.")
           End If
#3034
Habrá alguna forma mas efectiva que no sea haciendo un foreach procesando nodo por nodo del objeto XML para unir dos XmlNodeList?

el problema es que tengo un directorio con múltiples bases de datos y el sistema los argará todos y para procesar todo después quiero tener una sola variable y no un array de variables, normalmente podría mantener un array de XmlNodeList pero quiero buscar una alternativa que me permita unirlos talves con alguna función u operador.

Código (vbnet) [Seleccionar]
            Dim DBArch As String, DBs() As String
            DBs = Directory.GetFiles(DBURL, "*.xml", SearchOption.AllDirectories)

            Dim DBXML(DBs.Length) As XmlDocument
            Dim DBNodo(DBs.Length) As XmlNodeList
            Dim Id As Integer = 0
            For Each DBArch In DBs
                DBXML(Id).Load(DBArch)
                DBNodo(Id) = DBXML(Id).SelectNodes("/AutoRemoveXDB/item")
                Id = Id + 1
            Next

            DB = DBNodo ' Acá debería unir el array de DBNodo solamente en DB.
#3035
biblicamente es posible, en el apocalipsis los seres vivientes que estaban junto al trono con los 24 ancianos no eran humanos ni personas ni angeles, seres con ojos en todo su cuerpo y muchas alas (simbolicamente obviamente) que por algo eran llamados seres vivientes y no humanos u hombres.

el problema es que biblicamente este mundo que cabe dentro del reino de Dios es espiritual, o sea no es físico, no es tridimensional como este mundo, forma parte de algo que no alcanza a comprender la mente humana porque no solo estamos hablando de seres no terrestres sino del reino de Dios y eso va mucho mas ayá de que si se puede ver o no se puede ver.

incluso dice la biblia que en un futuro en el dia del juicio los muertos van a revivir todos para ser juzgados junto con los vivos y todos tendremos un cuerpo diferente, transformados y esto es porque nuestro cuerpo físico de este mundo y dimensión no puede ir al cielo, o sea otro mundo fuera de esta dimensión, por eso es que también dice que ni las riquezas ni el oro ni la carne ni el cuerpo pueden heredar en el reino de los cielos, un reino donde el tener y consumir no es todo sino el vivir y no vivir como se vive acá a comida, aire, agua, sexo y ciestas sino llenos del Espíritu de Dios donde no se trabaja porque no hay un lugar físico para trabajar ni se va a necesitar nada porque Dios sustentará todo, no habrá hambre ni sed porque no habrá un cuerpo que te lo pida ni habrá envidia ni avaricia porque no existe el dinero ya que no es un mundo físico donde puedes comprar cosas. de hecho la biblia dice que este mundo físico fue creado por Dios que no es de esta dimensión ni de este mundo, asi que lo espiritual si se puede materializar porque lo material no hace lo espiritual sino que lo espiritual hace lo material.

en fin... tantos años buscando prueba de vida fuera de la tierra y lo tienen ahi escrito en la biblia hace miles de años.

CitarApo 4:1 

La adoración celestial
  Después de esto miré, y he aquí una puerta abierta en el cielo; y la primera voz que oí, como de trompeta, hablando conmigo, dijo: Sube acá, y yo te mostraré las cosas que sucederán después de estas.
Apo 4:2  Y al instante yo estaba en el Espíritu; y he aquí, un trono establecido en el cielo, y en el trono, uno sentado.
Apo 4:3  Y el aspecto del que estaba sentado era semejante a piedra de jaspe y de cornalina; y había alrededor del trono un arco iris, semejante en aspecto a la esmeralda.(A)
Apo 4:4  Y alrededor del trono había veinticuatro tronos; y vi sentados en los tronos a veinticuatro ancianos, vestidos de ropas blancas, con coronas de oro en sus cabezas.
Apo 4:5  Y del trono salían relámpagos y truenos(B) y voces; y delante del trono ardían siete lámparas de fuego,(C) las cuales son los siete espíritus de Dios.(D)
Apo 4:6  Y delante del trono había como un mar de vidrio semejante al cristal;(E) y junto al trono, y alrededor del trono, cuatro seres vivientes llenos de ojos delante y detrás.
Apo 4:7  El primer ser viviente era semejante a un león; el segundo era semejante a un becerro; el tercero tenía rostro como de hombre; y el cuarto era semejante a un águila volando.(F)
Apo 4:8  Y los cuatro seres vivientes tenían cada uno seis alas, y alrededor y por dentro estaban llenos de ojos;(G) y no cesaban día y noche de decir: Santo, santo, santo es el Señor Dios Todopoderoso,(H) el que era, el que es, y el que ha de venir.
Apo 4:9  Y siempre que aquellos seres vivientes dan gloria y honra y acción de gracias al que está sentado en el trono, al que vive por los siglos de los siglos,
Apo 4:10  los veinticuatro ancianos se postran delante del que está sentado en el trono, y adoran al que vive por los siglos de los siglos, y echan sus coronas delante del trono, diciendo:
Apo 4:11  Señor, digno eres de recibir la gloria y la honra y el poder; porque tú creaste todas las cosas, y por tu voluntad existen y fueron creadas.
#3036
Cita de: berz3k en 12 Enero 2011, 06:04 AM
XDD naa spyware de Microsucks!

-berz3k.


+1

de hecho desde win xp todos los windows lo hacen solo que en teléfonos se nota mas porque las pequeñas cantidades de tráfico con tu historial de navegación y lista de programas instalados los debes pagar.
#3037
PHP / Re: De un archivo con comandos a array ?
11 Enero 2011, 23:12 PM
# archivo: comandos.txt
# contenido:

color=#000000
font=mifont.ttf
web=www.mipagina.com


Código (php) [Seleccionar]
<?php

$data 
'
# archivo: comandos.txt
# contenido:

<contenido>
 color=#000000
 font=mifont.ttf
 web=www.mipagina.com
</contenido>
'
;

$data explode('<contenido>'$data);
$data explode('</contenido>'$data[1]);
$data explode('='$data[0]);
foreach(
$data as $var => $val){
 
$out[trim($var)] = trim($val);
}
$data $out;
unset(
$out$var$val);

print_r($data);

?>


Resultado:
Array (
[color] => #000000
[font] => mifont.ttf
[web] => www.mipagina.com
)


uso:
Citar<a style="color: <?php echo preg_replace('|[^A-Za-z0-9_,-]|i', '', $data['colo']); ?>; font: <?php echo preg_replace('|[^A-Za-z0-9_,-]|i', '', $data['font']); ?>;" href="<?php echo htmlspecialchars($data['web'], ENT_QUOTES); ?>"><?php echo htmlspecialchars($data['web'], ENT_QUOTES); ?></div>
#3038
puedes hacerlo así pero no es necesario, si no retornas nada lo puedes comparar con false:

Código (php) [Seleccionar]
function test($x){
if($x == 'z')
  return 'w';
}

if($res = test('d'))
echo $res;
else
echo 'error';


así lo hago yo, ahorras código, tiempo y quebraderos de cabeza.
o si no retornas int negativos, un numero por cada error
Código (php) [Seleccionar]
if((int)($res = test('z')) == -2)
echo 'error dos';
else
echo $res;
#3039
Nivel Web / Re: Pregunta rapida XSS
9 Enero 2011, 18:24 PM
primero debes aprender javascript y un poco de php...
con javascript tomas la cookie desde el DOM y la envias atraves de una variable GET y la capturas desde el php y la guardas, luego puedes usar esa cookie para iniciar sesion insertandola en tu explorador con document.cookie
#3040
PHP / Re: SuperCaptcha animada by WHK
9 Enero 2011, 17:21 PM
eso ya sería opcional porque si no lo hubiera puesto y no usas sesiones despues hubieras dicho que no destruyo la sesion y que soy hereje por destruir servidores xD