Problème envoi de mail

[Galaad]

Bonjour,

Je voudrais envoyer un mail avec Lotus Notes via mon serveur IIS mais j'ai une erreur que je n'arrive pas à résoudre.

Le code:

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
Dim Session 
Dim db 
Dim doc 
Set Session = CreateObject("Notes.NotesSession") 
Set db = Session.GETDATABASE("", "") 
Call db.OPENMAIL 
Set doc = db.CREATEDOCUMENT() 
With doc 
    .Form = "Memo" 
    .SendTo = "adresse..." 
    .CopyTo = "adresse..." 
    .subject = "Petit test" 
    .body = "Ceci est un petit test d'envoi de message a partir du serveur" 
    .From = Session.COMMONUSERNAME 
    .PostedDate = Now 
    .SAVEMESSAGEONSEND = True 
End With 
Call doc.SEND(True) 
Set Session = Nothing 
Set db = Nothing 
Set doc = Nothing

L'erreur:
Erreur d'exécution Microsoft VBScript erreur '800a0046'
Permission refusée: 'CreateObject'

Je pense à un problème de droit mais je ne trouve pas.

Pouvez vous m'aider svp?

[Galaad]

Bon,

J'ai essayer autre chose, j'ai installer CDONTS, ça à l'air pas mal mais mes mails restent dans le répertoire Queue de mon IIS

Des idées ?
Merci

[Immobilis]

Salut,

Ton serveur n'est sensé que envoyer des mails, je suppose, pas en recevoir. Dans ce cas, il ne faut pas le transformer en serveur de mail (tout désintaller) mais seulement le service SMTP (et pas le service POP3). Ainsi, il ne devrait pas s'amuser à essayer de gérer des files d'attente. Ce sera déjà un bon début.

A+

[Galaad]

Salut,

Ben en fait mes mail sont tous passés cette nuit à la même heure, mais je n'arrive pas à savoir si c'est du au IIS qui les envois ou au Domino de relais...
J'aimerais bien pouvoir le faire en temps réel.

[Immobilis]

Faut voir avec les propriétés de ton serveur SMTP.
As-tu fait ce que je t'ai suggéré précédement?

A+