Hallo Comunity,
ich bin neu hier, und auch neu was Scripten/Programmieren angeht und hoffe Ihr könnt mir bei meinem Problem weiterhelfen.
Ich möchte im groben ein Tool schreiben, das vier Active Directory Account von Praktikanten (1-4) aus einer Combobox ausliest und per Email an den Tutor des Praktikanten schickt.
Noch mal deutlicher: Ich wähle aus einer Combobox einen Account, zB Praktikant2. Dann soll, wenn ich die Gui ausführe, eine Email an den Tutor gesendet werden, mit dem Accountname aus der Combobox und dem Kennwort.
Ich weiß, das das irgendwie mit Guictrlread funktionieren muss, allerdings kommt als Antwort dann immer nur die 0 zurück.
Hier mal der Code:
[autoit];imports
[/autoit][autoit][/autoit][autoit]#include <array.au3>
#include <Excel.au3>
#include <File.au3>
#include <Misc.au3>
#include <Inetcustom.au3>
#include <AD\AD.au3>
;Koda Import
[/autoit][autoit][/autoit][autoit]#include <ComboConstants.au3>
#include <DateTimeConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Users\admin_2518\Documents\Praktikanten\Form1.kxf
$Form1_1 = GUICreate("Praktikantenaccount", 519, 305, 192, 114)
$Group1 = GUICtrlCreateGroup("Infos", 24, 112, 249, 169)
$Date1 = GUICtrlCreateDate("2014/09/08 14:06:5", 32, 144, 186, 21)
$Input1 = GUICtrlCreateInput("", 96, 192, 121, 21)
$Input2 = GUICtrlCreateInput("Name", 96, 240, 121, 21, BitOR($GUI_SS_DEFAULT_INPUT,$ES_CENTER,$ES_READONLY))
GUICtrlCreateLabel("", 40, 192, 4, 4)
$Label1 = GUICtrlCreateLabel("Pers.Nr.:", 32, 192, 36, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Combo1 = GUICtrlCreateCombo("Account", 24, 40, 145, 25, BitOR($GUI_SS_DEFAULT_INPUT,$CBS_DROPDOWN,$CBS_AUTOHSCROLL))
$Combo1 = GUICtrlSetData(-1, "Praktikant|Praktikant2|Praktikant3|Praktikant4")
$Button1 = GUICtrlCreateButton("Ausführen", 336, 120, 131, 25)
$Button2 = GUICtrlCreateButton("Beenden", 336, 176, 131, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
WinSetOnTop("Praktikantenaccount", "", 1)
[/autoit][autoit][/autoit][autoit]$wert = GUICtrlRead($Combo1)
[/autoit][autoit][/autoit][autoit][/autoit][autoit];Mailversand
[/autoit][autoit][/autoit][autoit]$s_SmtpServer = "Server"
$s_FromName = "Name"
$s_FromAddress = "AbsenderEmail"
$s_ToAddress = "meineEmail"
$s_Subject = "Praktikantenaccount"
Local $as_Body [2] = [$wert & "Passwort: 1234Kt?"]
Vielen Dank schon mal für eure Hilfe