|
You last visited: Today at 18:38
Advertisement
Log Dateien an e-Mail senden
Discussion on Log Dateien an e-Mail senden within the AutoIt forum part of the Coders Den category.
10/09/2011, 13:47
|
#1
|
elite*gold: 625 
Join Date: Oct 2008
Posts: 767
Received Thanks: 60
|
Log Dateien an e-Mail senden
Hey com !
Ich habe eine frage.Auf meinem Windows Server habe ich einen Minecraft Server.Durch ein Plug-In werden dort automatisch Logdateien erstellt. Ich möchte nun mithilfe von AutoIt das diese Logdatein automatisch ans iPhone/e-Mail gesendet werden.
Das ganze sollte automatisch sein,da ich ja wenn ich unterwegs bin keinen
zugriff auf den Server habe.
Wie bekomm ich das hin ?
|
|
|
|
10/09/2011, 15:56
|
#2
|
elite*gold: 95
Join Date: May 2011
Posts: 982
Received Thanks: 189
|
also ich glaube ich habe schonmal nach ner emailfunktion für autoit gesucht und ncihts gefunden. eine möglichkeit wäre es, eine batch datei zu erstellen, die dann die email versendet. guck dir dazu mal  an. da steht das glaube ich ganz gut
|
|
|
|
|
10/09/2011, 20:06
|
#3
|
elite*gold: 25
Join Date: Jun 2010
Posts: 1,076
Received Thanks: 290
|
PHP Code:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Global $oMyRet[2]
Global $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc")
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Email versender")
$Input1 = GUICtrlCreateInput("", 8, 40, 121, 21)
$Input2 = GUICtrlCreateInput("", 248, 40, 121, 21)
$Label1 = GUICtrlCreateLabel("Mail sever: Für www.web.de ist er smtp.web.de ", 8, 16, 229, 17)
$Label2 = GUICtrlCreateLabel("Name des Absenders", 248, 16, 105, 17)
$Label3 = GUICtrlCreateLabel("Absender email addresse", 8, 72, 122, 17)
$Input3 = GUICtrlCreateInput("", 8, 96, 121, 21)
$Input4 = GUICtrlCreateInput("", 248, 96, 121, 21)
$Label4 = GUICtrlCreateLabel("Empfänger email addresse", 248, 72, 128, 17)
$Input5 = GUICtrlCreateInput("", 8, 152, 121, 21)
$Label5 = GUICtrlCreateLabel("Betreff", 8, 128, 35, 17)
$Label6 = GUICtrlCreateLabel(" Text ", 248, 128, 34, 17)
$Input6 = GUICtrlCreateInput("", 248, 152, 121, 21)
$Label7 = GUICtrlCreateLabel("Nochmal Absender email", 8, 184, 121, 17)
$Input7 = GUICtrlCreateInput("", 8, 208, 121, 21)
$Input8 = GUICtrlCreateInput("", 248, 208, 121, 21)
$Label8 = GUICtrlCreateLabel("Passwort der Absender email", 248, 184, 140, 17)
$Button1 = GUICtrlCreateButton("Email versenden", 152, 248, 100, 25, 0)
$Button2 = GUICtrlCreateButton("Abbrechen", 312, 256, 75, 25, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$rc = _INetSmtpMailCom(GUICtrlRead( $Input1),GUICtrlRead($Input2),GUICtrlRead($Input3), GUICtrlRead($Input4), GUICtrlRead($Input5), GUICtrlRead($Input6), "", "","", GUICtrlRead($Input7), GUICtrlRead($Input8))
If @error then
msgbox(0,"Error sending message","Error code:" & @error & " Description:" & $rc)
EndIf
Case $Button2
Exit
EndSwitch
WEnd
Func _INetSmtpMailCom($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject = "", $as_Body = "", $s_AttachFiles = "", $s_CcAddress = "", $s_BccAddress = "", $s_Username = "", $s_Password = "")
$objEmail = ObjCreate("CDO.Message")
$objEmail.From = '"' & $s_FromName & '" <' & $s_FromAddress & '>'
$objEmail.To = $s_ToAddress
Local $i_Error = 0
Local $i_Error_desciption = ""
If $s_CcAddress <> "" Then $objEmail.Cc = $s_CcAddress
If $s_BccAddress <> "" Then $objEmail.Cc = $s_BccAddress
$objEmail.Subject = $s_Subject
If StringInStr($as_Body,"<") and StringInStr($as_Body,">") Then
$objEmail.HTMLBody = $as_Body
Else
$objEmail.Textbody = $as_Body & @CRLF
EndIf
If $s_AttachFiles <> "" Then
Local $S_Files2Attach = StringSplit($s_AttachFiles, ";")
For $ex = 1 To $S_Files2Attach[0]
$S_Files2Attach[$x] = _PathFull ($S_Files2Attach[$x])
If FileExists($S_Files2Attach[$x]) Then
$objEmail.AddAttachment ($S_Files2Attach[$x])
Else
$i_Error_desciption = $i_Error_desciption & @lf & 'File not found to attach: ' & $S_Files2Attach[$x]
SetError(1)
return 0
EndIf
Next
EndIf
$objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
$objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = $s_SmtpServer
$objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
;Authenticated SMTP
If $s_Username <> "" Then
$objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
$objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = $s_Username
$objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = $s_Password
EndIf
;Update settings
$objEmail.Configuration.Fields.Update
; Sent the Message
$objEmail.Send
if @error then
SetError(2)
return $oMyRet[1]
EndIf
EndFunc;==>_INetSmtpMailCom
;
;
; Com Error Handler
Func MyErrFunc()
$HexNumber = Hex($oMyError.number, 8)
$oMyRet[0] = $HexNumber
$oMyRet[1] = StringStripWS($oMyError.description,3)
ConsoleWrite("### COM Error ! Number: " & $HexNumber & " ScriptLine: " & $oMyError.scriptline & " Description:" & $oMyRet[1] & @LF)
SetError(1); something to check for when this function returns
Return
EndFunc;==>MyErrFunc
Nicht von mir.
Hoffe ich habe geholfen 
|
|
|
|
|
10/09/2011, 20:31
|
#4
|
elite*gold: 95
Join Date: May 2011
Posts: 982
Received Thanks: 189
|
1. man muss noch <file.au3> includen
2. in zeile 67 steht $ex, muss aber $x sein
bei der batchvariante hat man allerdings den vorteil, dass mein kein emailkonto extra benötigt.
|
|
|
|
|
10/09/2011, 20:48
|
#5
|
elite*gold: 25
Join Date: Jun 2010
Posts: 1,076
Received Thanks: 290
|
aso^^ okay.
|
|
|
|
|
10/09/2011, 20:50
|
#6
|
elite*gold: 95
Join Date: May 2011
Posts: 982
Received Thanks: 189
|
dachte ich zumindest... aber ich such jetzt schon 20 min und find einfach cniht das richtige... ich guck mal weiter^^
edit: ist mir jz zu doof, hab keine lsut mehr zu suchen...^^ war mir eigentlich ziehmlich sicher, dass man mit einer batch relativ einfahc eine mail versenden kann... naja... wenn jemand was dazu findet bitte poasten
|
|
|
|
|
10/10/2011, 11:35
|
#7
|
elite*gold: 625
Join Date: Oct 2008
Posts: 767
Received Thanks: 60
|
Danke erstmal für die mühe euch beiden, allerdings
brauch ich etwas das automatisch die e-mail
sendet, da ich nicht dauerzugriff auf den Server habe.
|
|
|
|
|
10/10/2011, 11:45
|
#8
|
elite*gold: 25
Join Date: Jun 2010
Posts: 1,076
Received Thanks: 290
|
Das war die Funktion.
Sorry aber du müsstest doch wohl in der Lage sein das zu
automatisieren.
Schick mir sonst ne PN oder add mich bei skype ich helfef dir sonst gern^^
|
|
|
|
|
10/10/2011, 18:44
|
#9
|
elite*gold: 625
Join Date: Oct 2008
Posts: 767
Received Thanks: 60
|
Habs jetzt anders & mit ner udf gemacht..trotzdem danke
|
|
|
|
|
10/10/2011, 19:51
|
#10
|
elite*gold: 25
Join Date: Jun 2010
Posts: 1,076
Received Thanks: 290
|
Das ist eine UDF...
Mit Beispiel
|
|
|
|
|
10/10/2011, 22:11
|
#11
|
elite*gold: 95
Join Date: May 2011
Posts: 982
Received Thanks: 189
|
kannst du die udf hier posten? interessiert mcih ja auch^^
|
|
|
|
|
10/11/2011, 13:24
|
#12
|
elite*gold: 625
Join Date: Oct 2008
Posts: 767
Received Thanks: 60
|
a
|
|
|
|
|
10/11/2011, 13:43
|
#13
|
elite*gold: 25
Join Date: Jun 2010
Posts: 1,076
Received Thanks: 290
|
Du weist schon das, dass genau die gleiche Funktion ist
wie die, welche ich gepostet habe ? :S
|
|
|
|
|
10/11/2011, 13:52
|
#14
|
elite*gold: 0
Join Date: Oct 2010
Posts: 51
Received Thanks: 12
|
*OFFTOPIC* Lachanfall  */OFFTOPIC*
Wenn du dir das, was amnesi vorher gepostet hat mal genau anschaust - bedeutet auch mal runterscrollst - besteht da nicht eine verblüffende Ähnlichkeit?
Außerdem: Warum fragst du erst in einem Forum, um dann zu posten, dass du die Antwort bei Google gefunden hast?
|
|
|
|
|
10/11/2011, 14:02
|
#15
|
elite*gold: 625
Join Date: Oct 2008
Posts: 767
Received Thanks: 60
|
ja aber mit der hats geklappt & mit der anderen nicht fertig
ich habe gefragt wie man es macht, dann kam mir die idee das es dazu bestimmt
ne udf gibt und hab sie dann gefunden.
|
|
|
|
 |
|
Similar Threads
|
c# Daten an E-Mail senden.
12/09/2010 - .NET Languages - 11 Replies
Hallo,
ich beschäftige mich zur Zeit mal wieder ein wenig mit dem Programmieren..
und habe da ein problem in C#
Und zwar habe ich vor das mir das Programm aus einem Ordner einige Datein per e-mail schickt.
hier etwas code..
SmtpClient mail = new SmtpClient();
|
Autoit Dateien Senden
11/21/2010 - AutoIt - 7 Replies
Hey,
habe grade eben mein Login Skript mit AutoIt fertig bekommen und jetzt habe ich aber eine Frage wenn ich einlogge kommen die Daten nur auf meinem Desktop,doch wie mache ich es das sie an meine Email verschickt werden?
Skript sieht im Moment so aus:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
|
E-mail senden UDF
10/30/2010 - AutoIt - 4 Replies
Hier eine E-mail senden UDF xP hab ich ma irgendwo gefunden....
DIE UDF IST NICHT VON MIR!!!!!!!!!!!
Ich habe die verschiedenen Parameter in deutsch beschrieben so das es eig. jeder verstehen müsste xD
naja hier is sie
; #FUNCTION# ================================================== ================================================== ================
; Name...........: _Mailsend
; Beschreibung ...: Versendet eine E-mail
; Syntax.........: _Mailsend($s_SmtpServer, $s_FromName,...
|
[VB] E-Mail senden
09/19/2010 - .NET Languages - 2 Replies
Hi,
ich will ein Programm machen, wo es eine E-Mail sendet wenn in der Richtextbox 2500 Zeichen drinnen sind. (Die E-mail Adresse kann man über eine Textbox eintragen)
jetzt hab ich folgende Fragen:
Wie mache ich das es üebrhaupt eine E-mail sendet und wie mache ich es das es die E-mail ab 2500 Zeichen senden?
Würde mich auf Antworten freuen, gibt auch THX für gute antworten
mfg
patschga
|
kal ne mail senden
01/30/2009 - Kal Online - 10 Replies
also ich versuch schon seit 1ner woche kal ne mail zu schicken aber das klappt nicht da kommt immer so ein error wo steht "plz check and try later again" wie gesagt versuch ich schon sei net woche .weiß einer wie ich ne mail senden kann ohne das es kommt??btw ich benutz für kal seite immer internet explorer.
|
All times are GMT +1. The time now is 18:39.
|
|
