AutoIt - Projekt hilfe

Kazume

Hallo Leute,

ich arbeite seit Wochen daran für meinen Betrieb ein Programm zu schreiben um einige Sachen zu erleichtern.
Da ich sehr unerfahren im Thema Autoit & Programmieren bin benötige ich dabei hilfe.
Ich bin immer wieder auf der Suche nach dem richtigen Syntax für einige funktionen oder verzweifel daran die Befehle richtig zu nutzen.

Ich bin für jede Hilfe dankbar

* = ICH PACK DAS!!!!

Suche nach Mitarbeitern
- Vorname
- Nachname
- Rufnummer
- Abteilung
- Firma
Schnellsuche per Buttons
Erstellung eines Mitarbeiters im AD
Anwesenheitsliste implementieren ( MySQL - Datenbank )
~~Die letzten 5. Mails anzeigen ( Outlook - UDF )~~
~~Die heutigen Termine anzeigen ( Outlook - UDF )~~
Jeden Montag eine Erinnerung für die Anwesenheitsliste
Powershell script für die Erstellung eines E-Mail Accounts ( Exchange Server )
Aktuelle Uhrzeit & Datum anzeigen *
Gruppen hinzufügen/entfernen (Drag & Drop)
Gruppen von 2 Mitarbeitern vergleichen
Ausgeschiedene Mitarbeiter nicht anzeigen in der Listview
- Outlook Postfächer von ausgeschiedenen Mitarbeitern archivieren & verschieben
- Mitarbeiter im AD verschieben*

7.

Spoiler anzeigen

AutoIt

#include <Date.au3>


If _DateDayOfWeek(@WDAY) = "Monday" Then
	ToolTip("Anwesendheitsliste!",0,0,"Erinnerung:",2)
	Sleep(300000)
EndIf

**water**

11. Da gibt es ein Beispiel von mir (siehe meine Signatur). ADCU - vergleicht die Gruppen von 2 Usern. Das kannst Du aufrufen und gleich die beiden Benutzerkennungen mitgeben.

**water**

1. Das geht über ANR für alle namensbezogenen Felder. Siehe Beispielscript _AD_GetObjectsInOU.au3 - Beispiel 3.

**water**

3. Siehe _AD_CreateUser.au3 Beispielscript.

**water**

2. Was verstehst Du genau darunter?

**water**

5. und 6. Wäre das nicht besser im Outlook direkt gelöst? Oder welche speziellen Wünsche der Anwender verbergen sich dahinter?

**water**

12.2 _AD_MoveObject.au3 Beispielskript.

Kazume

Alles was Grün makiert ist, ist bereits erledigt. Hätte ich vielleicht oben dazu schreiben sollen

5 und 6 wurden einfach mal so in den Raum geworfen - halte es auch für ziemlich unnötig.

**water**

5. und 6. sehe ich auch nicht als sinnvoll an. Im Outlook habe ich dann eifnach mehr möglichkeiten. Z.B. eine Mail sofort öffnen etc.

Kazume

10 & 12

Ich habe 2 ListViews & 2 Inputfelder um von 2 verschiedenen Leuten die Gruppen anzeigen zu lassen.
Ist es möglich per Drag&Drop die eine Gruppe in die ListView zu ziehen, damit die andere Person diese Gruppe auch bekommt im AD?

Wie würde man das ungefähr realisieren - welchen Syntax bräuchte ich da?

_GUICtrlListView_CopyItems ?? Das wäre so eins der wichtigsten Features

**water**

Sollte funktionieren, hab's selber aber noch nie verwendet.
Im engl. (und vermutlich auch im deutschen) Forum gibt es viele Beispiele z.B. hier.

Kazume

Zitat von water

Sollte funktionieren, hab's selber aber noch nie verwendet.
Im engl. (und vermutlich auch im deutschen) Forum gibt es viele Beispiele z.B. hier.

Das hilft mir nicht wirklich weiter, kann mit
Opt("GUIOnEventMode", 1)nicht arbeiten.

Spoiler anzeigen

AutoIt

Func AdminGUI()
	GUISetState(@SW_SHOW,$AdminGUI)
		While 1
			$nMsg = GUIGetMsg()
		Select
			Case $nMsg = $GUI_EVENT_CLOSE
				Exit
			Case $nMsg = $ZeigButton2
				GUISetState(@SW_SHOW, $NormalGUI)
				GUISetState(@SW_HIDE, $AdminGUI)
					NormalGUI()
			Case $nMsg = $AdminSearchButton
			 _AD_Open()	
				Local $ReadUserSearch = GUICtrlRead($AdminSearch)
				Local $User = _AD_GetObjectsInOU("", "(|(name=" & $ReadUserSearch & ")(sn=" & $ReadUserSearch & ")(company=" & $ReadUserSearch & ")(Givenname=" & $ReadUserSearch & ")(telephoneNumber=" & $ReadUserSearch & ")(department=" & $ReadUserSearch & ")(sAMAccountName=" & $ReadUserSearch & ")(mail=" & $ReadUserSearch & "))", 2, "name,mail,telephoneNumber,department,company")
					_GUICtrlListView_DeleteAllItems($ListViewUserData)
					_ArrayDelete($User,0)
					_GUICtrlListView_AddArray($ListViewUserData,$User)

				Local $ADGroup = _AD_GetUserGroups($ReadUserSearch)
				Local $aListViewUserGroupData[UBound($ADGroup)][1]
			For $i = 0 To UBound($aListViewUserGroupData) - 1
					$aListViewUserGroupData[$i][0] = StringRegExpReplace($ADGroup[$i], 'CN=(.+?),.+', '$1')
			Next
					_GUICtrlListView_DeleteAllItems($ListViewUserGroupData)
					_ArrayDelete($aListViewUserGroupData, 0)
					_GUICtrlListView_AddArray($ListViewUserGroupData, $aListViewUserGroupData)
			Case $nMsg = $AdminSearchButton2
				 _AD_Open()	
				Local $ReadUserSearch = GUICtrlRead($AdminSearch2)
				Local $ADGroup = _AD_GetUserGroups($ReadUserSearch)
				Local $aListViewUserGroupData[UBound($ADGroup)][1]
				Local $User = _AD_GetObjectsInOU("", "(|(name=" & $ReadUserSearch & ")(sn=" & $ReadUserSearch & ")(company=" & $ReadUserSearch & ")(Givenname=" & $ReadUserSearch & ")(telephoneNumber=" & $ReadUserSearch & ")(department=" & $ReadUserSearch & ")(sAMAccountName=" & $ReadUserSearch & ")(mail=" & $ReadUserSearch & "))", 2, "name,mail,telephoneNumber,department,company")
;~ 					_GUICtrlListView_DeleteAllItems($ListViewUserData)
					_ArrayDelete($User,0)
					_GUICtrlListView_AddArray($ListViewUserData,$User)
			For $i = 0 To UBound($aListViewUserGroupData) - 1
					$aListViewUserGroupData[$i][0] = StringRegExpReplace($ADGroup[$i], 'CN=(.+?),.+', '$1')
			Next
					_GUICtrlListView_DeleteAllItems($ListViewUserGroupData2)
					_ArrayDelete($aListViewUserGroupData, 0)
					_GUICtrlListView_AddArray($ListViewUserGroupData2, $aListViewUserGroupData)
			EndSelect
		WEnd
EndFunc

Alles anzeigen

Das müsste doch irgendwie da eingebaut werden oder nicht?

**water**

Muss es wirklich Drag & Drop sein?
Ein ContextMenu mit den Einträgen "Gruppe entfernen" und "Gruppe zum anderen Benutzer hinzufügen" wäre viel einfacher zu coden.

Kazume

Nein muss es nicht

**autoBert**

Und in Drag and Drop? findest du ein Beispiel um Items von einer LV zu einer anderen zu ziehen. Um es in beide Richtungen zu machen musst du noch @GUI_DragId und @GUI_DropId zum auswerten einbauen. Die benötigten AD-Funktionen musst du natürlich auch noch aufrufen.