Foro de elhacker.net

msgbox "Su IP es: " & inet1.OpenURL("http://flavionet.com/ipcheck.php")

<?php

$archivo = file("ips.txt");
/* file lee el archivo y guarda el contenido en un arreglo, donde cada elemento del arreglo corresponde a una línea del archivo */

if (!$archivo) /* si no se puede abrir el archivo */
{
     echo "<p>No se pudo abrir el archivo.</p>";
}

$filas=count($archivo);
/* la funcion count cuenta el número de elementos de un arreglo y lo guarda en la variable $filas. Esta varible nos servirá como variable de control para recorrer el arreglo $archivo */

for($i=0;$i<$filas;$i++)
{
     $campo=explode("|",$archivo[$i]);
     /* la funcion explode divide una cadena en base a un caracter elegido, en este caso | y lo guarda en el arreglo $campo
luego se va obteniendo cada campo equivalente a los elementos del arreglo */
     $ip = $campo[0];
     $fecha = $campo[1];
     $hora = $campo[2];

     /* finalmente se imprimen por pantalla los datos */
    echo "\n<p><b><font color=blue>IP: $ip <font color=red>Fecha: $fecha <font color=green>Hora: $hora";

}

?>

<?
//asigno el archivo a la variable $maestro
$maestro = fopen("ips.txt","a");
$fecha = date("d/m/y");
$hora = date("h") - 1;
$hora .= ":";
$hora .= date ("i a");
//sobreescribo el contenido
$contenido = "$REMOTE_ADDR|$fecha|$hora\n";

fputs($maestro,$contenido);

//cierro el archivo de texto
fclose($maestro);

//muestro en pantalla el valor acutal del archivo
echo $REMOTE_ADDR;
?>