CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

creativedge Nybegynder

17. juni 2002 - 11:14 Der er 26 kommentarer og
1 løsning

Hjælp til at lave en svarmail som html side???

Hej jeg søger hjælp til hvordan man laver sådan en af de her smarte website ligende mails man får ind når man har tilmedlt sig en konkurrence eks.

min mailform virker og brugeren får også sin mail, jeg skal bare bruge hjæpe til hvordan men lave selve siden..

En der er frisk på at hjælpe?? :)

Synes godt om

pfp Nybegynder

17. juni 2002 - 11:18 #1

Hvilken mailkomponent bruger du til at sende din mailform med? Hvis du f.eks. bruger JMail kan du indstille din body til at godtage HTML og dermed kan du ændre udseendet på din mail.

Var det det du ledte efter?

Synes godt om

creativedge Nybegynder

17. juni 2002 - 11:21 #2

Sådan ser mit script ud som blive kladt af en .swf

<% @LANGUAGE = VBScript %>

<%

Dim strName, strCompany, strPosition, strEmail, strMessage, strTelefon, strRingop
strName = Trim(Request.QueryString("name"))
strCompany = Trim(Request.queryString("company"))
strPosition = Trim(Request.queryString("position"))
strEmail = Trim(Request.queryString("email"))

strSubject = "Fra HeliWeb Mailform"

strMessage = Trim(Request.QueryString("message"))
strTelefon = Trim(Request.QueryString("telefon"))
strRingop = Trim(Request.queryString("ringop"))

Dim objMail
Set objMail = Server.CreateObject("CDONTS.NewMail")

indhold = "Du deltager nu i konkurrencen om 2 billetter til Paris :)" +vbcrlf +vbcrlf +"Navn = " & strName & vbcrlf & "Virksomhed = " & strCompany & vbcrlf & "Position = " & strPosition & vbcrlf & "Telefon = " & strTelefon & vbcrlf & "Ringes op ? = " & strRingop & vbcrlf & vbcrlf & strMessage

objMail.From = strEmail 'Afsender fra mailform
objMail.To = "rk@helikopter.tv" 'Modtager af mail fra mailform
objMail.BCC = strEmail 'her får afsenderen en kopi
objMail.Subject = strSubject
objMail.Body = indhold
objMail.Send

set objMail = Nothing

%>

<body onLoad=window.close()>



</body>

Synes godt om

creativedge Nybegynder

17. juni 2002 - 11:21 #3

Jeg er bare lidt på bar bund jeg vil ikke hvor jeg skal redigere idet osv.. eheh????

Synes godt om

creativedge Nybegynder

17. juni 2002 - 11:22 #4

Måske en ville f.eks rette lidt i den her så jeg kunne se hvordan det virkede?

Synes godt om

creativedge Nybegynder

17. juni 2002 - 11:23 #5

Lige nu skriver den kun en alm. mail hvor der står:

Du deltager nu i konkurrencen om 2 billetter til Paris :)

namn:
adr:
blah:
Blah:

Synes godt om

pfp Nybegynder

17. juni 2002 - 11:29 #6

Ok. Prøv at erstatte denne linie objMail.Body = indhold med objMail.HTMLBody = indhold

I variablen indhold skal du så i stedet opbygge en HTMLside istedet for. Et simpel eksempel kunne måske se sådan ud:

indhold = "<html><b>" & "Information" & "</b><br><br>" & "Du deltager nu i konkurrencen om 2 billetter til Paris." & "<br><br>" & "Navn: " & strName

osv osv. Hvis du ikke selv er alt for skarp til HTML kunne du evt. opbygge siden som du vil have den i en WYSIWYG editor som fx Frontpage og så derefter blot indkrandse HTML-taggene med " som du kan se jeg har gjort i mit eksempel ovenfor.

/peter

Synes godt om

creativedge Nybegynder

17. juni 2002 - 11:29 #7

any one :) ???

Synes godt om

creativedge Nybegynder

17. juni 2002 - 11:33 #8

Huh jeg er absolut ikke en haj til html.. men ehm, kan jeg som du siger bare lave siden som den ser ud i hvilket som helst program?? (Dreamweaver el. GoLive)

Synes godt om

pfp Nybegynder

17. juni 2002 - 11:37 #9

Ja det kan du godt men du skal huske at det kode du får produceret af din editor skal skrives om til samme format som det jeg har vist dig da jeg lavede et eksempel på variablen indhold. Men start du bare med at bygge siden, så kan vi tage det andet bagefter.

Synes godt om

creativedge Nybegynder

17. juni 2002 - 11:39 #10

Like this: ???

<% @LANGUAGE = VBScript %>

<%

Dim strName, strCompany, strPosition, strEmail, strMessage, strTelefon, strRingop
strName = Trim(Request.QueryString("name"))
strCompany = Trim(Request.queryString("company"))
strPosition = Trim(Request.queryString("position"))
strEmail = Trim(Request.queryString("email"))

strSubject = "Fra HeliWeb Mailform"

strMessage = Trim(Request.QueryString("message"))
strTelefon = Trim(Request.QueryString("telefon"))
strRingop = Trim(Request.queryString("ringop"))

Dim objMail
Set objMail = Server.CreateObject("CDONTS.NewMail")

indhold = "Du du deltager nu i konkurrencen om 2 billeter til Paris, vinderen foår straks svar" +vbcrlf +vbcrlf +"Navn = " & strName & vbcrlf & "Virksomhed = " & strCompany & vbcrlf & "Position = " & strPosition & vbcrlf & "Telefon = " & strTelefon & vbcrlf & "Ringes op ? = " & strRingop & vbcrlf & vbcrlf & strMessage

objMail.From = strEmail
objMail.To = "rk@helikopter.tv"
objMail.BCC = strEmail 'her får afsenderen en kopi
objMail.Subject = strSubject
objMail.HTMLBody = = indhold
objMail.Send

set objMail = Nothing

%>

<body onLoad=window.close()>



</body>

Synes godt om

creativedge Nybegynder

17. juni 2002 - 11:39 #11

<html>

<head>
<meta http-equiv="content-type" content="text/html;charset=iso-8859-1">
<title>HeliWeb</title>
</head>

<body bgcolor="#ffae4e">
<p><b><font face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular">Du du deltager nu i konkurrencen om 2 billeter til Paris</font></b></p>
<p><font size="2" face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular">Vinderen vil bliver ringet op efter afgørelse.</font></p>
<p><font size="2" face="Arial,Helvetica,Geneva,Swiss,SunSans-Regular">Bag HeliWeb står Helikopter A/S</font></p>
</body>

</html>

Synes godt om

creativedge Nybegynder

17. juni 2002 - 11:40 #12

kan den bruges?? og hvad nu hvis der skal et billede på???

Synes godt om

pfp Nybegynder

17. juni 2002 - 11:43 #13

"<html><head><title>" & "HeliWeb" & "</title></head><body bgcolor='#ffae4e'>"

Kan du se princippet i det? Du indkrandser dine HTML tags med "" og bruger & imellem dine forskellige ting. Derudover skal du huske at erstatte dine " med ' som du kan se jeg har gjort i bgcolor parametren.

Synes godt om

pfp Nybegynder

17. juni 2002 - 11:43 #14

Angående billedet sætter du det bare ind som du ellers ville have gjort

Synes godt om

creativedge Nybegynder

17. juni 2002 - 11:44 #15

ehm.. *grubler*.. eheh

Synes godt om

creativedge Nybegynder

17. juni 2002 - 11:44 #16

ikke noget med at den skal hente billedet et sted fra?

Synes godt om

pfp Nybegynder

17. juni 2002 - 11:46 #17

Du kan evt. have det liggende på din server og så linke direkte til den der.

Synes godt om

creativedge Nybegynder

17. juni 2002 - 11:47 #18

okey, det kan man altså godt :) well lad mig lige lure lidt på det.. eheh jeg skal lige ha fat idet vender lige tilbage om 5.

Synes godt om

creativedge Nybegynder

17. juni 2002 - 12:18 #19

Okey jeg har en meget mere simpel måde.. hvis nu jeg lavet det som et billede.. og så bare lader det som bg smider den så ikke bare det andet txt ind?? ved ik om du forstår?? ellers må jeg lige uploade et bille så du kan se hvad jeg mener.. :)

Synes godt om

creativedge Nybegynder

17. juni 2002 - 12:29 #20

Ser der her sort ud?? eller??

<html>
<head>
<title>HeliWeb</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body bgcolor="#F7EEDE" leftmargin="0" marginheight="0" marginwidth="0" topmargin="0">
<table width="100%" border="0" cellspacing="0" cellpadding="0" height="100%">
<tr>
<td>
<table width="400" cellpadding="6" cellspacing="1" align="center" bgcolor="#000000" height="10" vspace="12" hspace="12">

<tr bordercolor="#CCCCCC" bgcolor="#FFFFFF" height="300">
<td width="438" height="300" nowrap background="img src="http://www.helikopter.tv/mail_bg.jpg" bgcolor="#d1c2a9">
<div align="center">
<div align="center"></div>
</div>
</td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>

Synes godt om

creativedge Nybegynder

17. juni 2002 - 12:30 #21

Men hvorfor vil den ikke hente mit billede?? :/

Synes godt om

creativedge Nybegynder

17. juni 2002 - 12:33 #22

Hey vil du ik hjælpe mig lidt med det med den html opsætning.. jeg kan ikke helt liige c dit system?? :)

Synes godt om

creativedge Nybegynder

17. juni 2002 - 13:07 #23

Ehm er du der??

Synes godt om

creativedge Nybegynder

17. juni 2002 - 13:50 #24

HVAD MED DEN HER: kan du c nogle fejl i den?? ser det rigtigt ud??

<% @LANGUAGE = VBScript %>

<%

Dim strName, strCompany, strPosition, strEmail, strMessage, strTelefon, strRingop
strName = Trim(Request.QueryString("name"))
strCompany = Trim(Request.queryString("company"))
strPosition = Trim(Request.queryString("position"))
strEmail = Trim(Request.queryString("email"))

strSubject = "Fra HeliWeb Mailform"

strMessage = Trim(Request.QueryString("message"))
strTelefon = Trim(Request.QueryString("telefon"))
strRingop = Trim(Request.queryString("ringop"))

Dim objMail
Set objMail = Server.CreateObject("CDONTS.NewMail")

indhold = "Du deltager nu i konkurrencen om 2 billetter til Paris :)" +vbcrlf +vbcrlf +"Navn = " & strName & vbcrlf & "Virksomhed = " & strCompany & vbcrlf & "Position = " & strPosition & vbcrlf & "Telefon = " & strTelefon & vbcrlf & "Ringes op ? = " & strRingop & vbcrlf & vbcrlf & strMessage

MailBody = "<html>"
MailBody = MailBody + "<head><title>HeliWeb</title>"
MailBody = MailBody + "<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">"
MailBody = MailBody + "</head>"
MailBody = MailBody + "<body bgcolor="#F7EEDE" leftmargin="0" marginheight="0" marginwidth="0" topmargin="0">"
MailBody = MailBody + "<table width="100%" border="0" cellspacing="0" cellpadding="0" height="100%">"
MailBody = MailBody + "<tr>"
MailBody = MailBody + "<td>"
MailBody = MailBody + "<table width="400" cellpadding="6" cellspacing="1" align="center" bgcolor="#000000" height="10" vspace="12" hspace="12">"
Mailbody = MailBody + "<tr bordercolor="#CCCCCC" bgcolor="#FFFFFF" height="300">"
Mailbody = MailBody + "<td width="398" height="300" nowrap background="http://www.helikopter.tv/heliweb/gfx/mail_bg.jpg">"
Mailbody = MailBody + "<div align="center">"
Mailbody = MailBody + "<div align="center"></div>"
Mailbody = MailBody + "</div>"
Mailbody = MailBody + "</td>"
Mailbody = MailBody + "</tr>"
Mailbody = MailBody + "</table>"
Mailbody = MailBody + "</td>"
Mailbody = MailBody + "</tr>"
Mailbody = MailBody + "</table>"
Mailbody = MailBody + "</body>"
Mailbody = MailBody + "</html>"

objMail.From = strEmail 'Afsender fra mailform
objMail.To = "rk@helikopter.tv" 'Modtager af mail fra mailform
objMail.BCC = strEmail 'her får afsenderen en kopi
objMail.Subject = strSubject
objMail.BodyFormat = 0
objMail.MailFormat = 0
objMail.Body = MailBody
objMail.Send

set objMail = Nothing

%>

<body onLoad=window.close()>



</body>

Synes godt om

creativedge Nybegynder

17. juni 2002 - 15:06 #25

HJÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆÆLP!!! *G* er der virkelig ingen som har rodet med det her før????

Synes godt om

helikopter Nybegynder

18. juni 2002 - 11:58 #26

Hvad med såan her:

<%@LANGUAGE="VBSCRIPT"%>
<%

Dim strName, strCompany, strPosition, strEmail, strMessage, strTelefon, strRingop
strName = Trim(Request.QueryString("name"))
strCompany = Trim(Request.queryString("company"))
strPosition = Trim(Request.queryString("position"))
strEmail = Trim(Request.queryString("email"))

strSubject = "Fra HeliWeb Mailform"

strMessage = Trim(Request.QueryString("message"))
strTelefon = Trim(Request.QueryString("telefon"))
strRingop = Trim(Request.queryString("ringop"))

Dim objMail
Set objMail = Server.CreateObject("CDONTS.NewMail")

MailBody = "<html>"
MailBody = MailBody + "<html><head><title>HeliWeb</title>"
MailBody = MailBody + "<meta http-equiv='content-Type' content='text/html; charset=iso-8859-1'>"
MailBody = MailBody + "</head><body bgcolor='#F7EEDE' leftmargin='0' marginheight='0' marginwidth='0' topmargin='0'>"
MailBody = MailBody + "<table width='100%' border='0' cellspacing='0' cellpadding='0' height='100%'>"
MailBody = MailBody + "<tr><td><table width='400' cellpadding='6' cellspacing='1' align='center' bgcolor='#000000' height='10' vspace='12' hspace='12'>"
MailBody = MailBody + "<tr bordercolor='#CCCCCC' bgcolor='#FFFFFF' height='300'>"
MailBody = MailBody + "<td width='398' height='327' nowrap background='http://www.helikopter.tv/heliweb/gfx/mail_bg.jpg'>"
MailBody = MailBody + "<div align='center'><div align='center'>"
Mailbody = MailBody + "<table width='100%' height='100%' border='0' cellpadding='0' cellspacing='0'>"
Mailbody = MailBody + "<tr> <td width='5%' height='153'> </td>"
Mailbody = MailBody + "<td width='95%'> </td>"
Mailbody = MailBody + "</tr><tr> <td height='80'> </td><td>"
Mailbody = MailBody + "<p><font size='2' face='Verdana, Arial, Helvetica, sans-serif'>Navn: " & strName & "<br>Virksomhed: " & strCompany & "<br>Stilling: " & strPosition & "<br>Telefon: " & strTelefon & "<br>Ringes op ?: " & strRingop & "</font></p>"
Mailbody = MailBody + "</td></tr><tr><td> </td><td> </td></tr></table></div></div></td></tr></table></td></tr></table>"
Mailbody = MailBody + "</body></html>"

objMail.From = strEmail
objMail.To = "rk@helikopter.tv"
objMail.BCC = strEmail 'her får afsenderen en kopi
objMail.BodyFormat = 0
objMail.MailFormat = 0
objMail.Subject = strSubject
objMail.Body = Mailbody
objMail.Send

set objMail = Nothing

%>

<body onLoad=window.close()>



</body>

Synes godt om

helikopter Nybegynder

18. juni 2002 - 11:58 #27

Shit nu fik du den ikke som svar..

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra Andet programmering kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Kodning af element i custom css Af Jacob Hedelund i Andet programmering	3	14/10/202410:35	14/10/202419:46
Delphi 11 - converter webp til jpg fil Af juzas i Andet programmering	5	12/10/202413:28	14/10/202403:54
Trim tekst i batch script Af Dan Elgaard i Andet programmering	5	05/09/202411:08	10/09/202415:29
ASP Classic fil fra subfolder Af bsn i Andet programmering	3	07/05/202416:14	08/05/202401:00
Session Variable Af bsn i Andet programmering	3	01/05/202409:44	02/05/202409:29

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.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS

23/12

Historisk million-bøde får Region Syddanmarks it-direktør til at efterlyse nye GDPR-retningslinjer

23/12

Til næste år kommer iPhone 17 – og ifølge rygtestrømmene vil den byde på tre nyheder

23/12

En af verdens største it-distributører dropper samarbejdet med Broadcom: Kunne ikke nå til enighed

23/12

Ser med 'stor alvor' på problemer med vand, varme og manglende kontrol i politiets datacenter

23/12

Brugere rammes af Microsoft-fejl: M365-produkter er på mystisk vis blevet deaktiveret

23/12

Her er dommen: Region Syddanmark skal betale historisk stor bøde for grove overtrædelser af GDPR

23/12

Vores vidensindsamling og demokratiske samtale påvirkes af helt lukkede beslutninger i en enkelt privat virksomhed

23/12

Overblik: Danske it-selskaber strømmer ind mod den centrale storby - og det handler ikke om penge

23/12

Banebrydende ChatGPT-opdatering er lige på trapperne: “Denne model vil være helt fantastisk til programmering”

23/12

Tivoli søger ny CIO: Kenneth Hartvig stopper efter tre år på posten

23/12

Vi ender med at bo i en taber-region, hvis ikke vi gør noget drastisk - her er digitaliseringsministerens plan

Vis flere artikler

IT-JOB

Dynamicweb Software A/S

Solution Tech Lead

Sydbank

Software Developer til Digital Banking

Udviklings- og Forenklingsstyrelsen

Har du lyst til at arbejde med backup i en stor koncern?

Arbejdernes Landsbank

Lead Data Analyst til Dataindsigt

Quadsat ApS

Robotics Engineer

Vis flere jobs

Seneste spørgsmål Seneste aktivitet

I går 19:53	CD Burner XP (Sætte den til at optage nogle numre fra en CD - Men ikke alle ? Af Ikke-ekspert i Musik & videoafspillere
I går 17:42	Katastrofe med Pc Af LilBe i PC
I går 09:44	Mine emails kan pluselig ikke læses af modtagerne, kun uforståelige tal og bogstaver Af gunnarb i E-mail programmer
24/1216:03	Fjern "Seneste" - "Hurtig adgang" Fra Windows 11 - Hvordan ? Af Ikke-ekspert i Windows
23/1214:43	html <Input.. Danske bogstaver Af pjotre i Andet software