ENVOI MAIL D'ALERTE SI ESPACE DISQUE INFÉRIEUR À 1GO
Mik10_46
Messages postés
42
Date d'inscription
mercredi 20 avril 2005
Statut
Membre
Dernière intervention
9 mai 2006
-
27 avril 2006 à 15:42
tempusus Messages postés 358 Date d'inscription dimanche 8 février 2004 Statut Membre Dernière intervention 9 octobre 2017 - 26 janv. 2009 à 14:48
tempusus Messages postés 358 Date d'inscription dimanche 8 février 2004 Statut Membre Dernière intervention 9 octobre 2017 - 26 janv. 2009 à 14:48
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/37280-envoi-mail-d-alerte-si-espace-disque-inferieur-a-1go
https://codes-sources.commentcamarche.net/source/37280-envoi-mail-d-alerte-si-espace-disque-inferieur-a-1go
26 janv. 2009 à 14:48
Je viens de tester ce script et j'ai une erreur:
C:\scripts\test2.wsf(34, 2) Windows Script Host: Référence d'entité non terminée
- ';' correspondant non trouvé
sais-tu d'où cela peut venir?
c'est à priori detecté à la fin du script...
une idée pour solutionner le probleme?
Cdt
Tempusus
Admin CS
4 oct. 2007 à 15:21
je suis on ne peut plus débutante dans le sujet, et j'ai essayé de lancer ton script mais ça ne marche pas, j'ai une erreur dès la ligne 1 :
line :1
char : 9
error : expected identifier
code : 800A03F2
Source : Microsoft VBScript compilation error
12 juil. 2006 à 14:42
12 juil. 2006 à 01:37
11 juil. 2006 à 14:51
PS : je ne suis pas du tout un expert en info.
merci
11 juil. 2006 à 14:14
Voilà
11 juil. 2006 à 10:39
j'aimerais savoir comment utiliser votre code sur le serveur.
Merci
28 avril 2006 à 09:24
System.Exception: Impossible de créer le composant ActiveX.
at Microsoft.VisualBasic.Interaction.GetObject(String PathName, String Class)
at Mail_Alerte.mdlMain.SendMail() in C:\Documents and Settings\Propriétaire\Mes documents\Visual Studio Projects\Mail Alerte\mdlMain.vb:line 23
at Mail_Alerte.mdlMain.Main() in C:\Documents and Settings\Propriétaire\Mes documents\Visual Studio Projects\Mail Alerte\mdlMain.vb:line 7
Je pense que c'est au niveau objWMIService.
J'ai remarqué que tu créer un CDO.Message, il y a plus simple il est déjà dans la FrameWork moi je fais une référence System.Web
puis j'écris ce code :
Dim myMail As New Web.Mail.MailMessage
With myMail
.From = "ADRESSE MAIL D'OU L'ALERTE EST ENVOYEE"
.To = "ADRESSE MAIL DU OU DES DESTINATAIRES DE L'ALERTE"
.Subject = "Notification - Espace disponible inférieur à 1GO sur " & strComputer
.Body = objDisk.DeviceID & FreeSpaceMO & " MO de Libres"
.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "NOM D'UTILISATEUR DU COMPTE QUI ENVOIE LES MAIL"
.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "MOT DE PASSE DU COMPTE QUI ENVOIE LES MAILS"
.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
Web.Mail.SmtpMail.Send(myMail)
End With
Bonne continuation !
Redman
27 avril 2006 à 16:47
27 avril 2006 à 15:42
je n'ai pour le moment pas vu d'erreur, donc la Note s'en fait ressentir : 10/10
Cordialement,
Mik