Problème de lien entre flash et fichier.php et asp

kristochh Messages postés 6 Date d'inscription mardi 27 janvier 2009 Statut Membre Dernière intervention 3 août 2009 - 28 juil. 2009 à 12:04
kristochh Messages postés 6 Date d'inscription mardi 27 janvier 2009 Statut Membre Dernière intervention 3 août 2009 - 3 août 2009 à 08:51
Bonjour à tous,
D'abord, merci de me signaler où je dois poster ma question si elle n'est pas au bon endroit.
Bien qu’amateur, j’ai réussi à créer un site (portfolio) en flash, mais il me reste juste un problème avec un formulaire que je n’arrive pas à résoudre, Dreamwaever restant complètement obscur pour moi hi ! hi ! hi !
Quelqu’un peut-il m’aider à corriger mes scripts pour que mon formulaire email fonctionne.
(Si vous avez besoin d'autres infos pour m'aider, pas de souci...)

J’explique :
Tout mon site est fait dans Flash, avec, à l’intérieur un formulaire classique d’envoi de mail.
Sur le bouton d’envoi du mail (donc dans Flash) il y a cet ActionScript :

on (release) {
for (i=1; i<_parent.fields_descriptions.length; i++) {
this[_parent.fields_descriptions[i][2]]=_parent[_parent.fields_descriptions[i][1]];
_parent.reset_txt(_parent["t"+i], _parent.fields_descriptions[i][1], _parent.fields_descriptions[i][2]);
}
this.recipient=_parent.rec.text;
i=undefined;
getURL("contact.php"+_parent.serv.text, "_blank", "POST");
}

Mon fichier Flash final (main_v8.swf) est placé dans un fichier Dreamwaever qui s’appelle index.html.
Et enfin, deux fichiers php et asp.
Le fichier contact.php avec ce code :

<?
$subject="from".$_GET['your_name'];
$headers= "From:".$_GET['your_email']."\n";
$headers.='Content-type: text/html; charset=iso-8859-1';
mail($_GET['recipient'], $subject, "
<html>
<head>
<title>Contact letter</title>
</head>




".$_GET['message']."

</html>" , $headers);
echo ("Votre message a été envoyé avec succès - Your message was successfully sent!");
?>
<script>
resizeTo(300, 300)
//window.close()
</script>

et le fichier contact.asp avec ce code :

<%
Set reg = New RegExp
reg.Pattern = "^[A-Za-z0-9\._\-]+@([A-Za-z0-9\._\-]+\.)+[A-Za-z0-9\._\-]+$"
Set m = reg.Execute(Request.QueryString("contact@mon adressemail"))

if m.count > 0 then
smtpServer = "swapper.loc"
smtpPort = 25

name = Request.QueryString("your_name")
Set myMail = CreateObject("CDO.Message")
myMail.Subject = "from " & name
myMail.From = Request.QueryString("your_email")
myMail.To = Request.QueryString("recipient")
myMail.HTMLBody = "<html><head><title>Contact letter</title></head>
" & Request.QueryString("message") & "</html>"
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = smtpServer
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = smtpPort
myMail.Configuration.Fields.Update
myMail.Send
Response.Write("Votre message a été envoyé - Your email was sent")
else
Response.Write("Votre message est invalide - Invalid email")
End if

%>
<script>
resizeTo(300, 300)
//window.close()
</script>


(Si vous avez besoin d'autres infos pour m'aider, pas de souci...) Merci.
kristoch

Configuration: Mac OS X
Firefox 3.0.12

1 réponse

kristochh Messages postés 6 Date d'inscription mardi 27 janvier 2009 Statut Membre Dernière intervention 3 août 2009
3 août 2009 à 08:51
Y'a personne qui peut m'aider sur le petit problème que j'ai ?
0
Rejoignez-nous