Søg
Avatar billede Tony Juniormester
05. april 2005 - 20:22 Der er 21 kommentarer og
2 løsninger

Sende kopi af henvendelse til afsender i JMail?

Jeg vil gerne om min lille kontaktformular kunne sende en kopi af brugers henvendelse til vedkommende også.

Hvordan gør man det i JMail?

Jeg har prøvet alverdens varianter af 'AddRecipient', men når ikke til noget brugbart ...

Formularfeltet hvori bruger opgiver sin email adresse hedder: mailfrom
Avatar billede jsc Nybegynder
05. april 2005 - 21:02 #1
du laver bare to modtagere under hinanden...

/jsc
Avatar billede jsc Nybegynder
05. april 2005 - 21:02 #2
JMail.AddRecipient "modtager1@domain.dk"
JMail.AddRecipient "modtager2@domain.dk"

/jsc
Avatar billede Tony Juniormester
05. april 2005 - 21:11 #3
Ja, den har jeg prøvet i mange varianter (Husk den skal hente mailadressen bruger indtaster i formularen)

JMail.AddRecipient mailfrom - Virker ikke
JMail.AddRecipient (mailfrom) - Virker ikke
JMail.AddRecipient ("mailfrom") - Virker ikke
Avatar billede jsc Nybegynder
05. april 2005 - 21:13 #4
JMail.AddRecipient request.form("email1")
JMail.AddRecipient request.form("email2")

/jsc
Avatar billede jsc Nybegynder
05. april 2005 - 21:13 #5
email1 og email2 er navne på forme...

/jsc
Avatar billede apo Praktikant
05. april 2005 - 21:22 #6
Prøv at smide din kode herind...

Apo
Avatar billede Tony Juniormester
05. april 2005 - 21:27 #7
JMail.ContentType = "text/html"
JMail.ServerAddress = "nnnnn.oooo.dk"
JMail.Priority = 3
JMail.Sender = Request("namefrom")
JMail.Sender =  Request("mailfrom")
JMail.AddRecipientEx "nnn@ppp.dk", "NN"
JMail.AddRecipient request.form("mailfrom")
JMail.Subject = "Henvendelse fra hjemmesiden www.NNN.com"
JMail.Body = Request("textmsg")
Avatar billede apo Praktikant
05. april 2005 - 21:35 #8
Jeg ved ikke om denne fungerer, men prøv følgende:

<%
Set JMail = Server.CreateObject("JMail.Message")
JMail.ContentType = "text/html"
JMail.ServerAddress = "nnnnn.oooo.dk"
JMail.Priority = 3
JMail.Sender = Request("namefrom")
JMail.AddRecipient "nnn@ppp.dk", "NN"
JMail.Subject = "Henvendelse fra hjemmesiden www.NNN.com"
JMail.Body = Request("textmsg")
Set JMail = Nothing

Set JMail = Server.CreateObject("JMail.Message")
JMail.ContentType = "text/html"
JMail.ServerAddress = "nnnnn.oooo.dk"
JMail.Priority = 3
JMail.Sender = Request("namefrom")
JMail.AddRecipient request.form("mailfrom")
JMail.Subject = "Kopi af henvendelse fra hjemmesiden www.NNN.com"
JMail.Body = Request("textmsg")

If Not JMail.Send(--- Din SMTP her! ---) Then
  Response.Write "Mail ikke sendt!"
Else
  Response.Write "Mailen blev sendt!"
End If

Set JMail = Nothing
%>

Apo
Avatar billede apo Praktikant
05. april 2005 - 21:37 #9
Forkert, prøv denne i stedet:

<%
Set JMail = Server.CreateObject("JMail.Message")
JMail.ContentType = "text/html"
JMail.ServerAddress = "nnnnn.oooo.dk"
JMail.Priority = 3
JMail.Sender = Request("namefrom")
JMail.AddRecipient "nnn@ppp.dk", "NN"
JMail.Subject = "Henvendelse fra hjemmesiden www.NNN.com"
JMail.Body = Request("textmsg")

If Not JMail.Send(--- Din SMTP her! ---) Then
  Response.Write "Mail ikke sendt!"
Else
  Response.Write "Mailen blev sendt!"
End If

Set JMail = Nothing

Set JMail = Server.CreateObject("JMail.Message")
JMail.ContentType = "text/html"
JMail.ServerAddress = "nnnnn.oooo.dk"
JMail.Priority = 3
JMail.Sender = Request("namefrom")
JMail.AddRecipient request.form("mailfrom")
JMail.Subject = "Kopi af henvendelse fra hjemmesiden www.NNN.com"
JMail.Body = Request("textmsg")

If Not JMail.Send(--- Din SMTP her! ---) Then
  Response.Write "Mail ikke sendt!"
Else
  Response.Write "Mailen blev sendt!"
End If

Set JMail = Nothing
%>

Apo
Avatar billede Tony Juniormester
05. april 2005 - 21:48 #10
apo:

Desværre har jeg ikke adgang til udbyders SMTP. Hans pop3 er: pop3.ZZZZ.dk, men det virker ikke bare at bruge den ...
Avatar billede apo Praktikant
05. april 2005 - 21:56 #11
Hvordan sender du så mails via JMail?
Avatar billede jsc Nybegynder
05. april 2005 - 21:57 #12
som jeg siger, så burde det her virker hos dig:

Set JMail = Server.CreateObject ("JMail.SMTPMail")
JMail.ServerAddress = "localhost"
JMail.Sender = "afsender@domain.dk"
JMail.Subject = "Emne på beskeden"
JMail.AddRecipient "modtager1@domain.dk"
JMail.AddRecipient "modtager2@domain.dk"
JMail.AddRecipient "modtager3@domain.dk"
JMail.Body = "Her kommer beskeden"
JMail.Execute


/jsc
Avatar billede jsc Nybegynder
05. april 2005 - 21:57 #13
sådan plejer jeg gøre det

/jsc
Avatar billede Tony Juniormester
05. april 2005 - 22:13 #14
apo:
Set JMail = Server.CreateObject("JMail.SMTPMail")
og
JMail.ServerAddress = "relay.NNN.dk"


jsc:
Ja, det siger du jo, men når jeg gør det, så får jeg:

Request object error 'ASP 0102 : 80004005'
Expecting string input
/aspmail01.asp, line 22
The function expects a string as input.

... og hvis jeg giver den en string som i: JMail.AddRecipient "mailfrom", så tager den ikke brugers indtastede emailadresse
Avatar billede Tony Juniormester
05. april 2005 - 22:22 #15
jsc:

JMail.AddRecipient request.form "mailfrom" =

Microsoft VBScript compilation error '800a0401'
Expected end of statement
/aspmail01.asp, line 22
JMail.AddRecipient request.form "mailfrom"
--------------------------------^
Avatar billede apo Praktikant
05. april 2005 - 22:25 #16
JMail.AddRecipient request.form("mailfrom")

Du skal huske '()'

Apo
Avatar billede Tony Juniormester
05. april 2005 - 22:40 #17
Desværre bliver jeg i øjeblikket ved med at få:

jmail.SMTPMail error '8000ffff'
The message was undeliverable. All servers failed to receive the message
/aspmail01.asp, line 25

Serveren er nok ved at være aftentræt ;-)
Avatar billede Tony Juniormester
05. april 2005 - 23:02 #18
Nej, desværre - det virker heller ikke med:

JMail.AddRecipient request.form("mailfrom")
Avatar billede jsc Nybegynder
05. april 2005 - 23:27 #19
to ting at gøre:

prøv en anden server med de koder jeg har givet, eller prøve den her, hvor du sender en CC kopi til en af de to:

<%
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ContentType = "text/html"
JMail.ServerAddress = "mail.domain.dk"
JMail.Priority = 1
JMail.Sender = "afsender@email.adr"
JMail.AddRecipientEx "modtager@email.adr", "Modtagers navn"
Jmail.AddRecipientCC "andenmodtager@email.adr"
Jmail.AddRecipientBCC "skjultmodtager@email.adr"
JMail.Subject = "Dette er emne linien.."
JMail.Body = "Her skriver du din besked..."
JMail.Execute
Set JMail = Nothing
%>

/jsc
Avatar billede Tony Juniormester
06. april 2005 - 08:35 #20
Pyh-ha, det holdt hårdt, men understående virker.

Hvorfor de andre metoder ikke virker (i min ende) ved jeg ikke, men måske det kan have noget at gøre med udbyders version af JMail.

Tusinde tak for hjælpen til jer begge!

apo: Lægger du lige et 'svar', så du kan få lidt point for din gode indsats?


****
<body>
<%
Session("strName") = Request.Form("contactName")
Session("strEmail") = Request.Form("contactEmail")
Session("strText") = Request.Form("contactText")
%>

<div id="thx" style="position:absolute; width:538px; height:102px; left:35px; top:32px; z-index:1;">
  <p><% Response.Write Request.Form("contactName") %> - Tak for din henvendelse.</p>
  <p>Vi har sendt en kopi af henvendelsen til: <% Response.Write Request.Form("contactEmail") %>.</p>
  <p>Vi vender tilbage s&aring; hurtigt som muligt.</p>
  <p>Med venlig hilsen - Steffen Toft, Game Adventures.</p>
</div>

<%
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ServerAddress = "relay.pil.dk"
JMail.Sender = "steffen.toft@gameadventures.com"
JMail.Subject = "Henvendelse fra hjemmesiden www.gameadventures.com"
JMail.AddRecipientEx "tbst@stofanet.dk", "Tony Breindal"
JMail.AddRecipient Session("strEmail")

JMail.Body = "Navn: "
JMail.AppendText Session("strName") & vbCrLf & vbCrLf

JMail.AppendText "Email: "
JMail.AppendText Session("strEmail") & vbCrLf & vbCrLf

JMail.AppendText "Vedrørende: " & vbCrLf
JMail.AppendText Session("strText") & vbCrLf

JMail.Priority = 1
JMail.Execute
Set JMail = Nothing
%>
</body>
Avatar billede apo Praktikant
07. april 2005 - 18:39 #21
Så lægger jeg et svar :-)

Apo
Avatar billede apo Praktikant
07. april 2005 - 19:44 #22
Tak for points :-)

Apo
Avatar billede Tony Juniormester
07. april 2005 - 21:43 #23
Velbekomme, tak for hjælpen ... :-)
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
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 9 25/06/202622:20 29/06/202621:55
Tjek alle checkbox i form Af bsn i ASP 4 18/05/202601:57 19/05/202613:33
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
ASP classic Af bsn i ASP 8 28/10/202423:11 30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP 5 23/05/202409:56 24/05/202400:02
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 13:55 Ukendt sender e-mails fra - og til min e-mail adresse Af mort1 i Andet sikkerhed
I går 11:08 Forskel mellem klokkeslet start aften slut næste morgen Af krasmussen i Excel
23/0715:10 WINDOWS KOMPABILITET Af snestrup2000 i Windows
22/0720:19 DVB T2 tuner med optagefunktion Af ErikHg i Andet hardware
20/0716:00 Fildeling mellem 2 windows 11 systemer Af knudg i Windows
White papers
Flere white papers »