Windows: Bei Benutzeranmeldung email senden.

[lordfritte]

Hallo, ich bin auf der suche nach einem kostenlosen Programm, welches mir bei einer Benutzeranmeldung eine email sendet.
Empfänger Email und SMTP Server sollte konfigurierbar sein.

 

[miac]

Das wäre eins, welches Du dann in der Aufgabenplanung einbindest:
http://www.blat.net/

 

[DUNnet]

Welches Betriebssystem o_O ?
Herr Lordfritte, ein paar Infos wären noch gut.

Ab Windows Vista dürftes mit der Aufgabenplanung gehen, ist inklusiv, jap.


Gruß

 

[lordfritte]

Windows 7, 64-Bit

 

[smiler10]

Geht auch ver vbs Script:

option explicit
 
Dim oEmail, oConf
Dim authuser, authpass, smtpserver
Dim recipient,sender,subject,message
 
authuser="[B]Useraccount E-Mail[/B]"
authpass="[B]Passwort für Useraccount E-Mail[/B]"
smtpserver="[B]Mailserver[/B]"
 
recipient="[B]Empfänger E-Mail-Adresse[/B]"
sender="[B]Sender E-Mail-Adresse[/B]"
subject="[B]Betreff[/B]"
message="[B]Hier steht eine Textnachricht.[/B]"
 
Set oEmail = CreateObject("CDO.Message")
Set oConf = CreateObject("CDO.Configuration")
 
oConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
oConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
oConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = smtpserver
oConf.Fields("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
oConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendusername") = authuser
oConf.Fields("http://schemas.microsoft.com/cdo/configuration/sendpassword") = authpass
oConf.Fields.Update
 
oEmail.Configuration = oConf
oEmail.To = recipient
oEmail.From = sender
oEmail.ReplyTo = sender
oEmail.Subject = subject 
oEmail.HTMLBody = message
 
oEmail.Send
 
Set oConf = Nothing
Set oEmail = Nothing

Die entsprechenden Einstellungen in fett vornehmen und das ganze als Datei mit der Endung vbs abspeichern..

Weitere Infos und Erklärungen dazu gibt es hier..

Greets
smiler10