Flash Hjälp? kontaktformulär

Avdelningen för webbrelaterad programmering och grafisk design.
Post Reply
User avatar
Lyngan
Posts: 580
Joined: 2002-10-14 9:32:14
Location: Småland / Sverige

Flash Hjälp? kontaktformulär

Post by Lyngan »

Tjenare

Jag har problem med att få mitt kontaktformulär att fungera som jag vill.

http://jcl-sweden.com/kontakt/contactform.html

Skulle helst vilja slippa att köra formuläret genom ett e-post program som t ex outlook.
Sedan ett + i kanten skulle vara att göra så man får ett meddelande när man har skickat formuläret. t ex "Tack för ditt mail, vi besvarar det så fort vi kan"

Tack på förhand ;D
Gamestation: 4400+, 936GB, 2024mb, 256mb
Workstation: 2,8ghz, 80gb, 512mb, 64mb
Server: IBM Netfinity 5500
User avatar
fisk
Posts: 7485
Joined: 2003-03-18 21:09:30
Location: Örebro / Sverige
Contact:

Re: Flash Hjälp? kontaktformulär

Post by fisk »

Då får du skicka variablerna från FLASH till t.ex. ett PHP-script som använder sig av eg. en databas för att lagra vad det nu är du vill skall lagras, och tillika maila iväg via servern.
Aotearoa - tino rangatiratanga
User avatar
Lyngan
Posts: 580
Joined: 2002-10-14 9:32:14
Location: Småland / Sverige

Re: Flash Hjälp? kontaktformulär

Post by Lyngan »

Tjenare

Tack för ditt svar. Nu har jag gjort en PHP koppling och allt fungerar förutom "Subject". Vad har jag missat?

Här finns filerna
http://jcl-sweden.com/hemsida_09/
Lyngan wrote:Image

FLASH

Code: Select all

//---------------Setup variables
var loader:URLLoader = new URLLoader();
var req:URLRequest = new URLRequest("contact.php");
var variables:URLVariables = new URLVariables();
loader.dataFormat = URLLoaderDataFormat.VARIABLES;
req.method = URLRequestMethod.POST;
var gender:String="";
var senderRpl:String="No";
//--------------Set tab index
txName.tabIndex = 0;
txEmail.tabIndex = 1;
txSubject.tabIndex = 2;
txMessage.tabIndex = 3;
//--------------Set listener fot textfield changes
txName.addEventListener(Event.CHANGE, txErrorCheck);
txEmail.addEventListener(Event.CHANGE, txErrorCheck);
txSubject.addEventListener(Event.CHANGE, txErrorCheck);
txMessage.addEventListener(Event.CHANGE, txErrorCheck);
function txErrorCheck(event:Event):void {
	if (txError.text.length>0) {
		txError.text = "";
	}
}
//--------------Set checkbox
cb.addEventListener(MouseEvent.CLICK,setReply);
function setReply(event:Event):void {
	senderRpl="Yes";
}
//--------------Set radio buttons for gender
rad1.addEventListener(MouseEvent.CLICK, changeHandler);
rad2.addEventListener(MouseEvent.CLICK, changeHandler);
function changeHandler(event:Event):void {
	gender=event.currentTarget.label;
}
//--------------Set up form buttons
butSend.addEventListener(MouseEvent.CLICK, sendForm);
butSend.txTitle.text="SUBMIT";
butReset.addEventListener(MouseEvent.CLICK, resetForm);
butReset.txTitle.text="RESET";
//--------------Validate fields and submit form
function sendForm(evt:MouseEvent):void {
	if (txName.text.length<=0) {
		txError.text = "** Username Required **";
	} else if (!txEmail.text.length || txEmail.text.indexOf("@") == -1 || txEmail.text.indexOf(".") == -1) {
		txError.text = "missing field/Invalid email";
	} else if (txMessage.text==""||txMessage.text.length<=1) {
		txError.text = "** Message Required **";
	} else if (txSubject.text==""||txSubject.text.length<=1) {
		txError.text = "** Subject Required **";
	} else if (gender=="") {
		txError.text = "** Please select gender **";
	} else {
		mcLoader.gotoAndPlay(2);
		variables.senderName = txName.text;
		variables.senderEmail = txEmail.text;
		variables.senderSubject = txSubject.text;
		variables.senderMsg = txMessage.text;
		variables.senderSex = gender;
		variables.senderRpl = senderRpl;
		req.data = variables;
		loader.load(req);
		loader.addEventListener(Event.COMPLETE, receiveLoad);
	}
}
function receiveLoad(evt:Event):void {
	if (evt.target.data.retval == 1) {
		mcLoader.gotoAndStop(25);
	} else {
		mcLoader.gotoAndStop(1);
		txError.text="**  ERROR SENDING MAIL **";
	}
}
//--------------Reset form
function resetForm(evt:MouseEvent):void {
	txName.text="";
	txEmail.text="";
	txSubject.text="";
	txMessage.text="";
	cb.selected=false;
}
stop();

PHP

Code: Select all

<?php
$headers  = "MIME-Version: 1.0\r\n"; 
$headers .= "Content-type: text/html; charset=iso-8859-1\r\n";
if(empty($_POST['senderEmail'])){
	echo"no email address found";
	exit;
}
$senderName		= $_POST['senderName'];
$senderEmail	= $_POST['senderEmail'];
$senderSubject	= $_POST['senderSubject'];
$senderMsg		= nl2br($_POST['senderMsg']);
$senderSex		= $_POST['senderSex'];
$senderRpl		= $_POST['senderRpl'];
$sitename		= "JCL-Sweden";
$to 			= "bamse_is@hotmail.com";
$ToName 		= "Your name";
$date 			= date("m/d/Y H:i:s");
$ToSubject 		= "Email From $senderName via $sitename";
$comments 		= $msgPost;
$EmailBody 		= "A visitor to $sitename has left the following information<br />
              	Sent By: $senderName
			 	<br /><br />
				Message Sent:
			  	<br />$senderMsg<br /><br />
				Sex: $senderSex<br /><br />
				Require reply: $senderRpl
			  	<br />";  
$EmailFooter	= "<br />Sent: $date<br /><br />";
$Message 		= $EmailBody.$EmailFooter;
$ok = mail($to, $ToSubject, $Message, $headers . "From:$senderName <".$to.">");
if($ok){
	echo "retval=1";
}else{
	echo "retval=0";
}

?>
Last edited by Lyngan on 2009-04-11 12:46:41, edited 1 time in total.
Gamestation: 4400+, 936GB, 2024mb, 256mb
Workstation: 2,8ghz, 80gb, 512mb, 64mb
Server: IBM Netfinity 5500
User avatar
nva
Hedersbit
Posts: 2517
Joined: 2002-03-07 23:34:21
Location: Skåneland
Contact:

Re: Flash Hjälp? kontaktformulär

Post by nva »

Om du ändrar

Code: Select all

$ToSubject       = "Email From $senderName via $sitename";
till

Code: Select all

$ToSubject = $senderSubject;
i din php-kod så kan det eventuellt fungera.
The three most dangerous things in the world are a programmer with a soldering iron, a hardware type with a program patch and a user with an idea.

In theory, there is no difference between theory and practice. But, in practice, there is.
User avatar
Lyngan
Posts: 580
Joined: 2002-10-14 9:32:14
Location: Småland / Sverige

Re: Flash Hjälp? kontaktformulär

Post by Lyngan »

nva wrote:Om du ändrar

Code: Select all

$ToSubject       = "Email From $senderName via $sitename";
till

Code: Select all

$ToSubject = $senderSubject;
i din php-kod så kan det eventuellt fungera.
tjena

fungerar ändå inte :(
Gamestation: 4400+, 936GB, 2024mb, 256mb
Workstation: 2,8ghz, 80gb, 512mb, 64mb
Server: IBM Netfinity 5500
User avatar
Hein
Posts: 1291
Joined: 2002-03-09 19:38:38
Location: Norrland
Contact:

Re: Flash Hjälp? kontaktformulär

Post by Hein »

Verkar som du aldrig skickar något till contact.php.

Installera "Live HTTP headers"-pluginet för Firefox tex. så kan du debuga själv.
. .. ... .... ..... ...... ....... ....... ..........
User avatar
Lyngan
Posts: 580
Joined: 2002-10-14 9:32:14
Location: Småland / Sverige

Re: Flash Hjälp? kontaktformulär

Post by Lyngan »

Hein wrote:Verkar som du aldrig skickar något till contact.php.

Installera "Live HTTP headers"-pluginet för Firefox tex. så kan du debuga själv.
"Aldrig skickar något till contact.php?"
Allt fungerar förutom "subject"

Har inte Firefox men kan göra det om det verkligen blir nödvändigt
Gamestation: 4400+, 936GB, 2024mb, 256mb
Workstation: 2,8ghz, 80gb, 512mb, 64mb
Server: IBM Netfinity 5500
User avatar
Hein
Posts: 1291
Joined: 2002-03-09 19:38:38
Location: Norrland
Contact:

Re: Flash Hjälp? kontaktformulär

Post by Hein »

Inte på denna: http://jcl-sweden.com/kontakt/contactform.html
Då kör du ju en mailto:.
. .. ... .... ..... ...... ....... ....... ..........
User avatar
Lyngan
Posts: 580
Joined: 2002-10-14 9:32:14
Location: Småland / Sverige

Re: Flash Hjälp? kontaktformulär

Post by Lyngan »

Hein wrote:Inte på denna: http://jcl-sweden.com/kontakt/contactform.html
Då kör du ju en mailto:.
Ja det stämmmer men om du läser längre ner (tredje inlägget) så har jag skrivit koden samt en bild på det nya formuläret.
Vill inte behöva använda en klient utan köra det direkt genom servern.. Har halva inne fast den tar inte med "subject"
Förövrigt funkar formuläret...
Gamestation: 4400+, 936GB, 2024mb, 256mb
Workstation: 2,8ghz, 80gb, 512mb, 64mb
Server: IBM Netfinity 5500
Post Reply