Flash mx pro formular til asp
Hej eksperterJeg 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??
