$pais) { $pais=str_replace("\n", "",$pais); $arrp=explode(",",$pais); $string2=$arrp[1]; //$num1_2=$string2[0] //$num2_2=$string2[1]; //$num3_2=$string2[2]; if ($punto2=="l4") { $numcomparar=$string2[0].$string2[1].$string2[2]; } if ($punto2=="l5"){ $numpcomparar=$string2[0].$string2[1].$string2[2].$string2[3]; } if ($punto2=="l6"){ $numpcomparar=$string2[0].$string2[1].$string2[2].$string2[3].$string2[4]; } if ($punto2=="l7"){ $numpcomparar=$string2[0].$string2[1].$string2[2].$string2[3]; } if ($punto2=="l8"){ $numpcomparar=$string2[0].$string2[1].$string2[2].$string2[3].$string2[4]; } if ($punto2=="l9"){ $numpcomparar=$string2[0].$string2[1].$string2[2].$string2[3].$string2[4].$string2[5]; } if ($punto2=="l10"){ $numpcomparar=$string2[0].$string2[1].$string2[2].$string2[3].$string2[4]; } if ($punto2=="l11"){ $numpcomparar=$string2[0].$string2[1].$string2[2].$string2[3].$string2[4].$string2[5]; } if ($punto2=="l12"){ $numpcomparar=$string2[0].$string2[1].$string2[2].$string2[3].$string2[4].$string2[5].$string2[6]; } //echo $numcompleto3; if ($numcompleto3==$numpcomparar) { $ref=$arrp[2]." ".$arrp[3]." ".$arrp[4]; } else{ $ref="FD"." "."x"." "."x"; } } //echo "el numero de seis digitos es: " . $numcompleto3; //echo "el punto1 esta en :".$punto; //echo "el punto2 esta en :".$punto2." "; //echo "el numero para comparar es: ".$numpcomparar."xxxxx"; //echo "Session ID".session_id(); //$numsesion=session_id(); //$fechavisita=time; //$fechavisita=$fechavisita("d-m-Y, H:i:s", strtotime($fechavisita)); //$numid=$numsesion.$remote_ip.$fechavisita.$ref; //echo "el num id particular momentaneo sera: ".$numid; // No guardar mis propios referers :) //$my_host = strpos($referer, $_SERVER['HTTP_HOST']); ///$file = "referer.txt"; $file=$ar; //echo "el file en la funcion de referer es :
".$file; $fo = @fopen($file, "ab") or die ("no pude abrir el archivo en referer"); $content = (is_resource($fo)) ? @fread($fo, filesize($file)) : ""; @fclose($fo); $exist_ip = strpos($content, $remote_ip); $exist_ref = strpos($content, $referer); //if (($exist_ip === false) || ($exist_ref === false)) { $str = time() . " " . $remote_ip . "(" . $remote_isp . ") " . $referer . " ". $title." " .$ref." ".$id."\n"; //echo $str; $fo = @fopen($file, "ab"); if (is_resource($fo)) @fwrite($fo, $str); $lineas=@file($file); $x=count($lineas); //echo $x; @fclose($fo); $file2=$ar2; //echo $file2; $fo2=@fopen($file2, "w+"); @fwrite($fo2,$x); @fclose($fo2); } ?>

Servicios para mis pacientes:

1) or (date('Y-m-d', $fechalimite)>date('Y-m-d'))){ ?>

1) or (date('Y-m-d', $fechalimite)>date('Y-m-d'))){ echo "Chatea por Skype, utilizando solo el teclado, o con videoconferencia. Debes de hacer una cita primero."; }else{ echo "El chat esta inactivo para este usuario"; } ?>

1) or (date('Y-m-d', $fechalimite)>date('Y-m-d'))){ echo " Agendar citas"; }else{ echo "Agendar Citas"; } ?>

1) or (date('Y-m-d', $fechalimite)>date('Y-m-d'))){ echo " Agenda una cita con el terapeuta verás sus horarios disponibles de acuerdo a tu zona horaria";}else{ echo "La Agenda esta inactiva para este usuario"; } ?>

1) or (date('Y-m-d', $fechalimite)>date('Y-m-d'))){ ?>

1) or (date('Y-m-d', $fechalimite)>date('Y-m-d'))){echo "Para pagar tu cita con este terapeuta, haz clic en el bóton -Pagar ahora- ";}else{ echo "Los pagos para este usuario están desactivados";} ?>

Preguntas hechas a

"; $items=$xml->preg; if(count($items)>0){ for($i=count($items)-1;$i>=0;$i--){ $padecimiento=$items[$i]->attributes()->padec; switch($padecimiento){ case "Bipolaridad": $lafoto="../indice4pres/image43.PNG"; break; case "Problemas Pareja": $lafoto="../indice4pres/image44.PNG"; break; case "Insomnio": $lafoto="../indice4pres/image45.PNG"; break; case "Trastornos de Personalidad": $lafoto="../indice4pres/image46.PNG"; break; case "Problemas de Aprendizaje": $lafoto="../indice4pres/image47.PNG"; break; case "Anorexia Bulimia": $lafoto="../indice4pres/image48.PNG"; break; case "Ansiedad y Panico": $lafoto="../indice4pres/image49.PNG"; break; case "Problemas de Lenguaje": $lafoto="../indice4pres/image53.PNG"; break; case "Trastorno de Estres": $lafoto="../indice4pres/image54.PNG"; break; case "Autismo": $lafoto="../indice4pres/image68.PNG"; break; case "Baja Autoestima": $lafoto="../indice4pres/image61.PNG"; break; case "Desintoxicacion Benzodiacepinas": $lafoto="../indice4pres/image70.PNG"; break; } $fechado=intVal($items[$i]->attributes()->fecha); echo "

"; echo "

".$items[$i]->attributes()->padec, PHP_EOL."

"; echo "

".date('d-M-Y h:i A T',($fechado))."

".$items[$i]->po."

"; echo "


".$items[$i]->resp."


"; echo "

"; } } ?>

Nuestra dirección:

soyterapeuta.com
República 401
Sta. Catarina, NL. Mex 66351
WHATSAPP: (52) 999-1111077

Conecta con nosotros:

-->