"; $urlok = 'NL-ok.htm'; $urlko = 'NL-ko.htm'; $header = 'From: INTERPACIOLO'; ##############enviamos el correo########################## $email = trim($email100); $body = "Sr(a): $nombre Adjuntamos el registro de su inscripcion al software contable INTERPACIOLO Clave ingreso pagina web: $clave Licencia software: $licencia Numero documento registrado: $cc Cordial Saludo INTERPACIOLO - La Casa del Software -"; #$Ok = ereg("^([a-zA-Z0-9_\.-]+)@((\[[0-9]{1,3}\.[0-9]{1,3}\.[0-9]{1,3}\.)|(([a-zA-Z0-9\-]+\.)+))([a-zA-Z]{2,4}|[0-9]{1,3})(\]?)$", $email); mail($email, 'INTERPACIOLO - Su clave y Licencia ', $body, $header); ?> "; } } ?>