Vedr. mailscript / database / indkøbskurv
HejJeg har et lille script som skal sende en mail med indholdet af en indkøbskurv til mig/en butik via en database.
Selve koden til at afsende alt med undtagelse af selve kurven har jeg fået lavet færdig. Men jeg kan ganske enkelt ikke få den til at løbe databasen igennem og sende indholdet af indkøbskurven med :
Set Mailer = Server.CreateObject(\"SMTPsvg.Mailer\")
Mailer.AddRecipient \"Netshop\", \"webmaster@lm-handel.dk\"
Mailer.FromAddress = \"webmaster@lm-handel.dk\"
Mailer.FromName = Request.Form(\"navn\")
Mailer.RemoteHost = \"mail.lm-handel.dk;mail.spar-el.dk\"
Mailer.Subject = \"LM Handel ApS - Bestilling fra netshop\"
Mailer.ContentType = \"text/html\"
indhold = \"<div style=\'color:#000000; font-family:Tahoma, Verdana, Arial; font-size:8pt; cursor:default;\'><b>Følgende er modtaget fra LM Handel ApS\' netshop \" & _
\"d. \" & Left(Now,8) & \" :</b><br><br>\" & _
\"<input align=\'absmiddle\' type=\'checkbox\' checked disabled> <b>\" & Request.Form(\"navn\") & \" har læst og godkendt vores betingelser og vilkår.</b><br>\" & _
\"<input align=\'absmiddle\' type=\'checkbox\'\" & TrackTrace & \" disabled> <b>\" & Request.Form(\"navn\") & \" vil gerne følge pakken med Track & Trace.</b><br>\" & _
\"<input align=\'absmiddle\' type=\'checkbox\' checked disabled> <b>\" & Request.Form(\"navn\") & \" har \" & Medie & \"</b><br><br>\" & _
\"<input align=\'absmiddle\' type=\'checkbox\'\" & Kunde & \" disabled> <b>\" & Request.Form(\"navn\") & \" er oprettet som kunde.</b><br>\" & _
\"<input align=\'absmiddle\' type=\'checkbox\'\" & Erhvervskunde & \" disabled> <b>\" & Request.Form(\"navn\") & \" er oprettet som erhvervskunde på hjemmesiden.</b><br><br>\" & _
\"<b>\" & Request.Form(\"navn\") & \" · \" & Request.Form(\"kundenummer\") & \"</b><br>\" & _
\"<b>\" & Request.Form(\"firma\") & \"</b><br>\" & _
Request.Form(\"vejnavn\") & \"<br>\" & _
Request.Form(\"postnummer\") & \" \" & Request.Form(\"by\") & \"<br><br>\" & _
\"Telefon : \" & Request.Form(\"telefon\") & \"<br>\" & _
\"Telefax : \" & Request.Form(\"telefax\") & \"<br>\" & _
Request.Form(\"e-mail\") & \"<br><br>\" & _
Replace(Request.Form(\"besked\"),Chr(13), \"<br>\") & \"<br><br></div>\"
Mailer.BodyText = indhold
Den ovenstående kode er den jeg benytter til at sende adresse, navn osv....
Jeg håber I kan hjælpe mig.
Regards
Rütger Jacobsen
