Beiträge von water

Musashi

Zitat

mehr Reputation geht nicht

Danke für das überschwängliche Lob

Zitat von SUPPORT_TOOLER

Ich benötige das für eine Sicherheits-Dokumentation im Unternehmen für ein selbstgebautes Tool (übernommen vom Kollegen).

Ein paar Fragen, die ich als Sicherheitsteam stellen würde, um das Risiko einzuschätzen:

• Greift Dein Tool (und somit die UDFs) nur lesend auf die Systeme zu oder sollen auch Änderungen vorgenommen werden (Benutzer im AD anlegen, Registry Keys erstellen oder löschen ...)
• Wie sensibel sind die Informationen, die vom Tool verarbeitet werden (z.B. Benutzer/Passwort zur Anmeldung an das Active Directory)
• Welcher Schaden könnte maximal durch einen Bug in einer der UDFs angerichtet werden?
• Welche Fragen zur Sicherheitsüberprüfung "normaler Software " sollen auf das AutoIT Skript und die UDFs angewendet werden?
• ....

Ja, das gilt nur für den jeweiligen Funktionsaufruf:

$_readA = _Excel_RangeRead($oWorkbook, Default, $aRanges[$i][0], 1, True)

Zitat

Ich habe schon in meinem bisherigen "Excel Workbook" eingebaut, wie genau meinst du das?

Du öffnest derzeit mit _Excel_BookOpen das Excel-Arbeitsblatt und liest dann mit 100-en Funktionsaufrufen von _Excel_RangeRead Zelle für Zelle - das kostet Zeit.

Lies alles mit einem Aufruf und greife dann nur mehr auf den Array zu:

$aArray = _Excel_RangeRead($oWorkbook)

Das liest das gesamte Arbeitsblatt in einen 2D Array ein. Dann brauchst Du Dich nur mehr in Schleifen durch den Array durcharbeiten.

Das 255 Zeichen Limit umgehst Du, wenn Du für die Funktion _Excel_RangeRead den Parameter $bForceFunc auf True setzt.

Dein Skript wird langsam durch

• die vielen _Excel_RangeRead-Aufrufe
• die vielen Sleeps

Abhilfe:

• Lies das gesamte Excel Workbook in einen Array und arbeite dann diesen Array ab. Ist natürlich eine größere Anpassung!
• Automatisiere nicht das WebGUI mit MouseClicks etc. sondern mit WebDriver. Ist natürlich eine größere Anpassung!

Kannst Du bitte in kurzen Worten beschreiben, was der Zweck des Skriptes ist?

Ohne zu verstehen, was Du erreichen willst, ist es schwierig Verbesserungsvorschläge zu machen.

Du musst FolderAccess und ItemFind 3x durchführen. Kopiere die 3 Ergebnisse dann zu einem Array zusammen oder verarbeite alle 3 Arrays separat.

Das sollte nun funktionieren:

#include <OutlookEX.au3>

Global $oExchangeUser
Global $oOutlook = _OL_Open()
Global $aOL_Item = _OL_ItemFind($oOutlook, "*\Gesendete Objekte", $olMail, "", "Subject", "AW: Cookie Consent Management", "@ItemObject")
Global $oOL_Item = $aOL_Item[1][0]
; Get the Senders address
Global $oOL_Sender = $oOL_Item.Sender
If $oOL_Sender.AddressEntryUserType = $olExchangeUserAddressEntry Or $oOL_Sender.AddressEntryUserType = $olExchangeRemoteUserAddressEntry Then
    $oExchangeUser = $oOL_Sender.GetExchangeUser
    ConsoleWrite("Sender:    " & $oExchangeUser.PrimarySmtpAddress & @CRLF)
Else
    ConsoleWrite("Sender:    " & $oOL_Sender.Address & @CRLF)
EndIf
; Get the recipients addresses
For $oRecipient In $oOL_Item.Recipients
    $oAddressEntry = $oRecipient.AddressEntry
    If $oAddressEntry.AddressEntryUserType = $olExchangeUserAddressEntry Or $oAddressEntry.AddressEntryUserType = $olExchangeRemoteUserAddressEntry Then
        $oExchangeUser = $oAddressEntry.GetExchangeUser
        ConsoleWrite("Recipient: " & $oExchangeUser.PrimarySmtpAddress & @CRLF)
    Else
        ConsoleWrite("Recipient: " & $oRecipient.address & @CRLF)
    EndIf
Next
_OL_Close($oOutlook)

Seltsamerweise taucht das Feature bei mir auf! Sowohl in Chrome als auch in Firefox.

Funktioniert es nun wie von Dir gewünscht oder gibt es noch offene Fragen?

Exakt

Du musst 2 Dinge auseinanderhalten:

• Wert einer Variablen/Zelle in AutoIt bzw. Excel
• Darstellung bzw. Formatierung einer Zelle/Variablen in Excel bzw. AutoIt

Die Tatsache, dass AutoIt Dir den korrekten Excel-Wert anzeigt, gibt an, dass AutoIt kein Problem mit dem Wert hat.

Wenn Du eine andere Formatierung haben willst, dann durchsuche mal das Forum. Das wurde unlängst am Beispiel des 1000-er Trennzeichens durchexerziert.

Reduziertes Beispiel:

MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeRead Example 1", "Data successfully read." & @CRLF & _
        "Wert der Zelle A1: " & $sResult & @CRLF & _
        "Type der AutoIt-Variablen = " & VarGetType($sResult) & @CRLF & _
        "Formatiert: " & StringReplace($sResult, ".", ","))

Das Wiki hilft: https://www.autoitscript.com/w…lookEX_UDF_-_Meeting_Item

Diese Lösung brauchst Du nur noch auf die Empfängerobjekte anzuwenden.

Was funktioniert bei Dir nicht? Poste mal Dein Skript.

So was? Das Beispiel gibt Dir die Empfängernamen für die erste gefundene Mail aus:

#include <OutlookEX.au3>

Global $oOutlook = _OL_Open()
If @error <> 0 Then Exit MsgBox(16, "OutlookEX UDF", "Error creating a connection to Outlook. @error = " & @error & ", @extended = " & @extended)

Global $aOL_Item = _OL_ItemFind($oOutlook, "*\Gesendete Objekte", $olMail, "", "", "", "EntryID,@ItemObject")
If $aOL_Item[0][0] = 0 Then Exit MsgBox(16, "OutlookEX UDF", "Error finding item. @error = " & @error & ", @extended = " & @extended)

$oRecipient = $aOL_Item[1][1].Recipients
For $oRecipient In $aOL_Item[1][1].Recipients
    ConsoleWrite($oRecipient.address & @CRLF)
Next

_OL_Close($oOutlook)

Ich schaue mir das an, sobald ich wieder vor meinem PC sitze.

Der Trick ist dabei, den Parameter $bForceFunc auf True zu setzen.

Warum verwendest Du nicht _Excel_RangeWrite wenn Du schon _Excel_Open und _Excel_BookOpen verwendest? Damit lässt sich das Excel-Limit von 255 Zeichen umgehen.

API und GUI-Automatisierung zu mischen ist selten die beste Lösung

Genau diesen Thread hatte ich im Hinterkopf - konnte ihn aber leider nicht finden (weder im deutschen noch im engl. Forum)