Avatar billede brianovitch Nybegynder
07. april 2005 - 15:03 Der er 2 kommentarer

Flash mx pro formular til asp

Hej eksperter

Jeg har fundet er tutorial hvor jeg kan lave en formular og sende mail via en ASP side og det fungerer fint. Nu har jeg kopieret koderne fra send knappen og modificeret asp siden så den passer til min server.

Nu kan jeg ikke få hul igennem til asp siden???

Noget siger mig at tutorialen er lavet i en ældre version(flash 5), men når jeg gennem den til flash mx pro dur den ikke længere.

Dette er koden på knappen:

on(press) {
    loadVariablesNum("flashmail.asp", 0, "POST");
    gotoAndStop("send");
    DynText = "Sender... Vent venligst";
}

Og det er koden i asp siden:

<%@ Language=VBScript %>
<%
Response.Buffer = true

Dim myMail, mtextz, mtext00, mtext01, mtext02, mtext03, mtext04, mtext05, mtext06, mtext07, mtext08

mtext00 = "Emne: " & Request.Form("emne")  & vbcrlf
mtext01 = "Firma:" & Request.Form("firma") & vbcrlf
mtext02 = "Kontakt:"  & Request.Form("kontakt") & vbcrlf
mtext03 = "Telefon:"  & Request.Form("telefon") & vbcrlf
mtext04 = "E-mail: " & Request.Form("email")  & vbcrlf
mtext05 = "Adresse: " & Request.Form("adresse")  & vbcrlf
mtext06 = "Postnummer: " & Request.Form("postnummer")  & vbcrlf
mtext07 = "By: " & Request.Form("by")  & vbcrlf
mtext08 = "Kommentar: " & Request.Form("kommentar")  & vbcrlf

mtextz = mtext00 &  mtext01 &  mtext02 &  mtext03  &  mtext04  &  mtext05 &  mtext06 &  mtext07 &  mtext08

Set myMail = CreateObject("CDONTS.NewMail")

if request.Form("email") = "" then
    myMail.From = "No name"
    else
    myMail.From = request.Form("email")
end if

myMail.To = "navn@mitdomain.dk"
myMail.MailFormat = 1
myMail.Subject = "Velkommen"
myMail.Body = mtextz
myMail.Send
Set myMail = Nothing
Response.write "DynText=E-mail sent successfully"
%>

ER DER NOGET DER KAN GIVE MIG EN FORKLARING PÅ HVORFOR AT JEG IKKE KAN FÅ HUL IGENNEM??
Avatar billede rohaje Nybegynder
08. april 2005 - 20:28 #1
//Måske skulle du prøve loadVars objectet,, ikke om jeg ved at det skulle løse det, - men det kunne måske se nogen lunde sådan ud
function sendMail() {
    mail_lv = new LoadVars();
    mail_lv.emne = emne.text;
    mail_lv.firma = firma.text;
    mail_lv.firma = firma.text;
    //osv. .....
    //
    statusreturn_lv = new LoadVars();
    statusreturn_lv.onLoad = function(ok) {
        if (ok) {
            DynText.text = this.DynText;
            // gør ellers hvad der skal gøres
        } else {
            DynText.text = "Server connection failded";
        }
    };
    mail_lv.sendAndLoad("flashmail.asp", statusreturn_lv, "POST");
}
Avatar billede rohaje Nybegynder
08. april 2005 - 20:31 #2
hov det gik lidt hurtigt- håber du kan se meningen aligevel :)
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