Jag har gjort ett mailutskick med hjälp av CDONTS. Tidigare har det fungerat men nu när jag kör filen så får jag felmeddelandet att: "Active X komponent kan inte skapa objektet"
Vad kan detta bero på ?

Jag får fel på rad 47.

Set Mailer = CreateObject("CDONTS.NewMail")
Set DataConn = CreateObject("ADODB.Connection")

DataConn.Open "DRIVER={SQL Server};SERVER=cityhall6;UID=sa;PWD=;Database=avtal"

sqlString = "SELECT * from avtal where datediff(d,getdate(),datum)=45"

Set RS = DataConn.Execute(sqlString)

a = FALSE
textstring = "Följande avtal håller på att gå ut" & Chr(10)

Do While Not RS.EOF
textstring = textstring & RS("avtalsnummer") & Chr(10)
a=TRUE
RS.MoveNext
Loop

RS.Close


Set DataConn2 = CreateObject("ADODB.Connection")
Set FSObj = CreateObject("Scripting.FileSystemObject")

DataConn2.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& FSObj.GetAbsolutePathName ("epost_inloggning\epost.mdb")
sqlString = "SELECT * FROM epost ORDER BY id"
Set RS2 = DataConn2.Execute(sqlString)

epostadd = ""
x = FALSE

If a = TRUE Then
Mailer.Body = textstring
Mailer.From = "Avtalsdatabasen<martin.berlin@sdc.helsingborg.se>"
Mailer.Subject = "Rapport från avtalsdatabasen"

Do While Not RS2.EOF
If x = TRUE Then
epostadd = epostadd & ","
End If
epostadd = epostadd & RS2("namn") & "<" & RS2("epost") &">"
RS2.MoveNext
x = TRUE
Loop
Mailer.To = epostadd

Mailer.Send

End If

RS2.Close
Set Mailer = Nothing

Vilken rad är rad 47?
Testa även att anropa med Server.CreateObject()

Men det går inte pga att det är en windows script fil

Rad 47 är Mail.Send

Tycker det är skumt att man får det felet med Active komponenten

Låter som din SMTP tjänst är felaktigt uppsatt eller något..
/Pelle

Har ingen lösning på din fråga, ville bara komma med ett tips ändå:
Användarnamn sa med blankt password på databasen är inte alltid bra :o)

Vilket OS kör du? Om du kör Windows XP så installeras inte cdonts.dll med IIS:en.. Du får försöka få tag på en från annat håll t.ex från en Win2000 maskin och registera den i %systemroot%\system32 katalogen.
/Erik