Avatar billede hubbi Nybegynder
28. maj 2002 - 21:01 Der er 28 kommentarer og
3 løsninger

Aspmail

Jeg er overhovedet ikke hardcore til asp, men jeg har lavet denne form

<FORM METHOD="POST" ACTION="formToEmail.asp">
Skriv dit navn.<br>
<input type="Text" name="navn"><p>
Skriv din e-mail.<br>
<input type="Text" name="email"><p>
Spørgsmål:<br>
<textarea name="spørgsmål" rows="10" cols="50"></textarea><p>
<input type="Submit" name="send" value="Send">

Er der en der kan lave aspmail, jeg har fået at vide at jeg skal bruge denne mail server fra buydomains.dk mailhub.registeredhost.com kan i så gøre det let at se hvor man skal sætte den e-mail ind som den skal sende til

På forhånd tak for hjælpen
Avatar billede ncp Nybegynder
28. maj 2002 - 21:08 #1
her er lidt:
<%
Dim Mailer
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")

' Her sættes afsender navn og e-mail adresse
Mailer.FromName  = "Afsenders navn"
Mailer.FromAddress= "afsender@domain.dk"

' Afsenders mailserver
Mailer.RemoteHost = "mail.domain.dk"

' Her sættes modtager navn og e-mail adresse
Mailer.AddRecipient "Modtagers navn", "modtager@domain.dk"

' Her sættes overskriften på mailen
Mailer.Subject    = "Dette er en testmail"

' Her sættes selve teksten til mailen
Mailer.BodyText  = "Hej med dig" & VbCrLf & "Dette er en test!"

' Send e-mail og skriv status
if Mailer.SendMail then
  Response.Write "Mailen er afsendt..."
else
  Response.Write "Der skete en fejl: " & Mailer.Response
end if

' Fjern objekt igen
Set Mailer = Nothing
%>
Avatar billede tmceu Praktikant
28. maj 2002 - 21:09 #2
Jeg har også et webhotel hos buydomains og denne anonymiserede kode virker:

Set JMail = Server.CreateObject("JMail.Message")

JMail.MailServerUserName = "xx@domain.com"
JMail.MailServerPassword = "password"
JMail.From = "something@domain.com"
JMail.Subject = "Tak for din henvendelse"

JMail.AddRecipient Request.Form("Email"), Request.Form("ContactName")

JMail.Body = "Her er en mail"
JMail.Priority = 3


If JMail.Send("mailhub.registeredhost.com") Then
    Response.Write "<P>Der er afsendt en mail.</P>" & vbCrLf
End If
Avatar billede tmceu Praktikant
28. maj 2002 - 21:10 #3
SORRY! Læste det som JMail (spørg ikke hvorfor :-) Men ovenstående burde nu virke alligevel.
Avatar billede ncp Nybegynder
28. maj 2002 - 21:11 #4
lidt pænere:
<%
Dim Mailer
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromName  = "Afsenders navn"
Mailer.FromAddress= "afsender@domain.dk"

Mailer.RemoteHost = "mailhub.registeredhost.com"

Mailer.AddRecipient "Modtagers navn", "modtager@domain.dk"

Mailer.Subject    = "Dette er en testmail"

Mailer.BodyText  = "" & Request.Form("navn") & ", " & Request.Form("email") & ", " & Request.Form("spørgsmål")

if Mailer.SendMail then
  Response.Write "Mailen er afsendt..."
else
  Response.Write "Der skete en fejl: " & Mailer.Response
end if

' Fjern objekt igen
Set Mailer = Nothing
%>
Avatar billede hubbi Nybegynder
28. maj 2002 - 21:17 #5
ncp> Der hvor man skal skrive og email det skal jo komme fra en form, hvordan skal det så se ud
Avatar billede tmceu Praktikant
28. maj 2002 - 21:18 #6
Email fra formen ligger i Request.Form("Email")
Avatar billede hubbi Nybegynder
28. maj 2002 - 21:19 #7
Undskyld stavefejl Der hvor man skal skrive afsender og email det skal jo komme fra en form, hvordan skal det så se ud
Avatar billede hubbi Nybegynder
28. maj 2002 - 21:19 #8
Okay prøver lige
Avatar billede hubbi Nybegynder
28. maj 2002 - 21:32 #9
Jeg kan ikke rigtig få det til at virke
Hvilken linier skal man rette i
Avatar billede tmceu Praktikant
28. maj 2002 - 21:44 #10
Tilføjet i ncp's eksempel:

<%
Dim Mailer
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromName  = "Afsenders navn"
Mailer.FromAddress= "afsender@domain.dk"

Mailer.RemoteHost = "mailhub.registeredhost.com"

Mailer.AddRecipient Request.Form("Navn"), Request.Form("Email")

Mailer.Subject    = "Dette er en testmail"

Mailer.BodyText  = "" & Request.Form("navn") & ", " & Request.Form("email") & ", " & Request.Form("spørgsmål")

if Mailer.SendMail then
  Response.Write "Mailen er afsendt..."
else
  Response.Write "Der skete en fejl: " & Mailer.Response
end if

' Fjern objekt igen
Set Mailer = Nothing
%>
Avatar billede hubbi Nybegynder
28. maj 2002 - 22:04 #11
Tak for det hurtig tmceu>
Jeg tror at det er mig der har skrevet forkert. Det skal være sådan at folk skal skrive deres navn og e-mail, og så sende det til min e-mail. Jeg kan se at du har skrevet Mailer.AddRecipient Request.Form("Navn"), Request.Form("Email") er det ikke der man skal skrive den e-mail adresse så den skal sendes til
Avatar billede tmceu Praktikant
28. maj 2002 - 22:09 #12
Jo præcist, jeg troede bare at du ville sende det til den email der var i formen. Du har allerede fået navn, email og spørgsmål fra formen ned i mailen i ncp's svar:

Mailer.BodyText  = "" & Request.Form("navn") & ", " & Request.Form("email") & ", " & Request.Form("spørgsmål")
Avatar billede hubbi Nybegynder
28. maj 2002 - 22:11 #13
Okat hvad skal jeg så skrive i afsender. Den siger at der er fejl i linie 11 så er afsender
Avatar billede tmceu Praktikant
28. maj 2002 - 22:13 #14
Post lige din kode som den ser ud nu, og markér venligst linie 11....
Avatar billede hubbi Nybegynder
28. maj 2002 - 22:13 #15
Du siger at jeg har fået navn,e-mail og spørgsmål med i mailen, men deres jeg og e-mail er bare så jeg kan skrive tilbage til den e-mail de skriver ind
Avatar billede hubbi Nybegynder
28. maj 2002 - 22:14 #16
Stavefejl
Du siger at jeg har fået navn,e-mail og spørgsmål med i mailen, men deres navn og e-mail er bare så jeg kan skrive tilbage til den e-mail de skriver ind
Avatar billede friiser Nybegynder
28. maj 2002 - 22:19 #17
Du vil kunne helte dine aspmail script gratis via www.script.dk det er gratis at oprette sig som bruger. Indeholder mange gode ting.

~friiser~

http://www.radio.online.dk
Avatar billede tmceu Praktikant
28. maj 2002 - 22:20 #18
<%
Dim Mailer
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Mailer.FromName  = "Harske Hubbi"
Mailer.FromAddress= "Hubbi@domain.com"

Mailer.RemoteHost = "mailhub.registeredhost.com"

Mailer.AddRecipient "Harske Hubbi", "Hubbi@domain.com"

Mailer.Subject    = "Dette er en testmail"

Mailer.BodyText  = "" & Request.Form("navn") & ", " & Request.Form("email") & ", " & Request.Form("spørgsmål")

if Mailer.SendMail then
  Response.Write "Mailen er afsendt..."
else
  Response.Write "Der skete en fejl: " & Mailer.Response
end if

' Fjern objekt igen
Set Mailer = Nothing
%>

Med ovenstående eksempel, bør du modtage en mail med flg. indhold:

From: Harske Hubbi (Hubbi@domain.com)

Subject: Dette er en testmail

Body: Polle fra Snave, Polle@snave.dk, Hvad syn's du om min musiksmagagagag

Du kan altså indsætte samme afsender og modtager, da du vil sende til dig selv. Eller du kan, som jeg har gjort, oprette en mailrobot@domain.com som afsender. Hos buydomains er den nem at oprette via Virtual Admin
Avatar billede hubbi Nybegynder
28. maj 2002 - 22:26 #19
Okay men hvor kan scriptet se hvilken e-mail adresse den skal sende til er det oppe i Mailer.RemoteHost
Avatar billede zyxep Nybegynder
28. maj 2002 - 22:32 #20
jeg har samme prob hvordan kan jeg lave det så den tager alle felterne i min form og sender til en mail som så sender den videre til alle andre mails der er tilnyttet den til den mail der er added i scriptet ?
Avatar billede tmceu Praktikant
28. maj 2002 - 22:33 #21
Nej, kig lige her:

Dette er afsender navn + email:

Mailer.FromName  = "Harske Hubbi"
Mailer.FromAddress= "Hubbi@domain.com"

Dette er den mailserver, der sender din mail (det navn du har fået af buydomains:

Mailer.RemoteHost = "mailhub.registeredhost.com"

Dette er modtagers navn + email:

Mailer.AddRecipient "Harske Hubbi", "Hubbi@domain.com"


Hvis du vil sende til flere, kan du køre Mailer.AddRecipient flere gange.
Avatar billede tmceu Praktikant
28. maj 2002 - 22:36 #22
zyxep >> vil du have at du via en formular kan sende en adresseliste og at modtageren tager alle disse adresser og sender en anden mail til ?

I så fald er det ikke ligefrem det samme problem som dette, så du bør nok oprette et nyt spørgsmål og formulere præcist hvad du vil have. Det bliver hurtigt uoverskueligt at skulle holde styr på flere spørgsmål i et :-)
Avatar billede hubbi Nybegynder
29. maj 2002 - 11:47 #23
tmceu>Okay jeg tro at jeg forstår lidt nu, hvis jeg nu skriver sådan her kan det så virke

Dette er afsender navn + email:

Mailer.FromName  = "Request.Form("navn")"
Mailer.FromAddress= "Request.Form("Email")"

Dette er den mailserver, der sender din mail (det navn du har fået af buydomains:

Mailer.RemoteHost = "mailhub.registeredhost.com"

Dette er modtagers navn + email:

Mailer.AddRecipient "Mit navn", "min_mail@mitdomain.dk"
Avatar billede zyxep Nybegynder
29. maj 2002 - 11:51 #24
hehe ok :)
Avatar billede ncp Nybegynder
29. maj 2002 - 14:02 #25
Mailer.FromName  = "Request.Form("navn")"
Mailer.FromAddress= "Request.Form("Email")"

skal se såda ud:

Mailer.FromName  = "" & Request.Form("navn")
Mailer.FromAddress= "" & Request.Form("Email")
Avatar billede hubbi Nybegynder
29. maj 2002 - 15:37 #26
Tak for hjælpen ncp>
Når jeg sender kommer der en fejl i linie 11 som er denne kode
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")
Hvad kan være
Avatar billede zyxep Nybegynder
29. maj 2002 - 18:07 #27
har du inst komponettet hvis der er et komponet til det ? :D
Avatar billede hubbi Nybegynder
29. maj 2002 - 18:15 #28
zyxep> Hvad for en komponet, skal den ikke ligge på web serveren da
Avatar billede zyxep Nybegynder
29. maj 2002 - 19:43 #29
jeg ved ik hvad komponettet hedder jeg har nemlig ik selv inst det fordi min com er max skod og total ustabil tør ik at inst noget med win komponenter før jeg får anden com eller format c:/
Avatar billede ncp Nybegynder
29. maj 2002 - 21:02 #30
du har lagt asp-filen op på dit webhotel, ikk ?
Avatar billede hubbi Nybegynder
29. maj 2002 - 21:13 #31
Jo ved buydomains.dk
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