Avatar billede Shasim Novice
09. november 2005 - 10:14 Der er 1 løsning

sende bestilling - loadvars

Jeg skal sende en formular fra Flash til sendmail.asp på serveren. Det virker fint nok, men jeg vil gerne sende forskelligt variabelindhold fra min film med, men kan ikke finde ud af det.

Her er scriptet i min Flash:
cbtSend.addEventListener("click", this.sendbestilling);
stop();

function sendbestilling() {
    var sender:LoadVars = new LoadVars();
    var responder:LoadVars = new LoadVars();
    var scriptURL:String = "http://www.minserver.dk/ch30/sendmail.asp";
    responder.onLoad = function(success){
        if (success) {
            _global.serverTime = this.timeDate;
            _root.gotoAndStop("output");
        } else {
            _root.gotoAndStop("error");
        }
    };
    sender.fromEmail = fromEmail_txt.text;
    sender.fromName = fromName_txt.text;
    sender.navn = fromName_txt.text;
    sender.adresse = adresse_txt.text;
    sender.postnr = postnr_txt.text;
    sender.city = city_txt.text;
    sender.tlf = tlf_txt.text;
    sender.profil = _root.profil.text; //ikke en formularvariabel
    sender.sendAndLoad(scriptURL, responder, "POST");
    _root.gotoAndStop("wait");
}
this._lockroot = true;


Sådan ser min sendmail.asp ud:

<%
'
smtpServer = "smtp.mail.dk"
smtpPort = 25

' ---
dim smtpServer, smtpPort

Set message = CreateObject ("JMail.Message")
'message.ServerAddress = smtpServer & ":" & smtpPort
message.From = Request.Form("fromEmail")
message.FromName = Request.Form("fromName")
message.Subject = "Flash Movie Feedback"
message.AddRecipient "mig@mail.dk", "Shanne"
message.ContentType = "text/html" ' or you can put 'text/plain' for plain text emessage
message.ISOEncodeHeaders = false
message.ContentTransferEncoding = "8bit"
message.body = Request.Form("fromName") &" "& Request.Form("adresse") &" "& Request.Form("postnr") &" "& Request.Form("city") &" "& Request.Form("tlf") &" "& Request.Form("profil") //???

' 1 - highest priority (Urgent) ' 3 - normal ' 5 - lowest
message.Priority = 3


' Add sender's IP address (not required, but useful for web-based emessage)
'message.AddHeader "Originating-IP", Request.ServerVariables ("REMOTE_ADDR")

'Send the e-mail
message.Send(smtpServer & ":" & smtpPort)
Response.write "success=1&timeDate=" & Server.URLEncode(message.Date) & "&end=1"
set message = nothing
%>
Avatar billede Shasim Novice
20. december 2005 - 11:32 #1
lukker
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester