du får skriva in hela adressen dvs http://www.bla.com/test.gif
HTML = HTML & "<BODY background=http://www.farnskog.se/bilder/meny_inbg.gif>"
Frågan#1
Jag har en mailfunktion där ett mail skickas till mig som html-mail... nu vill jag att det ska innehålla en bakgrund och lite bilder... kan jag inte skriva så här då... får det inte att funka...
Set SMTP = Server.CreateObject("CDONTS.NewMail")
SMTP.To = eposten
SMTP.From = info (7)
SMTP.Subject = "Beställning från https://www.Farnskog.se"
HTML = HTML & "<font face=verdana size=2>"
HTML = HTML & "<BODY background=bilder/meny_inbg.gif>"
HTML = HTML & "<IMG SRC=bilder/webshop.gif>"
For i = 0 To Ubound(myArray,2)
IF Len(MyArray(0,i)) > 0 then
HTML = HTML & "Art.nr: " & MyArray(2,i) & "<br>"
HTML = HTML & "Produkt: " & MyArray(3,i) & "<br>"
HTML = HTML & "Antal: " & MyArray(1,i) & "<br>"
HTML = HTML & "Antal: " & MyArray(1,i) & "<br>"
HTML = HTML & "Pris: " & MyArray(4,i) & "<br>"
HTML = HTML & "-------------------------------------------<br>"
IF i = Ubound(myArray,2) then
HTML = HTML & "<br>"
END IF
END IF
Next
HTML = HTML & "Namn: " & info(0) & "<br>"
HTML = HTML & "Adress: " & info(1) & "<br>"
HTML = HTML & "Postnr: " & info(2) & info(3) & "<br>"
HTML = HTML & "Postadress: " & info(4) & "<br>"
HTML = HTML & "Telefonnummer: " & info(5) & "-" & info(6) & "<br>"
HTML = HTML & "E-post: " & info(7) & "<br>"
HTML = HTML & "Övrigt: " & info(8) & "<br>"
HTML = HTML & "Skickat: " & Now() & "<br>"
HTML = HTML & "</font>"
SMTP.Body = HTML
SMTP.BodyFormat = CdoBodyFormatHTML
SMTP.MailFormat = CdoMailFormatMime
SMTP.Importance = CdoNormal
SMTP.Send
Set SMTP = Nothing