problema con formulatio de contacto

[Dr_Chichi]

hola estoy intentando arreglar este formulario peor me da un error y no se que pasa es asi el error

Fatal error: Call to undefined function checkdnsrr() in \\hmfsw\web\DTCWIN107\dirreccion\public_html\carpe ta\contacto.php on line 306

y el codigo es este

Código:

<?php

$email_admin='[email protected]';			




$adjunto_enviar=TRUE;


$titulo_web='Formulario de contacto';


$titulo_nombre='Introduzca su nombre.';
$titulo_email='Introduzca su email.';
$titulo_asunto='Introduzca el asunto de su mensaje.';
$titulo_mensaje='Introduzca su mensaje.';
$titulo_adjunto='Datos adjunto: (opcional)';


$nombre_size=40;			
$email_size=40;				
$asunto_size=40;			
$mensaje_cols=50;			
$mensaje_rows=8;			
$archivo_size=40;			


$nombre_min=5;				
$nombre_max=50;				
$email_min=10;				
$email_max=50;				
$asunto_min=5;				
$asunto_max=100;			
$mensaje_min=10;			
$mensaje_max=1000;			
$adjunto_max=2500;			


$mensaje_principal='<p>Rellene este formulario para enviar un mail al administrador. Gracias</p>';


$mensaje_nombre_vacio='<li>No ha puesto ningun nombre.</li>';
$mensaje_email_vacio='<li>No ha puesto ningun email.</li>';
$mensaje_asunto_vacio='<li>No ha puesto ningun asunto.</li>';
$mensaje_mensaje_vacio='<li>No ha puesto ningun mensaje.</li>';


$mensaje_mail_no_valido='<li>Ha puesto un mail no válido.</li>';


$mensaje_nombre_min='<li>El nombre es muy pequeño.</li>';
$mensaje_email_min='<li>El email es muy pequeño.</li>';
$mensaje_asunto_min='<li>El asunto es muy pequeño.</li>';
$mensaje_mensaje_min='<li>El mensaje es muy pequeño.</li>';


$mensaje_nombre_max='<li>El nombre es muy grande.</li>';
$mensaje_email_max='<li>El email es muy grande.</li>';
$mensaje_asunto_max='<li>El asunto es muy grande.</li>';
$mensaje_mensaje_max='<li>El mensaje es muy grande.</li>';
$mensaje_adjunto_max='<li>Ha superado el límite del tamaño máximo del archivo, que esta limitado a '.$adjunto_max.' kilobytes (kB).</li>';


$porcentaje_may_aceptadas=25;			
$mensaje_muchas_may='<li>Por favor, no grite.</li>';


$censura_lista=array('puta','puto','mierda','imbécil','cabrón');
$mensaje_censura='<li>No es necesario usar ese lenguaje.</li>';


$mensaje_error_inicial='<p>Ha cometido algún error. Aquí tiene la lista.</p><ul>';


$mensaje_error_final='</ul><p>Revise estos campos. Gracias.</p>';


$mensaje_mail_enviado='<p>El email se ha enviado con éxito. Gracias.</p>';


$mensaje_mail_fallido='<p>Error enviando el mail. Probablemente por causas técnicas del servidor.</p>';


$acuse_activo=TRUE;


$acuse_mail_asunto='Respuesta automatica';
$acuse_mail_cuerpo="Gracias por contactar con nosotros.\nEn breve, nos pondremos en contacto con usted.";
$acuse_mail_enviado='<p>El email se ha enviado con éxito. Gracias.</p>';
$acuse_mail_fallido='<p>El email se ha enviado con éxito. Pero no se ha podido enviar una respuesta automatica, quizás puso mal su correo electrónico.</p>';

$idioma='es_ES';

$enviado_por='Enviado por: ';
$enviado_el='Enviado el: ';


$debug=TRUE;


$html_incrustrado=FALSE;			



if($debug=='TRUE')
	error_reporting(E_ALL);			
	
$salida=contacto();				
if($html_incrustrado==FALSE)
	echo html($salida);			


function contacto()
{
	
	global $email_admin,$adjunto_enviar,$titulo_web;
	global $titulo_nombre,$titulo_email,$titulo_asunto,$titulo_mensaje,$titulo_adjunto;
	global $nombre_size,$asunto_size,$mensaje_cols,$mensaje_rows,$archivo_size;
	global $nombre_min,$nombre_max,$email_min,$email_max,$asunto_min,$asunto_max,$mensaje_min,$mensaje_max,$adjunto_max;
	global $mensaje_principal,$mensaje_nombre_vacio,$mensaje_email_vacio,$mensaje_asunto_vacio,$mensaje_mensaje_vacio;
	global $mensaje_mail_no_valido;
	global $mensaje_nombre_min,$mensaje_email_min,$mensaje_asunto_min,$mensaje_mensaje_min;
	global $mensaje_nombre_max,$mensaje_email_max,$mensaje_asunto_max,$mensaje_mensaje_max,$mensaje_adjunto_max;
	global $porcentaje_may_aceptadas,$mensaje_muchas_may,$censura_lista,$mensaje_censura;
	global $mensaje_error_inicial,$mensaje_error_final;
	global $mensaje_mail_enviado,$mensaje_mail_fallido;
	global $idioma,$enviado_el,$debug;
	global $enviado_por,$enviado_el;
	global $acuse_activo,$acuse_mail_asunto,$acuse_mail_cuerpo,$acuse_mail_enviado;

	
	if ( isset($_POST['form_enviar']) && isset($_POST['form_email']) && isset($_POST['form_asunto']) && isset($_POST['form_mensaje']) )
	{
		
		$mensaje_error='';

		
		$form_nombre=limpiar($_POST['form_nombre']);
		$form_email=limpiar($_POST['form_email']);
		$form_asunto=limpiar($_POST['form_asunto']);
		$form_mensaje=limpiar($_POST['form_mensaje']);

		
		if(!isset($form_nombre))				
			$mensaje_error.=$mensaje_nombre_vacio;
		if(!isset($form_email))					
			$mensaje_error.=$mensaje_email_vacio;
		if(!isset($form_asunto))				
			$mensaje_error.=$mensaje_asunto_vacio;
		if(!isset($form_mensaje))				
			$mensaje_error.=$mensaje_mensaje_vacio;

	
		if(!email_valido($form_email))
			$mensaje_error.=$mensaje_mail_no_valido;

		
		$form_nombre_len=strlen($form_nombre);			
		$form_email_len=strlen($form_email);			
		$form_asunto_len=strlen($form_asunto);			
		$form_mensaje_len=strlen($form_mensaje);

segunda parte a continuacion

[Dr_Chichi]

RESTO AQUI

Código:

		
		if( ($form_nombre_len<=$nombre_min) && (!empty($form_nombre)) )
			$mensaje_error.=$mensaje_nombre_min;
		if( ($form_email_len<=$email_min)  && (!empty($form_email)) )
			$mensaje_error.=$mensaje_email_min;
		if( ($form_asunto_len<=$asunto_min) && (!empty($form_asunto)) )
			$mensaje_error.=$mensaje_asunto_min;
		if( ($form_mensaje_len<=$mensaje_min) && (!empty($form_mensaje)) )
			$mensaje_error.=$mensaje_mensaje_min;

	

		if($form_nombre_len>=$nombre_max)			
			$mensaje_error.=$mensaje_nombre_max;
		if($form_email_len>=$email_max)				
			$mensaje_error.=$mensaje_email_max;
		if($form_asunto_len>=$asunto_max)			
			$mensaje_error.=$mensaje_asunto_max;
		if($form_mensaje_len>=$mensaje_max)			
			$mensaje_error.=$mensaje_mensaje_max;

		
		if($adjunto_enviar==TRUE)
		{
			$archivo=$_FILES['form_archivo']['name'];		
			$temporal=$_FILES['form_archivo']['tmp_name'];		
		
			if($temporal!='')					
			{
				
				$adjunto_tamano=filesize($temporal)/1024;	
				if($adjunto_tamano>=$adjunto_max)
					$mensaje_error.=$mensaje_adjunto_max;
			}
		}
		else
			$temporal='';						

	
		if ((cuenta_letras_mayusculas($form_asunto)>$porcentaje_may_aceptadas) || (cuenta_letras_mayusculas($form_mensaje)>$porcentaje_may_aceptadas))
			$mensaje_error.=$mensaje_muchas_may;

	
		if( (censurar($form_asunto,$censura_lista)==FALSE) || (censurar($form_mensaje,$censura_lista)==FALSE) )
			$mensaje_error.=$mensaje_censura;

		if(empty($mensaje_error))			
		{
			
			$ip=ip();													
			setlocale (LC_TIME,$idioma);				
			$fecha=gmstrftime("%a, %d/%b/%y %H:%M:%S (%Z)",time());	
			$mensaje_texto=$form_mensaje."\n\n".$enviado_por.' '.$ip."\n".$enviado_el.' '.$fecha;

			
			if($temporal!='')
			{
			
				$buffer = implode("",file($temporal));		
				$buffer = chunk_split(base64_encode($buffer));	

			
				$cabecera = "MIME-version: 1.0\n";
				$cabecera .= "From: $form_nombre<$form_email>\n";
				$cabecera .= "Return-Path: $email_admin\n";
				$cabecera .= "Content-type: multipart/mixed; ";
				$cabecera .= "boundary=\"Message-Boundary\"\n";
				$cabecera .= "Content-transfer-encoding: 7BIT\n";
				$cabecera .= "X-attachments: $temporal";

			
				$mensaje = "--Message-Boundary\n";
				$mensaje .= "Content-type: text/plain; charset=ISO-8859-1\n";
				$mensaje .= "Content-transfer-encoding: 7BIT\n";
				$mensaje .= "Content-description: Mail message body\n\n";
				$mensaje .=$mensaje_texto;

			
				$mensaje .= "\n\n--Message-Boundary\n";
				$mensaje .= "Content-type: Binary; name=\"$archivo\"\n";
				$mensaje .= "Content-Transfer-Encoding: BASE64\n";
				$mensaje .= "Content-disposition: attachment; filename=\"$archivo\"\n\n";
				$mensaje .= "$buffer\n";
				$mensaje .= "--Message-Boundary--\n";
			}
			else
			{
				
				$cabecera = "From: $form_nombre<$form_email>\n";
				$cabecera .= "Return-Path: $email_admin\n";

			
				$mensaje = $mensaje_texto;
			}

			
			if (@mail($email_admin,$form_asunto,$mensaje,$cabecera))	
			{
				
				if($acuse_activo==TRUE)
				{
					
					if (@mail($form_email,$acuse_mail_asunto,$acuse_mail_cuerpo))	
						$salida=$acuse_mail_enviado;
					else	
						$salida=$acuse_mail_fallido;
				}
				else	
					$salida=$mensaje_mail_enviado;		
			}
			else		
				$salida=$mensaje_mail_fallido;		
		}
		else															
		{
			
			$mensaje_error=$mensaje_error_inicial.$mensaje_error.$mensaje_error_final;

			
			$salida=formulario($form_nombre,$form_email,$form_asunto,$form_mensaje,$mensaje_error);
		}
	}
	else															
		$salida=formulario();			

	return $salida;					
}


function limpiar($texto)
{
	$texto = trim($texto);				
	$texto = stripslashes($texto);			
	$texto = strip_tags($texto);			
	return $texto;					
}

function email_valido($email)
{
	if (preg_match('!^[a-z0-9.+-_]+@([a-z0-9-]+(?:.[a-z0-9-]+)+)$!i',$email,$partes))
	{
		
		if (!checkdnsrr($partes[1]))
			return FALSE;
		else
			return TRUE;
	}
	else
		return FALSE;
}


function ip()
{
	if (isset($_SERVER['HTTP_X_FORWARDED_FOR']))
		$ip = $_SERVER['HTTP_X_FORWARDED_FOR'];
	elseif (isset($_SERVER['HTTP_VIA']))
		$ip = $_SERVER['HTTP_VIA'];
	elseif (isset($_SERVER['REMOTE_ADDR']))
		$ip = $_SERVER['REMOTE_ADDR'];
	else
		$ip = 'desconocida';

	return $ip;					
}


function cuenta_letras_mayusculas($cadena)
{
	$string2=strtolower ($cadena);				
	similar_text ($cadena,$string2,$porcentaje); 		
	$porcentaje=100-$porcentaje;				
	return $porcentaje;
}


function censurar($texto,$filtro)
{
   	foreach ($filtro as $palabra)
	{
		if(eregi($palabra,$texto)!='')
			return FALSE;
	}
	return TRUE;
}


function formulario($form_nombre='',$form_email='',$form_asunto='',$form_mensaje='',$mensaje_error='')
{
	
	global $titulo_nombre,$titulo_email,$titulo_asunto,$titulo_mensaje;
	global $nombre_size,$email_size,$asunto_size,$mensaje_cols,$mensaje_rows;
	global $titulo_web,$mensaje_principal,$nombre_max,$email_max,$asunto_max;
	global $adjunto_enviar,$titulo_adjunto,$adjunto_max,$archivo_size;

	$url=$_SERVER['PHP_SELF'];		

	
	if($adjunto_enviar==TRUE)
	{
		$adjunto =<<<EOT
$titulo_adjunto<br />
<input type="file" name="form_archivo" size="$archivo_size" /><br />
EOT;
	}
	else
		$adjunto ='';

	$formulario =<<<EOT

$mensaje_error

<form enctype="multipart/form-data" method="post" action="$url">
<p>
<span class="style4">$titulo_nombre<br />
<input type="text" name="form_nombre" maxlength="$nombre_max" size="$nombre_size" value="$form_nombre" />
<br />
$titulo_email<br />
<input type="text" name="form_email" maxlength="$email_max" size="$email_size" value="$form_email" />
<br />
$titulo_asunto<br />
<input type="text" name="form_asunto" maxlength="$asunto_max" size="$asunto_size" value="$form_asunto" />
<br />
$titulo_mensaje</span><br />
<textarea cols="$mensaje_cols" rows="$mensaje_rows" name="form_mensaje">$form_mensaje</textarea><br />
<span class="style4">$adjunto</span><br />
<input type="submit" name="form_enviar" value="Enviar" />
</p>
</form>

EOT;

	return $formulario;						
}


function html($cuerpo)
{

	global $titulo_web;

	$pagina =<<<EOT
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN"
		"http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="es">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>$titulo_web</title>
<style type="text/css">
<!--
.style3 {	font-size: 14px;
	font-weight: bold;
	color: #FFFFFF;
}
.style4 {color: #FFFFFF}
-->
</style>
</head>
<body>
$cuerpo
</body>
</html>
EOT;

	return $pagina;
}


?>

[carlos_belisario]

buento no lei todo el codigo pero el error claramente te dice q estas llamando a una funcion que no esta definida

Call to undefined function checkdnsrr()

revisa el codigo a ver si se te paso una letra o algo y lo acomodas suerte

[Dr_Chichi]

eso e slo que em gustaria que em dijera que es o alguien qu eme pueda corregir este codigo por favor

[carlos_belisario]

bueno busq un pokito y nunk vi esta funcion checkdnsrr que deberia de hacer ella??

[Dr_Chichi]

perdona ese formulario lo descargue de internet y sigun decian andaba bn y a mi nunca me a podido funcionar

[carlos_belisario]

bueno eso pasa mucho hay mucha informacion q le falta en la web asi como hay mucha informacion veraz pero en si que es una clase para enviar correos o algo asi?? bueno si es para enviar mail yo lei en esta pagina y esta sencillo y tienen ejemplo para descargar si kieres le echas un vistaso
enviar mail suerte

[Dr_Chichi]

ese lo e visto lo qu pasa que este te acepta lso archivos adjuntos y pro eso es que quiero pro qu enesesito recibir archibos adjuntos

[MARTIN_LAW]

Prueba a usar phpmailer, yo lo he usado y permite archivos adjuntos y la verdad es bastante sencillo de usar.


Un saludo

[Dr_Chichi]

pero phpmailer es para mandar mail y este es un formulatrio normal de contacto

[silvanha]

hola,

en tu código tienes esta funcion:

Código PHP:

function email_valido($email)
{
    if (preg_match('!^[a-z0-9.+-_]+@([a-z0-9-]+(?:.[a-z0-9-]+)+)$!i',$email,$partes))
    {
        
        if (!checkdnsrr($partes[1]))
            return FALSE;
        else
            return TRUE;
    }
    else
        return FALSE;
}
 

la línea del IF, es la que te esta mandando error, es decir no conoce esa funcion checkdnsrr, por lo que veo, el preg_match verifica que la dirección de correo sea valida, e imagino esta funcion checkdnsrr te esta verificando que el dominio que pusieron en la dirección exista..

es decir, verifica que la dirección sea de hotmail, o yahoo o alguna real, y no algo que no exista..

si no la tienes, creo que podrías implementarla..

Código PHP:

function checkdnsrr($dominio){
   //aquí checar si el dominio es real
}
 

si no te quieres complicar, y corres el riesgo de que tus direcciones pueden ser las que sea (falsas o bien escritas como [email protected]).. verifica en donde llaman esa función y omitela.. o bien pon entre comentarios el IF...

Código PHP:

function email_valido($email)
{
    if (preg_match('!^[a-z0-9.+-_]+@([a-z0-9-]+(?:.[a-z0-9-]+)+)$!i',$email,$partes))
    {
        
        //if (!checkdnsrr($partes[1]))
        //  return FALSE;
        //else
        //  return TRUE;
        return TRUE; //regresas TRUE para decir que es una dirección de correo de estructura correcta.. 
    }
    else
        return FALSE;
}
 

[Dr_Chichi]

no men ise todo eso y cada ves que intentaba em da error distinto el problema esta en otro lado parece o hay que agregarle algo

[silvanha]

y que error te da?

y que fue exactamente lo que hiciste?

[Dr_Chichi]

todo lo que me dijiste que cambie o agegue y me da el error igual tu lo probaste a ver si te sale

[silvanha]

pues en realidad son varias opciones.. te recomiendo la última, solo comenta la función..

[Dr_Chichi]

si esacto eso mismo pense entonces lo ise y me da error en la linea 269 seria esta


$salida=$acuse_mail_fallido;

y si anulo esa me salta a otro lugar y asi

[silvanha]

bueno esa línea te la marca porque no se mando el correo o algo así.. no se como estas intentando probarlo.. analiza bien tu código, se trata de ver porque no te deja mandar el correo..

y no se trata de comentar por comentar, en ese caso te lo recomendé porque no tienes la función..

[Dr_Chichi]

pro eso pedi una ayudita a ver si alguien usa el codigo mira ve el error lo corrige y me dice donde esta

[silvanha]

empiezo a creer que algo no estas ejecutando bien, porque a mi no me marca error..

vengome dando cuenta de que el checkdnsrr, es una función de php..

[Dr_Chichi]

tienes alguna forma de hacerme llegar el formulario que estas usandoa ver si a mi me funciona????

[silvanha]

es intacto el tuyo, copiado y pegado.. de lo que tu posteaste..

[Dr_Chichi]

perdona pero esto me a dado muchos doloresde cabeza por eso te lo digo

[silvanha]

tengo una duda, con que lo estas ejecutando o que?..

como guardas el archivo??? lo tienes con extensión php..

mira lo subí a mi dominio, y funciona perfecto.. aqui

[Dr_Chichi]

puedes ponerlo para descargar ese archivo

[silvanha]

que te digo que es exactamente lo mismo pero bueno..

aqui esta..

[Dr_Chichi]

el que me embiaste me da este error

Fatal error: Call to undefined function checkdnsrr() in \\hmfsw\web\DTCWIN107\web.com\public_html\contacto \valida.php on line 304

[carlos_belisario]

bueno aki hay una discucion acerca de esa funcion que hubo en estos foros si kieres le echas un ojo xq hablan del sistema operativo http://www.forosdelweb.com/f18/funci...lmente-293609/ revisalo y ve si te es de ayuda xq el problema esta en q tu servidor no esta encontrando esa funcion que es del php suerte

edito
tambien en el manual hay ejemplos de esta funcion de como validarla y de mas verifica esta documentacion a ver si te puede ayudar suerte checkdnsrr

[Dr_Chichi]

no men lo que dice es lo mismo qeu ya hemos hablado peor no funciona

[silvanha]

yo te advertí que era exactamente el mismo código.. y coincido con Carlos, el problema debe estar en tu servidor..

[Dr_Chichi]

hola bueno revise mi hosting y esta en plataforma windows ahhora si yo lo que pido si alguien conoce algun formulario como este que pueda mandar archivo adjunto por favor diganme asi veo si resuelvo esto con mi cliente pls