---
title: "Cdonts"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/69017-cdonts/page3"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "JohanV"
published: "2003-02-21T21:56:06.000Z"
updated: "2003-02-23T20:36:32.000Z"
replies: 44
views: 733
page: 3
pages: 3
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/69017-cdonts"
---

# Cdonts

_Sida 3 av 3._

## #41 — Palle, 2003-02-21T23:46Z

> **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.

Permalänk: https://www.webforum.nu/p/958666

## #42 — JohanV, 2003-02-21T23:54Z

> **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? =)

Permalänk: https://www.webforum.nu/p/958675

## #43 — Palle, 2003-02-21T23:58Z

Internet-tjänsthanteraren -\> Standard för virtuell SMTP-Server
Högerklicka och välj Egenskaper -\> Leverans

Kolla över dina inställningar..

Permalänk: https://www.webforum.nu/p/958678

## #44 — JohanV, 2003-02-22T14:26Z

> **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?

Permalänk: https://www.webforum.nu/p/958857

## #45 — nisslass, 2003-02-23T20:36Z

```
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.

Permalänk: https://www.webforum.nu/p/959513

---

Tråden på webben: https://www.webforum.nu/amne/asp/69017-cdonts/page3  
Föregående sida: https://www.webforum.nu/amne/asp/69017-cdonts/page2.md
