# Help in Creating Flash and ASP Contact Form

**URL:** <https://forum.kirupa.com/t/help-in-creating-flash-and-asp-contact-form/237422>\
**Category:** flash\
**Created:** [August 30, 2007, 7:25am UTC](https://forum.kirupa.com/t/help-in-creating-flash-and-asp-contact-form/237422 "2007-08-30T07:25:03Z")\
**Posts on this page:** 1\
**Page:** 1

<div class="post-metadata">

**Author:** ![Mangesh](https://avatars.discourse-cdn.com/v4/letter/m/d78d45/32.png) [@Mangesh](https://forum.kirupa.com/u/Mangesh)\
**Post date:** [August 30, 2007, 7:25am UTC](https://forum.kirupa.com/t/help-in-creating-flash-and-asp-contact-form/237422/1 "2007-08-30T07:25:03Z")

</div>

Hello friends,

I am working on a flash and asp contact form. I am having some problem with it. it doesn’t send mail to the desired email address.

Actionscript code for button:

on (release) {  
// Now import the variables we  
// need to send in this movie clip  
sender\_title = \_root.Stitle.text  
sender\_mail = \_root.Semail.text  
sender\_name = \_root.Sname.text  
sender\_phone = \_root.Sphone.text  
sender\_subject = \_root.Ssubject.text  
sender\_message = \_root.Smessage.text  
sender\_f14a = \_root.Sf14a  
// all the vars we just imported  
// will be sent via POST method now  
loadVariables(“sendmail.asp”,this,“POST”);  
// and when receives the answer from  
// the server…  
this.onData = function()  
{  
for(var a in this) trace([a,this[a]])  
// ok, next frame  
\_root.nextFrame();  
if(this.output==‘sent’)  
{  
// in case of success  
\_root.errTitle = “Thank You.”;  
\_root.errType = “Your message has been succesfully sent.”;  
} else {  
// else  
\_root.errTitle = “Error!”;  
\_root.errType = “Attention, an error occurred while processing your message. Please try again later.”;  
}  
}  
}

and the ASP Code:

\<%  
Dim ftitle, femail, fname, fphone, fsubject, fmessage, fradio

Set myMail=CreateObject(“CDO.Message”)  
ftitle=Request.Form(“sender\_title”)  
femail=Request.Form(“sender\_email”)  
fname=Request.Form(“sender\_name”)  
fphone=Request.Form(“sender\_phone”)  
fsubject=Request.Form(“sender\_subject”)  
fmessage=Request.Form(“sender\_message”)  
fradio=Request.Form(“sender\_f14a”)  
myMail.Subject= & fsubject  
myMail.From = & femail  
[myMail.To="zealousstudio@yahoo.com](mailto:myMail.To=%22zealousstudio@yahoo.com)"  
myMail.HTMLBody = “\<h1\>Title:\</h1\>” & ftitle & “\<br /\>\<h1\>Email:\</h1\>” & femail & “\<br /\>\<h1\>Name:\</h1\>” & fname & “\<br /\>\<h1\>Phone:\</h1\>” & fphone & “\<br /\>\<h1\>Subject:\</h1\>” & fsubject & “\<br /\>\<h1\>Message:\</h1\>” & fmessage & “\<br /\>\<h1\>Contact Us By:\</h1\>” & fradio & “\<br /\>”  
myMail.Send  
%\>

Please help out from this.

Thanks,

Mangesh
