Beiträge von qwert23

qwert23

Im Menü <Search, Replace> anwählen oder Ctrl+h und dann die Option "Replace in Selection" anwählen.

qwert23

Offensichtlich verwendest Du das OutlookUDF (nicht OutlookEX-UDF), stimmts?

Dein Beispiel scheint aus Outlook.au3 zu sein. Diese stellt zunächst ersteinmal die Verbindung zu Outlook her.
Hier der Auszug aus der Outlook.au3 dazu:

[autoit]

;===============================================================================
;
; Function Name: _OutlookOpen()
; Description: Open a connection to Microsoft Outlook.
; Syntax.........: _OutlookOpen()
; Parameter(s): None
; Requirement(s): AutoIt3 with COM support (post 3.1.1)
; Return Value(s): On Success - Returns new object identifier
; On Failure - Returns 0 and sets @ERROR > 0
; @ERROR = 1 - Unable to Create Outlook Object.
; Author(s): Wooltown
; Created: 2009-02-09
; Modified: -
;
;===============================================================================
Func _OutlookOpen()
Local $oOutlook = ObjCreate("Outlook.Application")
If @error Or Not IsObj($oOutlook) Then
Return SetError(1, 0, 0)
EndIf
Return $oOutlook
EndFunc
;===============================================================================
;
; Function Name: _OutlookSendMail()
; Description: Send an email using Microsoft Outlook.
; Syntax.........: _OutlookSendMail($oOutlook, $sTo = "", $sCc = "", $sBCc = "", $sSubject = "", $sBody = "", $sAttachments = "", $iBodyFormat = $olFormatUnspecified, $iImportance = $olImportanceNormal, $sWarningClick = "")
; Parameter(s): $oOutlook - Outlook object opened by a preceding call to _OutlookOpen()
; $sTo - Optional: The recipiant(s), separated by ;
; $sCc - Optional: The CC recipiant(s) of the mail, separated by ;
; $sBCc - Optional: The BCC recipiant(s) of the mail, separated by ;
; $sSubject - Optional: The Subject of the mail
; $sBody - Optional: The Body of the mail
; $sAttachments - Optional: Attachments, separated by ;
; $iBodyFormat - Optional: The Bodyformat of the mail, default = $olFormatUnspecified
; $iImportance - Optional: The Importance of the mail, default = $olImportanceNormal
; $sWarningClick - Optional: The Entire SearchString to 'OutlookWarning1.exe', Default = None
; Requirement(s): AutoIt3 with COM support (post 3.1.1)
; Return Value(s): On Success - Returns 1
; On Failure - Returns 0 and sets @ERROR > 0
; @ERROR = 1 - No To, Cc or BCc specified.
; @ERROR = 2 - OutlookWarning1.exe not found.
; @ERROR = 9 - ObjEvent error.
; Author(s): Wooltown
; Created: 2009-02-09
; Modified: 2009-02-24 - Several attachments didn't work
;
;===============================================================================
Func _OutlookSendMail($oOutlook, $sTo = "", $sCc = "", $sBcc = "", $sSubject = "", $sBody = "", $sAttachments = "", $iBodyFormat = $olFormatPlain, $iImportance = $olImportanceNormal, $sWarningClick = "")
Local $iRc = 0, $asAttachments
If $sTo = "" And $sCc = "" And $sBCc = "" Then
Return SetError(1, 0, 0)
EndIf
If $sWarningClick <> "" And FileExists($sWarningClick) = 0 Then
Return SetError(2, 0, 0)
Else
Run($sWarningClick)
EndIf
Local $oOuError = ObjEvent("AutoIt.Error", "_OutlookError")
Local $oMessage = $oOutlook.CreateItem($olMailItem)
With $oMessage
.To = $sTo
.Cc = $sCc
.Bcc = $sBCc
.Subject = $sSubject
.Body = $sBody
.BodyFormat = $iBodyFormat
.Importance = $iImportance
If $sAttachments <> "" Then
$asAttachments = StringSplit($sAttachments,";")
For $iNumOfAttachments = 1 to $asAttachments[0]
.Attachments.Add($asAttachments[$iNumOfAttachments])
Next
EndIf
.Send
$iRc = @ERROR
EndWith
If $iRc = 0 Then
Return 1
Else
Return SetError(9, 0, 0)
EndIf
EndFunc
;===============================================================================

[/autoit]

Was soll denn dann passieren?

Am Beispiel einer E-Mail könnte das exemplarisch so aussehen (hier mit HTML-Body):

[autoit]

#include <Outlook.au3>
$oOutlook = _OutlookOpen()
_OutlookSendMail($oOutlook, empfä[email='nger@mail.com'][/email], [email='ccEMail@mail.de'][/email] ,"", "Hier steht der Betreff","Anhangxyz.txt",$olFormatHTML,"","")

[/autoit]

Es gab dazu einige sehr gute .au3 Hilfedateien mit Beispielen, die Du mit Sicherheit vorliegen hast. Die einzelnen Optionen sind selbsterklärend.
In Deinem Verzeichnis müssen auch die OutlookWarning...Dateien vorhanden sein.

Das Outlook UDF funktioniert perfekt. Mit dem neuen OutlookEX UDF stehen noch mehr Möglichkeiten zur Verfügung.

qwert23

Da hat bobekos absolut recht....

Hier ein Lösungsbeispiel:
_IconDock_IconAddFile($hIconDock, $aIcon[1], 0, "_EventFunction", $IconDock_LBUTTONUP) ; neuer Aufruf zur Msgbox
und dann noch die Funktion Func _EventFunction($hID, $iIconIndex, $iEventMsg) einfügen.

Kommt das Deinen Vorstellungen nahe?

[autoit]

#include "IconDock.au3"
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>