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