$sValor){ switch ($sNombre){ case "nombre": $sTexto = $sTexto."\n Nombre y apellidos: ".$sValor.""; break; case "direccion": $sTexto = $sTexto."
Dirección: ".$sValor.""; break; case "telefono": $sTexto = $sTexto."
Teléfono: ".$sValor.""; break; case "movil": $sTexto = $sTexto."
Móvil: ".$sValor.""; break; case "fax": $sTexto = $sTexto."
Fax: ".$sValor.""; break; case "email": $sTexto = $sTexto."
E-mail: ".$sValor.""; break; case "web": $sTexto = $sTexto."
Web: ".$sValor.""; break; case "ccp": $sTexto = $sTexto."
Código-Ciudad-País: ".$sValor.""; break; case "medio": $sTexto = $sTexto."
Tipo de medio: ".$sValor.""; break; case "nombremedio": $sTexto = $sTexto."
Medio: ".$sValor.""; break; case "programa": $sTexto = $sTexto."
Programa / Sección: ".$sValor.""; break; case "cargo": $sTexto = $sTexto."
Cargo: ".$sValor.""; break; case "direccionparticular": $sTexto = $sTexto."
Dirección particular: ".$sValor.""; break; case "ccpparticular": $sTexto = $sTexto."
Código-Ciudad-País particular: ".$sValor.""; break; case "telefonoparticular": $sTexto = $sTexto."
Teléfono particular: ".$sValor.""; break; case "movilparticular": $sTexto = $sTexto."
Móvil particular: ".$sValor.""; break; case "emailparticular": $sTexto = $sTexto."
E-mail particular: ".$sValor.""; break; case "fechallegada": $sTexto = $sTexto."
Fecha llegada: ".$sValor." de Noviembre de 2008"; break; case "fechasalida": $sTexto = $sTexto."
Fecha salida: ".$sValor." de Noviembre de 2008"; break; } } foreach ($_FILES as $vAdjunto){ if ($bHayFicheros == 0){ $bHayFicheros = 1; $sCabeceras .= "Content-type: multipart/mixed;"; $sCabeceras .= "boundary=\"--_Separador-de-mensajes_--\"\n"; $sCabeceraTexto = "----_Separador-de-mensajes_--\n"; $sCabeceraTexto .= "Content-type: text/html;charset=iso-8859-1\n"; $sCabeceraTexto .= "Content-transfer-encoding: 7BIT\n"; $sTexto = $sCabeceraTexto.$sTexto; } if ($vAdjunto["size"] > 0){ $sAdjuntos .= "\n\n----_Separador-de-mensajes_--\n"; $sAdjuntos .= "Content-type: ".$vAdjunto["type"].";name=\"".$vAdjunto["name"]."\"\n";; $sAdjuntos .= "Content-Transfer-Encoding: BASE64\n"; $sAdjuntos .= "Content-disposition: attachment;filename=\"".$vAdjunto["name"]."\"\n\n"; $oFichero = fopen($vAdjunto["tmp_name"], 'r'); $sContenido = fread($oFichero, filesize($vAdjunto["tmp_name"])); $sAdjuntos .= chunk_split(base64_encode($sContenido)); fclose($oFichero); } } if ($bHayFicheros) $sTexto .= $sAdjuntos."\n\n----_Separador-de-mensajes_----\n"; return(mail($sPara, $sAsunto, $sTexto, $sCabeceras)); } //*********************************************************************************************************************** $correcto = false; // PRIMERO VAMOS A COMPROBAR SI SE HA ENVIADO EL MAIL O NO: if ($_REQUEST[enviado] <> ""){ // AHORA COMPROBAMOS SI LA IMAGEN ENVIADA ES CORRECTA: $imagencorrecta = false; if(is_uploaded_file($_FILES['imagen']['tmp_name'])) { // HA INCLUIDO UNA IMAGEN, COMPROBAMOS SI ES UN ARCHIVO ES CORRECTO: $extension = explode(".",$_FILES['imagen']['name']); if (strtoupper($extension[1]) == "JPG" || strtoupper($extension[1]) == "JPEG"){ $imagencorrecta = true; } }else{ $imagencorrecta = true; } // AHORA COMPROBAMOS SI LOS ARCHIVOS DE WORD SON CORRECTOS: $edicionesanteriores = false; if(is_uploaded_file($_FILES['edicionesanteriores']['tmp_name'])) { // HA INCLUIDO UN ARCHIVO, COMPROBAMOS SI ES UN ARCHIVO ES CORRECTO: $extension = explode(".",$_FILES['edicionesanteriores']['name']); if (strtoupper($extension[1]) == "DOC" || strtoupper($extension[1]) == "DOCX" || strtoupper($extension[1]) == "PDF"){ $edicionesanteriores = true; } }else{ $edicionesanteriores = true; } $cartadirectormedio = false; if(is_uploaded_file($_FILES['cartadirectormedio']['tmp_name'])) { // HA INCLUIDO UN ARCHIVO, COMPROBAMOS SI ES UN ARCHIVO ES CORRECTO: $extension = explode(".",$_FILES['cartadirectormedio']['name']); if (strtoupper($extension[1]) == "DOC" || strtoupper($extension[1]) == "DOCX" || strtoupper($extension[1]) == "PDF"){ $cartadirectormedio = true; } }else{ $cartadirectormedio = true; } if ($imagencorrecta && $edicionesanteriores && $cartadirectormedio){ $de = $_REQUEST[email]; $para = "acreditaciones@festicinehuelva.com"; if (form_mail($para, "Solicitud de acreditación","", $de)){ $correcto = true; } } } ?> 34 Edición del Festival de Cine Iberoamericano de Huelva, del 15 al 22 de Noviembre de 2008
A través de este formulario podrá acreditarse para la 34 edición del Festival de Cine Iberoamericano de Huelva. El plazo para solicitar la acreditación de prensa finaliza el 26 de octubre. No se admitirán formularios después esta fecha. Además de rellenar los datos, deberá adjuntar una fotografía en formato JPG para poder formalizar su solicitud.

     El email se envió correctamente. Gracias.

""){ if (!$imagencorrecta){ ?>      No se pudo enviar el email, debe introducir un archivo de imagen correcto en formato JPG.

     No se pudo enviar el email, intento enviar un archivo no soportado. Deben ser en formato .doc, .docx o .pdf.

     No se pudo enviar el email, ocurrió un problema técnico.

DATOS PROFESIONALES

  *

  *
  *

  *



Agencia de Prensa Radio
Agencia Fotográfica / TV Televisión
Diarios Prensa Digital
Publicaciones especializadas Freelance
Publicaciones Generales

  *
  *
  *

DATOS PERSONALES






Fotografía (jpg)   *

DATOS DE ASISTENCIA AL FESTIVAL

Fecha llegada /11/2008
Fecha salida /11/2008

OTROS DATOS

Información publicada ediciones anteriores (.DOC, .DOCX o PDF)

Carta del director del medio (.DOC, .DOCX o PDF)


Acepto los términos y condiciones

* Obligatorios

Enviar     Reiniciar campos


Si lo desea puede descargarse la acreditación en WORD y enviarla junto con una fotografía en jpg a acreditaciones@festicinehuelva.com