---
title: "CDO"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/176700-cdo"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "devotion"
published: "2009-02-03T16:28:49.000Z"
updated: "2009-02-03T18:30:36.000Z"
replies: 2
views: 492
page: 1
pages: 1
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/176700-cdo"
---

# CDO

## #1 — devotion, 2009-02-03T16:28Z

:bla 

Har denna kod, som jag tycker skall fungera:

```
Sub SendMail(sName, sAddress, sPostalCode, sCity, sPhone, sCellPhone, sModell, sSerialNo, sYear, sIssue)

    dim oMail
    dim sFrom, sTo, sSubject, sTextBody

    set oMail=CreateObject("CDO.Message")

    oMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
    'Name or IP of remote SMTP server
    oMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")="mail.karlskrona.net"
    'Server port
    oMail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")=25
    oMail.Configuration.Fields.Update

    sFrom="henrik@bar.com"
    sTo="henrik.lindell@foo.se"
    sSubject="Felanmälan"

    sTextBody="Namn: " & sName & VbCrLf & "Adress: " & sAddress & VbCrLf & "Postnr: "  & sPostalCode & VbCrLf & "Ort: " & sCity & VbCrLf & "Telefonnr: " & sPhone & VbrLf & "Mobilnr: " & sCellPhone & VbCrLf & "Modell: " & sModell & VbCrlF & "Serienr: " & sSerialNo & VbCrLf & "Tillverkningsår: " & sYear & VbCrLf & "Felbeskrivning: " & sIssue

    oMail.From = sFrom
    oMail.To = sTo
    oMail.Subject= sSubject
    oMail.TextBody = sTextBody

   [B] oMail.Send[/B]
    Set oMail = Nothing

End Sub
```

Men, jag får fel enligt:

> fel '8004020f'
> 
> Deh här prenumerationens händelseklass ligger i en ogiltig partition
> 
> /hl/default.asp, rad 100

Vad kan det vara?

Mvh
Henrik

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

## #2 — Zaiman, 2009-02-03T16:38Z

Google: <http://www.google.se/search?sourceid=navclient&hl=sv&ie=UTF-8&rlz=1T4SUNA_svSE299SE299&q=cdo+8004020f>
Följ första länken...

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

## #3 — devotion, 2009-02-03T18:30Z

Jag som låg uppkopplad till firman med vpn...

Funkade inte med den angivna smtp-adressen då. Bytte, så funkade det...

Sorry!

Mvh
Henrik

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/176700-cdo