Tema: Usar PHP
Ver Mensaje Individual
  #3 (permalink)  
Antiguo 23/02/2011, 13:23
cadsys
 
Fecha de Ingreso: abril-2008
Mensajes: 101
Antigüedad: 18 años, 6 meses
Puntos: 0
Respuesta: Usar PHP

Haber en el archivo flash tengo :

loadVariables("http://www.dominio.es/calidadempresa/visitados.php", "POST");

y en el archivo visitados.php :

Código PHP:
<?php
$contador
=$_POST["contador"]; 
$archivo = "numero.dat";

$fp = fopen($archivo,"r");
$contador = fgets($fp, 26);
fclose($fp);

++
$contador;

$fp = fopen($archivo,"w+");
fwrite($fp, $contador, 26);
fclose($fp);

$numip= $REMOTE_ADDR;
$fh = fopen ("ip.txt", "a+");
// Incluimos la librería 
include("geoipcity.inc"); 
// Abrimos el localizador indicando 
// el archivo de datos y el método 
$gi = geoip_open("GeoLiteCity.dat",GEOIP_STANDARD); 
// Resolvemos la direccion IP 
$ip = $_SERVER['REMOTE_ADDR']; 
// Creamos el objeto 
$record = geoip_record_by_addr($gi,$ip);
$pais= geoip_country_name_by_addr($gi, $ip);
// Resolvemos y mostramos la región 
$region= $record->city; 

$sitio= $region." de ".$pais."\n";
$mes = array(" ","Enero","Febrero","Marzo","Abril","Mayo","Junio","Julio","Agosto","Septiembre","Octubre","Noviembre","Diciembre");
$dias = array("Domingo","Lunes","Martes","Miercoles","Jueves","Viernes","Sábado");
$diames=$dias[date('w')];
$mesagno=$mes[date('n')];
$fecha = time();
$texto1= "IP Cliente : ".$REMOTE_ADDR."\n";
fputs ($fh, $texto1);
$texto6= "Remote Server . ".$SERVER_ADDR."\n";
fputs ($fh, $texto6);
$texto9= "La Hora . ".date("G:i:s",$fecha)." -- ".$diames." ".date('j')." de ".$mesagno." del ".date('Y')."\n";
fputs ($fh, $texto9);
$hora=date("G:i:s",$fecha);
$fechanow= date('j')."/".date('n')."/".date('Y');
fputs ($fh, $sitio);
$texto8= "<-->\n";
fputs ($fh, $texto8);
geoip_close($gi);
// Lo mando por E-Mail
$mensaje= $texto1.$texto6.$texto9.$sitio.$texto8;
$destino="[email protected]";
$asunto="Quien visita mi Web Señorita Mishell";
$desde="Pagina Web Grupo Calidad Empresas";
//mail($destino,$asunto,$mensaje, "From: $desde");
fclose ($fh);


echo 
"&contador=$contador&";
echo 
"&numip=$numip&";
?>