Avatar billede syngre.net-team Nybegynder
06. december 2003 - 01:41 Der er 1 kommentar og
1 løsning

Med-send "Bemærkning"

Hejsa :)

Jeg har fået lavet mig en "Anbefal hjemmesiden" til vores klubs hjemmeside, men den indeholder kun nogen meget simple ting.

--> http://www.hvidovrekajakklub.dk/anbefal_hvk.asp

Udover det som vises som felter ( se link ), kan jeg så ikke have et felt mere som hedder "bemærkninger" som vedkommende kan sende med i den JMail som bliver sendt afsted fra vores hjemmeside af?

Anbefal_hvk.asp --->

<form ACTION="anbefalsc.asp" METHOD="post">
  <input type="hidden" name="redirect_to" value="kontakt-tak.asp"><p><small><font
  face="Verdana">Din ven's E-mail:<br>
  <input TYPE="text" NAME="send_til" CLASS="input" size="20"><br>
  <br>
  Dit navn:<br>
  <input TYPE="text" NAME="from" CLASS="input" size="20"><br>
  <br>
  <input TYPE="submit" VALUE="Anbefal" CLASS="button">
  </font></small></p>
</form>



Anbefalsc.asp --->

<% Response.Buffer = True

redirect_to = Request.Form("redirect_to")
send_til = Request.Form("send_til")
from = Request.Form("from")
emne = Request.Form("emne")


Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.hvidovrekajakklub.dk"
Mail.From = "postmaster@hvidovrekajakklub.dk"
Mail.FromName = from
Mail.AddAddress send_til
Mail.AddReplyTo send_til
Mail.Subject = "Prøv lige at tjek det her ud..."
Mail.Body = "Hejsa... En af dine venner har valgt at sende dig denne anbefaling fra Hvidovre Kajakklub's hjemmeside... Hvis du vil læse mere, kan du gøre det her: http://www.hvidovrekajakklub.dk/ ---- Tak for din interresse for Hvidovre Kajakklub... Du kan IKKE besvare denne e-mail !"

Mail.Send
Set Mail = Nothing

Response.Redirect redirect_to
%>

Hvordan kan det tilføjes?

/Peter
Avatar billede thesurfer Nybegynder
06. december 2003 - 02:17 #1
Anbefal_hvk.asp --->
<form ACTION="anbefalsc.asp" METHOD="post">
  <input type="hidden" name="redirect_to" value="kontakt-tak.asp"><p><small><font
  face="Verdana">Din ven's E-mail:<br>
  <input TYPE="text" NAME="send_til" CLASS="input" size="20"><br>
  <br>
  Dit navn:<br>
  <input TYPE="text" NAME="from" CLASS="input" size="20"><br>
Et nyt felt:<br>
  <input TYPE="text" NAME="nytfelt" CLASS="input" size="20"><br>
<br>
  <input TYPE="submit" VALUE="Anbefal" CLASS="button">
  </font></small></p>
</form>


Anbefalsc.asp --->
<% Response.Buffer = True

redirect_to = Request.Form("redirect_to")
send_til = Request.Form("send_til")
from = Request.Form("from")
emne = Request.Form("emne")
nytfelt = Request.Form("nytfelt")

Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.hvidovrekajakklub.dk"
Mail.From = "postmaster@hvidovrekajakklub.dk"
Mail.FromName = from
Mail.AddAddress send_til
Mail.AddReplyTo send_til
Mail.Subject = "Prøv lige at tjek det her ud..."

body = ""
body = body & "Hejsa... En af dine venner har valgt at sende dig denne anbefaling fra Hvidovre Kajakklub's hjemmeside..." & vbCrLf
body = body & "Hvis du vil læse mere, kan du gøre det her: http://www.hvidovrekajakklub.dk/" & vbCrLf
body = body & "Tak for din interresse for Hvidovre Kajakklub..." & vbCrLf
body = body & "Du kan IKKE besvare denne e-mail !" & vbCrLf & vbCrlF
body = body & "Bemærkning:" & vbCrlf & nytfelt

Mail.Body = body
Mail.Send
Set Mail = Nothing

Response.Redirect redirect_to
%>
Avatar billede syngre.net-team Nybegynder
06. december 2003 - 02:45 #2
Tak for hjælpen... Virker fint, og her er dine point...

God weekend samt gó jul...
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