qualcuno puo aiutarmi?

**Pasquale91** · 08-06-2011, 13:28

Salve ragazzi...Inizio con delle scuse qualora questo topic esista gia...Volevo esporvi il mio problema sperando che qualcuno mi possa aiutare..Sto uscendo pazzo

In pratica ho un sito flash e nella cartella contenente i vari "pezzi" del sito ho un Contact.asp ed un contact.php. Devo fare in modo che l'email inviata dall'altra parte arrivi direttamente alla mia casella di posta elettronica. Ma non so dove modificare il codice.

qualcuno potrebbe aiutarmi? devo e posso postare il codice? vi prego aiutatemi Grazie

**ciro78** · 08-06-2011, 13:31

ragiono sul file php visto che siamo sul forum specifico

il comando per inviare mail è appunto mail

trovi tutte le informazioni su

http://it.php.net/manual/en/function.mail.php

quindi devi cercare questa funzione nello script e modificarla secondo le tue esigenze e le indicazioni del manuale

**k.b** · 08-06-2011, 13:51

Ti invito a riaprire la discussione con un titolo conforme al regolamento

**Pasquale91** · 08-06-2011, 13:53

ok hai ragione...ho cambiato il titolo...ti ringrazio x la risposta...ho dato un occhiata al manuale e devo dire che io ho un codice un pochino diverso dagli esempi riportati nel manuale...il mio è un po piu lungo...posso postare il codice o è vietato?

**seokey** · 08-06-2011, 15:55

NOOOOOO! non postare niente!

Scherzo

il forum sopratutto serve a mio avviso per dare consigli e soluzioni proprio vedendo il codice... postalo, dai !

**Pasquale91** · 08-06-2011, 16:01

seokey...devo fare in modo che l'email inviate dal sito mi arrivino nella mia casella di posta...questo è il codice del contact.asp :

<%
'----function that removes html tags-----------
Function RemoveHTML( strText )
Dim RegEx
Set RegEx = New RegExp
RegEx.Pattern = "<[^>]*>"
RegEx.Global = True
RemoveHTML = RegEx.Replace(strText, "")
End Function
'---------------------------------------------

'------defining script vars-------------------
Dim mailObj, mailCfg, myBody, fld

Dim RegEx
set RegEx = New RegExp
'--------------------------------------------

'------getting data sent by flash (filtering configuration data)------------
For Each fld in Request.Form
If Request.Form(fld) <> "" and _
fld <> "mail_to" and _
fld <> "smtp_server" and _
fld <> "smtp_port" and _
fld <> "plain_text" and _
fld <> "mail_from" and _
fld <> "mail_subject" Then
myBody = myBody & vbCRLF & " " & fld & " :
" & Trim(Request.Form(fld)) & "
"
End If
Next
'---------------------------------------------------------------------------

'----------setting conf data------------------------------------------------
On Error Resume Next
Set myMail = CreateObject("CDO.Message")
myMail.Subject = Request.Form("mail_subject")
myMail.From =Request.Form("mail_from")
myMail.To = Request.Form("mail_to")

'--------if plain text is set to true removing html---------------------------------------
if Request.Form("plain_text") = "true" then

myMail.TextBody = RemoveHTML(myBody)

'-------otherwise composing message body--------------------------------------------------
else myMail.HTMLBody = "<html><body>" & myBody & "</body></html>"

end if
'----------setting configuration params for smtp----------------------------------------------------------------------------------
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 1
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = Request.Form("smtp_server")
myMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = Request.Form("smtp_port")
myMail.Configuration.Fields.Update
'---------------------------------------------------------------------------------------------------------------------------------
myMail.Send '---------------sending message

If Err = 0 Then
Response.Write("&mail=1") 'if there the message is sent return 1 to flash
Else
Response.Write("&mail=0") 'otherwise return 0
End If

%>

Invece questo è il codice del contact.php :

<?php
//-----------------Getting data sent by flash---------------------
foreach ($_POST as $key => $value){

if ($key != 'mail_to' && $key != 'smtp_server' && $key != 'smtp_port' && $key != 'mail_from' && $key != 'mail_subject' && $key != 'plain_text'){

$mail_body .= ''.str_replace('_',' ',$key).':
';

$mail_body .= ''.stripslashes($value).'
';
}
}
//-----------------------------------------------------------------

$message = '<html><body>'.$mail_body.'</body></html>'; // mail body

//------------if plain text is set to true removing html tags------
if ($_POST['plain_text']=='true') {

$message = str_replace('
',"\r\n", $message);

$message = strip_tags($message);

//------------------------------------------------------------------
} else {
//----otherwise composing message headers---------------------------
$headers = 'MIME-Version: 1.0' . "\r\n";

$headers .= 'Content-type: text/html; charset=windows-1251' . "\r\n";
//------------------------------------------------------------------
}

//------------setting conf data-------------------------------------
$to = $_POST['mail_to'];

$from = $_POST['mail_from'];

$subject = $_POST['mail_subject'];

$smtp_server = $_POST['smtp_server'];

$smtp_port = $_POST['smtp_port'];
//------------------------------------------------------------------

//---------setting header info--------------------------------------

$headers .= 'From:' .$from;
//------------------------------------------------------------------

if (mail($to, $subject, $message, $headers)){ // sending mail

print('&mail=1'); //succes

} else {

print('&mail=0');//failure

}

?>

ora mi chiedevo quale stringa dovrei modificare per far ricevere l'e-mail sulla mia casella? grazie per la tua disponibilità

Discussione: qualcuno puo aiutarmi?

Strumenti discussione

Ricerca discussione

Visualizza

Aiuto con contact.php

Permessi di invio