---
title: "Cdonts"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/69017-cdonts/page2"
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: 2
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 2 av 3._

## #21 — Sebbe, 2003-02-21T23:06Z

Kan du kanske visa exakt (du kan ändra mailadresserna om du vill) den kod du har nu? Så vi får se uppdateringarna du gjort.

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

## #22 — Palle, 2003-02-21T23:06Z

Teskörde nyss denna kod, den fungerar: 

```
[RED]Dim objMail
Set objMail = Server.CreateObject("CDONTS.NewMail")

	objMail.From = "[b]mail@adress.se[/b]"
	objMail.Subject = "Rubriken"
	objMail.To = "[b]mail@adress.se[/b]"
	objMail.Body = "Innehåll i mailet.."
	objMail.Send

Set objMail = Nothing[/RED]
```

Dock med andra mailadresser.. (fet här ovan)

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

## #23 — solbulle, 2003-02-21T23:07Z

Översta raden var nog mer rätt från början tror jag:

Set Mail = server.CreateObject("CDONTS.NewMail")

**r/**  jupp

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

## #24 — JohanV, 2003-02-21T23:09Z

Självklart kan jag göra det

```
<% 
Set Mail = server.CreateObject("CDONTS.NewMail") 
Mail.From = "x@hotmail.com" 
Mail.To = "xx@hotmail.com" 
Mail.Subject = "Order" 
Mail.Body = "Test" 
Mail.Send 
Set Mail = Nothing 
%>
```

Så ser det ut nu, mailadresserna är 2st olika..

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

## #25 — Sebbe, 2003-02-21T23:10Z

Stor bokstav på Server? Tror nog inte det spelar nån roll, men det är det enda möjliga felet jag kan se.

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

## #26 — JohanV, 2003-02-21T23:10Z

> **solbulle skrev:**
>
> Översta raden var nog mer rätt från början tror jag:
> 
> Set Mail = server.CreateObject("CDONTS.NewMail")
> 
> **r/**  jupp

Jo, funkar inte alls utan "New" Men det var mitt fel eftersom jag inte han ändra det innan Sebbe gjorde ett citat på det...

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

## #27 — solbulle, 2003-02-21T23:11Z

Kan det vara som så att servern bara tillåter mail med avsändaradress från denegna domänen? 
\*spånar vilt\*

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

## #28 — Palle, 2003-02-21T23:14Z

> **solbulle skrev:**
>
> Kan det vara som så att servern bara tillåter mail med avsändaradress från denegna domänen? 
> \*spånar vilt\*

Finns en del hotell som har den spärren - ja.

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

## #29 — JohanV, 2003-02-21T23:16Z

> **Palle skrev:**
>
> > **solbulle skrev:**
> >
> > Kan det vara som så att servern bara tillåter mail med avsändaradress från denegna domänen? 
> > \*spånar vilt\*
>
> Finns en del hotell som har den spärren - ja.

Det här är dock på min egen server WinXp Pro med SP1

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

## #30 — Palle, 2003-02-21T23:25Z

Testa detta och se vad du får för resultat: 

```
[RED]<%

strInfo = "CDONTS fungerar som det ska.."

On Error Resume Next

	Set Cdonts = Server.CreateObject("CDONTS.NewMail")
		If err.number <> 0 Then strInfo = "CDONTS är inte installerat på denna burk."
		err.clear
	Set Cdonts = Nothing

Response.Write strInfo

%>[/RED]
```

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

## #31 — JohanV, 2003-02-21T23:28Z

> **Palle skrev:**
>
> Testa detta och se vad du får för resultat: 
>
> ```
> [RED]<%
> 
> strInfo = "CDONTS fungerar som det ska.."
> 
> On Error Resume Next
> 
> 	Set Cdonts = Server.CreateObject("CDONTS.NewMail")
> 		If err.number <> 0 Then strInfo = "CDONTS är inte installerat på denna burk."
> 		err.clear
> 	Set Cdonts = Nothing
> 
> Response.Write strInfo
> 
> 
> %>[/RED]
> ```

Får "CDONTS fungerar som det ska.."
\*snyft\*

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

## #32 — Josef, 2003-02-21T23:29Z

Har du verkligen installerat CDONTS då?

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

## #33 — JohanV, 2003-02-21T23:32Z

> **Josef skrev:**
>
> Har du verkligen installerat CDONTS då?

Ja..

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

## #34 — Josef, 2003-02-21T23:32Z

Visa all kod på sidan som du har den nu...

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

## #35 — Palle, 2003-02-21T23:33Z

Kolla under c:\\Inetpub\\mailroot

Kolla igenom mapparna om du har några filer där, det kan hända att SMTP-servern inte lyckas få iväg dem från din dator ens..
Brandväggar?

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

## #36 — Josef, 2003-02-21T23:33Z

Har du startat SMTP-servern?

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

## #37 — solbulle, 2003-02-21T23:37Z

Är datorn igång?

 :e 

Kunde inte låta bli.  :r

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

## #38 — JohanV, 2003-02-21T23:37Z

> **Palle skrev:**
>
> Kolla under c:\\Inetpub\\mailroot
> 
> Kolla igenom mapparna om du har några filer där, det kan hända att SMTP-servern inte lyckas få iväg dem från din dator ens..
> Brandväggar?

Ingen brandvägg och servern står själv som router...
Men alla mailen ligger i mappen "Queue" under mailroot.
mysko..

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

## #39 — Palle, 2003-02-21T23:39Z

..ok, där har du problemet. ;)

Gå in i smtp-servern och kolla hur ofta den ska kolla efter/skicka köade meddelande.

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

## #40 — Addeladde, 2003-02-21T23:44Z

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

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

---

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