PalleMedlem sedan apr. 20003 174 inlägg
Addeladde skrev:
Den här koden ska funka för dig
<%
Set newMailObj = CreateObject("CDONTS.Newmail")
newMailObj.From = "epost@fran.se"
newMailObj.To = "Epost@mottagare.se"
newMailObj.Subject = "Ämne"
newMailObj.BodyFormat = CdoBodyFormatText
newMailObj.MailFormat = CdoMailFormatMime
sMailBody = "Testrad 1"& vbNewLine & vbNewLine
sMailBody = sMailBody & "Testrad 2 " & vbNewLine
newMailObj.Body = sMailBody
newMailObj.Send
Set newMailObj = Nothing
%>
Läs alla inlägg.. ;) ..vi har lokaliserat felet.
JJohanVMedlem sedan feb. 200330 inlägg
Palle skrev:
Addeladde skrev:
Den här koden ska funka för dig
<%
Set newMailObj = CreateObject("CDONTS.Newmail")
newMailObj.From = "epost@fran.se"
newMailObj.To = "Epost@mottagare.se"
newMailObj.Subject = "Ämne"
newMailObj.BodyFormat = CdoBodyFormatText
newMailObj.MailFormat = CdoMailFormatMime
sMailBody = "Testrad 1"& vbNewLine & vbNewLine
sMailBody = sMailBody & "Testrad 2 " & vbNewLine
newMailObj.Body = sMailBody
newMailObj.Send
Set newMailObj = Nothing
%>
Läs alla inlägg.. ;) ..vi har lokaliserat felet.
Nja Palle, inte rikitgt en :D
Jag ska bara lokalisera var man kollar efter "efter/skicka köade meddelande"
Var inte och kollade i IIS kontrollpanel men hittade intepå något där.. var ställer jag in det? =)
PalleMedlem sedan apr. 20003 174 inläggInternet-tjänsthanteraren -> Standard för virtuell SMTP-Server
Högerklicka och välj Egenskaper -> Leverans
Kolla över dina inställningar..
JJohanVMedlem sedan feb. 200330 inlägg
Palle skrev:
Internet-tjänsthanteraren -> Standard för virtuell SMTP-Server
Högerklicka och välj Egenskaper -> Leverans
Kolla över dina inställningar..
Tack Palle!
Men nu går vi över till nästa problem =)
Om det står så här nu:
Mail.Body = "test"
Men jag jag vill kod med då?
När jag använde JMail så kunde jag göra så här:
For i = 0 To Ubound(ShopArray,3)
IF Len(ShopArray(0,i)) > 0 then
JMail.appendHTML "Produktnamn: " & ShopArray(1,i) & "<br>"
JMail.appendHTML "Antal: " & ShopArray(2,i) & "<br>"
JMail.appendHTML "Art.nummer: " & ShopArray(3,i) & "<br>"
Hur skriver jag nu om jag vill använda det här i CDOnts?
NnisslassMedlem sedan nov. 2001348 inlägg Mail.Body = Mail.Body & "Tjenare!<BR>"
Mail.Body = Mail.Body & "Olle<BR>"
Mail.Body = Mail.Body & "Heter<BR>"
Mail.Body = Mail.Body & "Jag<BR>"
Tror jag fungerar, annars kan du ju testa..
For i = 0 To Ubound(ShopArray,3)
IF Len(ShopArray(0,i)) > 0 then
strMail = strMail & "Produktnamn: " & ShopArray(1,i) & "<br>"
strMail = strMail & "Antal: " & ShopArray(2,i) & "<br>"
strMail = strMail & "Art.nummer: " & ShopArray(3,i) & "<br>"
Mail.Body = strMail
Sen, Mail.Send när du är klar dårå
Nu är ju jag ingen expert men ändå! ;)
Glöm inte ställa in att mailet skall skickas som HTML bara.