Ver Mensaje Individual
  #2 (permalink)  
Antiguo 25/04/2002, 16:24
Avatar de Potro
Potro
 
Fecha de Ingreso: abril-2001
Mensajes: 2.249
Antigüedad: 23 años
Puntos: 39
Re: Quien quiere un formulario en flash con php

Esto llevara el segundo archivo php que se llamara _mailf.php si se dieron cuenta en el archivo llamado enviar.php casi en las primeras lineas dice require '_mailf.php'; entonces esta consultando tambien a este archivo okas...

Bueno el contenido de este archivo sera el siguiente...


<?
function xmail($from,$to,$subject,$core_msg)
{
$cmd_line=sprintf("sudo /var/qmail/bin/qmail-inject");
$fp=popen($cmd_line,"w");
$temp=sprintf("From: %s\n",$from);
$len=strlen($temp);
$ret_p=fputs($fp,$temp,$len);
$temp=sprintf("To: %s\n",$to);
$len=strlen($temp);
$ret_p=fputs($fp,$temp,$len);
$temp=sprintf("Subject: %s\n",$subject);
$len=strlen($temp);
$ret_p=fputs($fp,$temp,$len);
$temp=sprintf("\n%s\n",$core_msg);
$len=strlen($temp);
$ret_p=fputs($fp,$temp,$len);
pclose($fp);
}
function is_valid_mail($mailaddr)
{
/* Validate e-mail address */
/* Default return value is TRUE */
$rval=1;
/* Invalid characters */
$na="`~!#$%^&*()+=[]{};':\"<,>?/\| ";
$na_found=0;
$at_found=0;
$at_found=strpos($mailaddr,"@");
for($counter=0;$counter<strlen($na);$counter++)
{
$pos=strpos($mailaddr,substr($na,$counter,1));
if(!is_string($pos) && $pos) $na_found++;
}
if($na_found>0 || !$at_found )
{
$rval=0;
}
return($rval);
}
?>


Bueno espero que les pueda ayudar esto para comprender un poco mas como se usan los formularios en flash espero tener sus comentarios y bien si a alguien no le quedo claro escribanme a [email protected] y con gusto les enviare los archivos... saludos

:P :P :P :P :P :P :P :P :P

<div align=center>
<param name=movie value=http://www.compuviper.com/montejo/firma.swf>
<param name=quality value=high><embed src=http://www.guerrerohermida.com.mx/firma.swf WIDTH=200 HEIGHT=75>
</embed></div>