This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
function VERIFICA_EMAIL($email){ | |
$email = strtolower(trim($email)); | |
$mail_correcto = 0; | |
if ((strlen($email) >= 6) && (substr_count($email,"@") == 1) && (substr($email,0,1) != "@") && (substr($email,strlen($email)-1,1) != "@")){ | |
if ((!strstr($email,"'")) && (!strstr($email,"\"")) && (!strstr($email,"\\")) && (!strstr($email,"\$")) && (!strstr($email," "))) { | |
if (substr_count($email,".")>= 1){ | |
$term_dom = substr(strrchr ($email, '.'),1); | |
if (strlen($term_dom)>1 && strlen($term_dom)<5 && (!strstr($term_dom,"@")) ){ | |
$antes_dom = substr($email,0,strlen($email) - strlen($term_dom) - 1); | |
$caracter_ult = substr($antes_dom,strlen($antes_dom)-1,1); |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
global $palabras; | |
$GLOBALS['palabras'] = array( | |
' a ',' ah ', ' al ', ' alla ',' alo ',' ano ',' ante ',' anti ',' am ',' aquel ', ' aquellos ',' aquellas ',' ay ', | |
' asi ', | |
' bajo ', ' bien ',' bueno ', | |
' casi ',' con ', ' contra ', ' coma ', ' comer ',' como ', ' cómo ', ' cambiar ', | |
' da ',' dando ',' de ' , ' del ', ' dejar ',' desde ',' di ', ' dia ', 'dice',' donde ',' dijo ',' don ', | |
' e ', ' el ', ' ella ', ' ellas ', ' ellos ',' en ' ,' entonces ', ' entre ', ' era ',' es ', ' esa ',' ese ', | |
' esas ',' eso ',' esos ',' esta ', ' estan ',' estas ',' esto ',' estos ', | |
' fue ',' fueron ',' fuese ',' fuesen ',' fui ',' fuimos ', ' full ', |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
function HCARD($dominio,$empresa,$nombre_sitio,$ciudad,$estado,$pais) | |
{ echo '<div id="hcard-'.$dominio.'" class="vcard" style="visibility:hidden"> | |
<span class="fn n"> | |
<span class="given-name">'.$empresa.'</span> | |
<span class="additional-name">'.$empresa.'</span> | |
</span> | |
<div class="org">'.$nombre_sitio.'</div> | |
<div class="adr"> | |
<span class="locality">'.$ciudad.'</span> | |
<span class="region">'.$estado.'</span> |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
global $palabras; | |
$GLOBALS['palabras'] = array( | |
' a ',' ah ', ' al ', ' alla ',' alo ',' ano ',' ante ',' anti ',' am ',' aquel ', ' aquellos ',' aquellas ',' ay ', | |
' asi ', | |
' bajo ', ' bien ',' bueno ', | |
' casi ',' con ', ' contra ', ' coma ', ' comer ',' como ', ' cómo ', ' cambiar ', | |
' da ',' dando ',' de ' , ' del ', ' dejar ',' desde ',' di ', ' dia ', 'dice',' donde ',' dijo ',' don ', | |
' e ', ' el ', ' ella ', ' ellas ', ' ellos ',' en ' ,' entonces ', ' entre ', ' era ',' es ', ' esa ',' ese ', | |
' esas ',' eso ',' esos ',' esta ', ' estan ',' estas ',' esto ',' estos ', | |
' fue ',' fueron ',' fuese ',' fuesen ',' fui ',' fuimos ', ' full ', |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
function HEADERS($lenguaje,$charset){ | |
global $ExpStr; | |
header('Accept-Ranges: bytes'); | |
$tiempo = $_SERVER['REQUEST_TIME'] + 18144000; | |
$ExpStr = 'Expires: '.gmdate("D, d M Y H:i:s", $tiempo) . " GMT"; | |
session_cache_limiter('private_no_expire'); | |
session_cache_expire(115200); | |
header($ExpStr); | |
header("Content-Language:$lenguaje"); | |
header("Cache-Control: cache"); |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
function INISET() { | |
ini_set('register_globals', 'Off'); | |
ini_set('allow_call_time_pass_reference','Off'); | |
ini_set('allow_url_fopen','On'); | |
ini_set('allow_url_include','Off'); | |
ini_set('default_mimetype','text/html'); | |
ini_set('default_socket_timeout','45'); | |
ini_set('display_errors', "off"); | |
ini_set('magic_quotes_gpc','Off'); | |
ini_set('max_execution_time','30'); |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Options +FollowSymlinks | |
FileETag None | |
RewriteEngine On | |
RewriteCond %{HTTP_USER_AGENT} libwww [NC,OR] | |
RewriteCond %{QUERY_STRING} ^(.*)=http [NC] | |
RewriteCond %{REQUEST_FILENAME} !-f | |
RewriteCond %{REQUEST_FILENAME} !-d | |
RewriteCond %{QUERY_STRING} (\<|%3C).*script.*(\>|%3E) [NC,OR] | |
RewriteCond %{QUERY_STRING} base64_encode.*\(.*\) [OR] | |
RewriteCond %{QUERY_STRING} GLOBALS(=|\[|\%[0-9A-Z]{0,2}) [OR] |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
$imagen = 'images/img_promos/'.$_GET["imagen"]; | |
$imagen = imagecreatefromjpeg($imagen); | |
$marca = imagecreatefrompng('images/promo.jpg'); | |
$destino_x = imagesx($imagen); | |
$destino_y = imagesy($imagen); | |
$medi_marca_y = imagesy($marca); | |
$medi_marca_x = imagesx($marca); | |
$dest_y = 540; | |
$dest_x = 960; | |
$calidad = 72; |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
function REDIMENSIONAR($anchura,$maxima_y,$nombre) | |
{ $img_nueva = $nombre; | |
$datos = getimagesize($nombre); | |
$maxima_y = $datos[1]; | |
switch ($datos[2]) { | |
case 2: | |
$img = imagecreatefromjpeg($nombre); | |
break; | |
case 3: | |
$img = imagecreatefrompng($nombre); |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Banco: | |
<select name="banco"> | |
<option value=""></option> | |
<option value="0156">100%BANCO</option> | |
<option value="0196">ABN AMRO BANK</option> | |
<option value="0172">BANCAMIGA BANCO MICROFINANCIERO, C.A.</option> | |
<option value="0171">BANCO ACTIVO BANCO COMERCIAL, C.A.</option> | |
<option value="0166">BANCO AGRICOLA</option> | |
<option value="0175">BANCO BICENTENARIO</option> | |
<option value="0128">BANCO CARONI, C.A. BANCO UNIVERSAL</option> |
OlderNewer