Hallo Ihr,
Ich bin grad an einem Rundschreib-Tool dran.
Mein bisheriger Code:
Spoiler anzeigen
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$username = InputBox("Login", "Username:")
$password = InputBox("Login", "Passwod:")
$s_SmtpServer = "zensiert"
#Region ### START Koda GUI section ### Form=
$title = GUICreate("Rundmail-Tool", 418, 401, 192, 125)
GUISetBkColor(0x000000)
$betreff_l = GUICtrlCreateLabel("Betreff:", 16, 16, 98, 24)
GUICtrlSetFont(-1, 14, 800, 0, "Nightclub BTN")
GUICtrlSetColor(-1, 0xFF0000)
$betreff = GUICtrlCreateInput("", 128, 16, 273, 21)
$message_l = GUICtrlCreateLabel("Message", 158, 56, 100, 32)
GUICtrlSetFont(-1, 14, 800, 0, "Nightclub BTN")
GUICtrlSetColor(-1, 0xFF0000)
$message = GUICtrlCreateEdit("", 8, 96, 393, 209)
GUICtrlSetFont(-1, 10, 800, 0, "@Kozuka Gothic Pro B")
GUICtrlSetColor(-1, 0xFF0000)
GUICtrlSetBkColor(-1, 0x6D6D6D)
GUICtrlSetCursor (-1, 3)
$send = GUICtrlCreateButton("Send", 16, 328, 105, 41, $WS_GROUP)
$clear = GUICtrlCreateButton("Clear", 152, 328, 113, 41, $WS_GROUP)
$exit = GUICtrlCreateButton("Exit", 296, 328, 105, 41, $WS_GROUP)
$copyright = GUICtrlCreateLabel("© by Schrubber", 304, 376, 113, 21)
GUICtrlSetFont(-1, 8, 800, 0, "Nightclub BTN")
GUICtrlSetColor(-1, 0xFF0000)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
if(FileExists("mail.ini")) Then
IniReadSection("mail.ini", "alle")
Else
MSGBox(0, "Keine Mailaddys vorhanden", "Es ist ein Fehler mit der Mail.ini aufgetreten.")
Exit
EndIf
func quit()
$msgbox = MSGBox(4, "Programm beenden?", "Wollen sie das Programm wirklich beenden?")
if($msgbox = 6) Then
Exit
EndIf
if($msgbox = 7) Then
sleep(500)
EndIf
EndFunc
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
quit()
Case $exit
quit()
Case $clear
GUICtrlSetData($betreff, "")
GUICtrlSetData($message, "")
Case $send
;~ $Response = _INetSmtpMailAuth ($s_SmtpServer, $username, $username, $toadress, $username, $password, GUICtrlRead($betreff), GUICtrlRead($message))
EndSwitch
WEnd
Nun soll in der mail.ini Datei eine Section angelegt werden mit dem namen "alle". Dort werden dann alle Addy´s untereinander geschrieben.
Meine Frage: Wie muss ich das machen, dass er jede einzelne Zeile dieser Ini-Datei ließt, und diese Addy dann als $toadress nimmt, das aber bei JEDER Mailadresse?
Habe dazu keine Idee
Danke
Rubberducky