[AutoIt3] Texte an mich schicken per E-Mail

11/27/2009 20:06 HighLvleR#1
Hallo E*PvP,

Da ich gerade einen Support-Bot scripte möchte ich fragen wie ich es schaffen kann das die Texte an mich geschickt werden per E-Mail z.B. Vorschläge?

Dann hab ich noch ein anderes Problem

PHP Code:
Func start()
    ;
noch keine Funktion! <- wie mach ich das?
    
EndFunc
Func pause
()
    
Sleep (100000) <- funzt ned :S und auch unlogisch
EndFunc
Func end
()
    Exit
    
EndFunc 
Wie baue ich eine Pause und Play Funktion ein?

mfG
11/28/2009 10:05 Proffni#2
Code:
;shortcuts belegen: 1 auf numpad = Start, 2 auf numpad = pause, Esc = beenden
HotKeySet("{Numpad1}","start")
HotKeySet("{Numpad2}","pause")
HotKeySet("{Esc}","end")

;damit man sieht, dass er wirklich was macht
Run("notepad")
WinWaitActive("Unbenannt - Editor")
	
While 1 ;sonst hört der sofort wiede rmit dem script auf
	sleep(100)
WEnd

Func start()
	While 1
		send("1")
		sleep(100)
	WEnd
EndFunc

Func pause()
	While 1
		sleep(100);<----- du hattest ein lehrzeichen zwischen sleep und (100)... is nie gut^^ so nebenbei
    WEnd
EndFunc

Func end()
    Exit
EndFunc
noch fragen? xD
11/28/2009 12:23 HardCore.1337#3
du hast glaube das Thema ein bisschen verfehlt.
Er will wissen wie er E-Mails empfangen kann (von seinen "Kunden" halt.
^^
11/28/2009 13:49 Knower#4
aber pausefunktion reicht eig mit sleep(1000)^^


#include <INet.au3>

$s_SmtpServer = "mail.xxx.de"
$s_FromName = "My Name"
$s_FromAddress = "From eMail Address"
$s_ToAddress = "[Only registered and activated users can see links. Click Here To Register...]"
$s_Subject = "My Test UDF"
Dim $as_Body[2]
$as_Body[0] = "Testing the new email udf"
$as_Body[1] = "Second Line"
$Response = _INetSmtpMail ($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body)
$err = @error
If $Response = 1 Then
MsgBox(0, "Success!", "Mail sent")
Else
MsgBox(0, "Error!", "Mail failed with error code " & $err)
EndIf

so ungefähr siehst aus, denk ich mal (quelle: 2sec google)


und ich habe es damals hiermit geschafft
[Only registered and activated users can see links. Click Here To Register...]

indem ich einfach eine ini erstellt habe mit dem text und den als attached gemacht habe sodas der als anhang an meine mail geschrieben wird

du kannst es aber betsimmt auch über ftp server machn^^
11/28/2009 15:30 Xereon#5
Quote:
Originally Posted by Proffni View Post
Code:
;shortcuts belegen: 1 auf numpad = Start, 2 auf numpad = pause, Esc = beenden
HotKeySet("{Numpad1}","start")
HotKeySet("{Numpad2}","pause")
HotKeySet("{Esc}","end")

;damit man sieht, dass er wirklich was macht
Run("notepad")
WinWaitActive("Unbenannt - Editor")
	
While 1 ;sonst hört der sofort wiede rmit dem script auf
	sleep(100)
WEnd

Func start()
	While 1
		send("1")
		sleep(100)
	WEnd
EndFunc

Func pause()
	While 1
		sleep(100);<----- du hattest ein lehrzeichen zwischen sleep und (100)... is nie gut^^ so nebenbei
    WEnd
EndFunc

Func end()
    Exit
EndFunc
noch fragen? xD
so kannst stimmt das ja net, müsste eher so seien:_
Code:
;shortcuts belegen: 1 auf numpad = Start, 2 auf numpad = pause, Esc = beenden
HotKeySet("{Numpad1}","start")
HotKeySet("{Numpad2}","pause")
HotKeySet("{Esc}","end")

Global $running = true

;damit man sieht, dass er wirklich was macht
Run("notepad")
WinWaitActive("Unbenannt - Editor")
	
While 1 
If $running Then
;Hier kommt dein Script rein was ausgeführt werden soll, wenn das Programm ;läuft
Else
sleep(1000)
WEnd

Func start()
$running = true	
EndFunc

Func pause()
$running = false
EndFunc

Func end()
    Exit
EndFunc
Sorry für die fehlende Formatierung; hab das schnell mit dem in Forum integrieten Editor gemacht xD