Avatar billede Shasim Novice
07. december 2005 - 09:00 Der er 26 kommentarer og
1 løsning

Jmail modtagerproblem

Jeg forstår ikke horfor jeg ikke kan indsætte en af brugeren valgt mailadresse i modtager feltet nedenfor.

Set message = CreateObject ("JMail.Message")
'message.ServerAddress = smtpServer & ":" & smtpPort
message.From = Request.Form("fromEmail")
message.FromName = Request.Form("fromName")
message.Subject = "Henvendelse"
message.AddRecipient Request.Form("forEmail")
message.ContentType = "text/html" 'osv. osv.

Er dette ikke muligt, eller hvordan gør man?
Avatar billede Shasim Novice
07. december 2005 - 09:04 #1
Der skal vel et "=" ind foran Request.Form("forEmail")...
Avatar billede Shasim Novice
07. december 2005 - 09:04 #2
men det virker nu heller ikke
Avatar billede goose Nybegynder
07. december 2005 - 09:05 #3
Nej det skal der ikke.

Hvem hoster din hjemmeside hvor scriptet ligger?

Der er nemlig udbydere der kun accepterer at der sendes til e-mailadresser der er tilknyttet domænet.

Virker det heller ikke hvis du sætter dig selv som modtager?

/Goose
Avatar billede Shasim Novice
07. december 2005 - 09:08 #4
Jeg hoster den selv - det virker neår jeg skriver
message.AddRecipient "eneller@andenmail.dk"
Avatar billede para7 Nybegynder
07. december 2005 - 09:54 #5
Jeg vil lige foreslå at du laver en simpel test med anerkendte parametre:

<%

Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "mail.mitdomaene.dk"
JMail.Sender = "mig2@mitdomaene.dk"
JMail.Subject = "Simpel jMail testmail"
JMail.AddRecipient "mig2@mitdomaene.dk" 
body = "Her er body teksten"
jMail.ContentType  = "text/html"
JMail.Execute
Set JMail = Nothing

%>
Avatar billede Shasim Novice
07. december 2005 - 09:58 #6
alle mine parametre er velfungerende indtil jeg ændrer på AddRecipient...
Avatar billede Shasim Novice
07. december 2005 - 09:58 #7
min string kommer fra Flash...
Avatar billede para7 Nybegynder
07. december 2005 - 10:05 #8
"Ændrer"? Kan du da få det til at virke med fx JMail.AddRecipient "mig2@mitdomaene.dk"
Jeg går ud fra at dit eksempel øverst er et udpluk og du har execute med.
Mit råd er at gå til det simpleste eksempel og få det til at virke. Dernæst hvis en variabel ikke overføres, prøve at convertere den fx cstr(variabel).
Avatar billede Shasim Novice
07. december 2005 - 10:15 #9
ja, jeg ændrer message.AddRecipient ("en_mail@domæne.dk") til message.AddRecipient Request.Form("forEmail").
Ja, det er kun et udpluk, og det samlede script fungerer jo fint nok indtil jeg ændrer Addrecipient.
Dit råd om at konvertere min mail-variabel forstår jeg ikke
Avatar billede Shasim Novice
07. december 2005 - 10:17 #10
Undskyld det var uden parateser selvfølgelig
Avatar billede Shasim Novice
07. december 2005 - 10:19 #11
altså: message.AddRecipient "en_mail@domæne.dk"
Avatar billede eagleeye Praktikant
07. december 2005 - 10:52 #12
Der hvor du ligger ind i AddRecipient bruger du navnet forEmail og alle de andre skriver du formXxxx:

message.AddRecipient Request.Form("forEmail")

Så tjek hvad om dit form felt ikke hedder formEmail? Så linien skal være:

message.AddRecipient Request.Form("formEmail")
Avatar billede Shasim Novice
07. december 2005 - 10:54 #13
godt bud, men ikke rigtigt desværre
Avatar billede eagleeye Praktikant
07. december 2005 - 10:58 #14
Ved du om du modtager data fra flash filen. Du kan tjekke det ved at udskrive request.form eks:

response.write "FormData: " & request.form
response.end  'Sikre af siden stopper her
Avatar billede para7 Nybegynder
07. december 2005 - 11:03 #15
Det ser jo ud til at være a matter of overførsel af et formfelt, og skulle være til at overskue. Prøv at hente Request.Form("forEmail") ind som en variabel på siden og se om der modtages noget. Altså:

formEmail = Request.Form("formEmail")
response.write formEmail
response.end
Avatar billede Shasim Novice
07. december 2005 - 13:50 #16
Aner ikke hvor mit sidste indlæg forsvandt hen af, så her kommer det igen:

Jeg har fundet en fejl i mit script som kan ses nedenfor mæket 'problem. Det er en variabel som bare ikke vil med åbenbart, for scriptet fungerer fint uden denne linje:


<%
' Put your SMTP Mail server here. If you do not know, ask your network administrator
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 = "Henvendelse, LYKKERINGENE"
message.AddRecipient "shanne@d-w-d.dk", "Shanne"
message.ContentType = "text/html" ' or you can put 'text/plain' for plain text emessage
message.ISOEncodeHeaders = false
message.Charset = "ISO-8859-1"
message.ContentTransferEncoding = "8bit"
message.body = "<font face='Verdana' size ='2'>" &_
"Navn: " & Request.Form("fromName") &_
"<Br>"&_
"Adresse: "& Request.Form("adresse") &_
"<Br>"&_
"Postnr.: " & Request.Form("postnr") &_
"<Br>"&_
"Sted: "& Request.Form("city") &_
"<Br>"&_
"Telefon: "& Request.Form("tlf") &_
"<Br>"&_
"Email: "& Request.Form("fromEmail") &_
"<Br>"&_
"Kommentar: "& Request.Form("komm") &_
"<Br>"&_
"<Br>"&_
"Varenr. eksempelring: "& Request.Form("profil")& Request.Form("vnr_farve")& Request.Form("vnr_bredde")&"."& Request.Form("vnr_overflade")& Request.Form("vnr_moenster") &_
"<Br>"&_
"Varenr. partnerring: "& Request.Form("profil")& Request.Form("vnr_farve")& Request.Form("pvnr_bredde")&"."& Request.Form("vnr_overflade")& Request.Form("vnr_moenster") &_
"<Br>"&_
"Profil: "& Request.Form("profil") &_
"<Br>"&_
"Bredde: "& Request.Form("bredde") &_
"<Br>"&_
"Partnerbredde: "& Request.Form("partnerbredde") &_
"<Br>"&_
"Ringtype: "& Request.Form("ringtype") &_
"<Br>"&_
"Topfarve: "& Request.Form("topfarve") &_
"<Br>"&_
"Midtfarve: "& Request.Form("midtfarve") &_
"<Br>"&_
"Bundfarve: "& Request.Form("bundfarve") &_
"<Br>"&_
"Overflade: "& Request.Form("overflade") &_
"<Br>"&_
"Moenster: "& Request.Form("moenster")  &_
"<Br>"&_
"Graveringstype: "& Request.Form("gravsymbolnr") &_ 'problem
"<Br>"&_
"Graveringstype: "& Request.Form("grav_type") &_
"<Br>"&_
"Graveringstekst: "& Request.Form("gravtekst") &_
"<Br>"&_
"Partnergraveringstekst: "& Request.Form("partnergravtekst") &_
"<Br>"&_
"Ring str.: "& Request.Form("ring_str") &_
"<Br>"&_
"Partner ring str.: "& Request.Form("partner_str") &_
"<Br>"&_
"Enkelte brill.: "& Request.Form("brill_bestiltext") &_
"<Br>"&_
"Stik brill: "& Request.Form("stik_bestiltext") &_
"<Br>"&_
"Spenn brill.: "& Request.Form("spenn_bestiltext") &_
"<Br>"&_
"Dryss brill.: "& Request.Form("dryss_brill_nr1") &""& Request.Form("dryss_brill_nr2") &""& Request.Form("dryss_brill_nr3") &_
"<Br>"&_
"Brill. farve: "& Request.Form("brill_farve") &_
"<Br>"&_
"Eksempelringpris: "& Request.Form("eksempelring_pris") &_
"<Br>"&_
"Brill. pris: "& Request.Form("brill_pris") &_
"<Br>"&_
"Total pris eksempelring: "& Request.Form("eksempel_total_pris") &_
"<Br>"&_
"Partnerringpris: "& Request.Form("partnerring_pris")  &_
"<Br>"&_
"Graverings pris: "& Request.Form("grav_pris") &_
"<Br>"&_
"Total pris: "& Request.Form("total_pris") &_
"<Br>"&_
"</font>"

' 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
07. december 2005 - 13:58 #17
Jeg kan ikke engang sætte et " ' " foran linjen, jeg skal fjerne den helt før det virker....
Avatar billede Shasim Novice
07. december 2005 - 14:19 #18
Til gengæld virker det med AddRecipient nu, så hurra for det, men er der ikke en af jer som kan hjælpe mig med ovenstående problem?
Avatar billede para7 Nybegynder
07. december 2005 - 14:44 #19
Den linje hvor det er galt kan du prøve at udskite med en linje, der er OK og se om der meldes fejl stadig.
"Graveringstype: "& Request.Form("gravsymbolnr") &_ 'problem
Og nej man kan ikke sætte nogen kommentering, da det er een lang linje, splittet op med &_
Avatar billede Shasim Novice
07. december 2005 - 15:07 #20
Jeg har både prøvet at udskifte den, omdøbe variablen, og flytte linjen, men ingen ting virker
Avatar billede Shasim Novice
07. december 2005 - 15:38 #21
Jeg gi'r op..... er der nogen som vil have points?
Avatar billede para7 Nybegynder
08. december 2005 - 10:21 #22
Jeg ville ikke give op ;) Så må det da ændre den fejlmeddelelse du får, at du ænderer i den linje, som systemet skriver giver fejlen. Hvis du fx udskifter Request.Form("gravsymbolnr") med Request.Form("gravtekst"), så SKAL du da ikke få nogen fejl. Og så er det lige at prøve at udskrive den request, som skulle volde problemer:

response.write Request.Form("gravsymbolnr")
response.end

Det er noget pilleri, men løsningen er altid lige om hjørnet med lidt systematik og udelukkelsesmetode. Du kan bare give mig nogle af pointene, hvis du har fået løsning på nogle af problemerne.
Avatar billede Shasim Novice
08. december 2005 - 10:24 #23
Ved du hvad (jeg gav heller ikke op :)) jeg fandt fejlen, men forstår den ikke: hvis jeg ændrede strengen "Graveringssymbol: " til "Symbolnr.: " så kørte det!!!!
Jeg fatter det ikke!
Avatar billede para7 Nybegynder
08. december 2005 - 11:11 #24
OK. Jeg har også været ude for at en editor kan lave kuk i den og tilsyneladende ændre nogle tegn, man ikke kan se. Jeg arbejder næsten altid kun i kodevisning. Men også her kan der ske sådan noget. Prøv at rette siden med Notepad til det navn som du ønsker, så skulle det gerne falde på plads.
Avatar billede para7 Nybegynder
08. december 2005 - 11:12 #25
PS: Nogle tror at WordPad er OK ;)
Avatar billede Shasim Novice
08. december 2005 - 13:43 #26
Og det er den alså ikke? Men jeg har nu også brugt Dreamweaver, og må sige at jeg føler mig noget utryk ved at den slags kan ske. Tak for din hjælp, da der ikke er andre svar får du points'ne :)
Avatar billede para7 Nybegynder
08. december 2005 - 14:09 #27
Tak så rigeligt. Ja, man kan jo godt gå hen og blive helt overtroisk, når der sker uforklarlige ting i koderne. Men så kan man også gå back to basics :)
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
Kurser inden for grundlæggende programmering

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