Beiträge von qwert23

qwert23

Danke, water.

qwert23

Nun habe ich mal einige weitere Varianten ausprobiert.
Sobald im _OL_ItemCreate Angaben zum Body erfolgen, verschwindet die Signatur (Beispiel 2, 3, 4).
Das Beispiel 5 ergänzt den _OL_ItemCreate-Aufruf um die Bodyinformationen. Dann wird die E-Mail exakt nach den Outlookeinstellungen (Signatur bei neuer Nachricht) erstellt. (siehe auch: http://www.autoitscript.com/forum/topic/12…t/page__st__480 )

Somit ist eine Lösung erreicht. Allerdings kann ich nicht nachvollziehen, warum das nicht im Beispiel 2,3,4 funktioniert.

Spoiler anzeigen

[autoit]

#include <OutlookEX.au3>

[/autoit] [autoit][/autoit] [autoit]

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

[/autoit] [autoit][/autoit] [autoit]

Global $sCurrentUser = $oOutlook.GetNameSpace("MAPI").CurrentUser.Name

[/autoit] [autoit][/autoit] [autoit]

; ----1.----------- Erzeuge E-Mail ohne Bodytext = Ergebnis: Signatur ist vorhanden
_OL_ItemCreate($oOutlook, $olMailItem, "","", "Subject=TestSubject Mail - 1. "&@Hour&":"&@min&":"&@SEC, "To=" & $sCurrentUser)
If @error Then
MsgBox(16,"Fehler",@error&@crlf&@extended )
EndIf

[/autoit] [autoit][/autoit] [autoit]

; -----2.---------- Erzeuge E-Mail mit Angabe des BodyFormat = Ergebnis: keine Signatur mehr vorhanden
_OL_ItemCreate($oOutlook, $olMailItem, "","", "Subject=TestSubject Mail - 2."&@Hour&":"&@min&":"&@SEC, "BodyFormat=" & $olFormatHTML, "To=" & $sCurrentUser)
If @error Then
MsgBox(16,"Fehler",@error&@crlf&@extended )
EndIf

[/autoit] [autoit][/autoit] [autoit]

; ---3.------------ Erzeuge E-Mail mit Angabe des HTMLBody = Ergebnis: keine Signatur mehr vorhanden
_OL_ItemCreate($oOutlook, $olMailItem, "","", "Subject=TestSubject Mail - 3. "&@Hour&":"&@min&":"&@SEC, "HTMLBody=Testsendung ", "To=" & $sCurrentUser)
If @error Then
MsgBox(16,"Fehler",@error&@crlf&@extended )
EndIf

[/autoit] [autoit][/autoit] [autoit]

; ---4.------------ Erzeuge E-Mail mit Angabe des HTMLBody + Format = Ergebnis: keine Signatur mehr vorhanden
_OL_ItemCreate($oOutlook, $olMailItem, "","", "Subject=TestSubject Mail - 4."&@Hour&":"&@min&":"&@SEC, "HTMLBody=Testsendung ", "BodyFormat=" & $olFormatHTML,"To=" & $sCurrentUser)
If @error Then
MsgBox(16,"Fehler",@error&@crlf&@extended )
EndIf

[/autoit] [autoit][/autoit] [autoit]

; --5.------------- Erzeuge E-Mail ergänzt durch COM Aufruf = Ergebnis: Signatur ist vorhanden
$oItem = _OL_ItemCreate($oOutlook, $olMailItem, "","", "Subject=TestSubject Mail - 5. "&@Hour&":"&@min&":"&@SEC, "To=" & $sCurrentUser)
If @error Then
MsgBox(16,"Fehler",@error&@crlf&@extended )
EndIf
$oItem.BodyFormat = $olFormatHTML
$oItem.GetInspector
$sBody = $oItem.HTMLBody
$oItem.HTMLBody = "MailText als Test Text in der E-Mail und Signatur" & $sBody

[/autoit] [autoit][/autoit] [autoit]

_OL_Close($oOutlook)

[/autoit]

qwert23

Hallo Water,
die Mischung waren Versuche, um der Lösung näher zu kommen.
Ziel ist es, dass die erzeugten E-Mails mit der Signatur aus Outlook (also so wie in Outlook voreigestellt) erzeugt werden.
Im engeren Sinne wird die Anweisung _OL_MailSignatureSet gar nicht benötigt, wenn die Outlook 2010 Einstellungen verwendet werden. Dort habe ich eine Signatur für neue Nachrichten hinterlegt, die aus Firmenlogo und Text besteht.

Im folgenden ein einfaches Script mit dem OutlookEx-UDF.

Spoiler anzeigen

[autoit]

#include <OutlookEX.au3>

[/autoit] [autoit][/autoit] [autoit]

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

[/autoit] [autoit][/autoit] [autoit]

Global $sCurrentUser = $oOutlook.GetNameSpace("MAPI").CurrentUser.Name

[/autoit] [autoit][/autoit] [autoit]

_OL_MailSignatureSet(Default, Default)

[/autoit] [autoit][/autoit] [autoit]

_OL_ItemCreate($oOutlook, $olMailItem, "","", "Subject=TestSubject Mail", "BodyFormat=" & $olFormatHTML, "HTMLBody=Testsendung", "To=" & $sCurrentUser)
If @error Then
MsgBox(16,"Fehler",@error&@crlf&@extended )
EndIf

[/autoit] [autoit][/autoit] [autoit]

MsgBox(64, "OutlookEX UDF: Mail with Signature", "Mail successfully sent to user '" & $sCurrentUser & "'!")

[/autoit] [autoit][/autoit] [autoit]

_OL_Close($oOutlook)

[/autoit] [autoit][/autoit] [autoit][/autoit]

Es wird keine Signatur angezeigt.
Aus dem Versuch mit direkter COM Anweisung erscheint die Signatur. Ich würde jedoch gern im UDF bleiben und deshalb meine Bitte um Unterstützung.

qwert23

Ein weiterer Test in Kombination mit dem OutlookEx UDF und der direkten E-Mailerzeugung.

Spoiler anzeigen

[autoit]

#include <OutlookEX.au3>

[/autoit] [autoit][/autoit] [autoit]

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

[/autoit] [autoit][/autoit] [autoit]

Global $sCurrentUser = $oOutlook.GetNameSpace("MAPI").CurrentUser.Name

[/autoit] [autoit][/autoit] [autoit]

$oOApp = ObjCreate("Outlook.Application")
$oItem = $oOApp.CreateItem($olMailItem)
$oItem.BodyFormat = $olFormatHTML
$oItem.GetInspector
$sSignature = $oItem.HTMLBody

[/autoit] [autoit][/autoit] [autoit]

_OL_ItemCreate($oOutlook, $olMailItem, "","", "Subject=Hallo Sub", "BodyFormat=" & $olFormatHTML, "HTMLBody=Testsendung " & $sSignature, "To=" & $sCurrentUser)
If @error Then
MsgBox(16,"Fehler",@error&@crlf&@extended )
EndIf

[/autoit] [autoit][/autoit] [autoit]

MsgBox(64, "OutlookEX UDF: Mail with Signature", "Mail successfully sent to user '" & $sCurrentUser & "'!")

[/autoit] [autoit][/autoit] [autoit]

_OL_Close($oOutlook)

[/autoit]

Nun wird die Signatur anzeigt, jedoch ohne Logo (siehe Anhang)

Kann es sein, dass die Funktion _OL_ItemCreate den Body leert und dann den HTML-Text anzeigt?

qwert23

Ich habe nun dieses Beispiel verwendet und an mich selbst gesendet.

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>
#include <Date.au3>
#include <WindowsConstants.au3>

[/autoit] [autoit][/autoit] [autoit]

Local $olMailItem = 0
Local $olFormatHTML = 2
Local $olFormatRichText = 3
Local $olImportanceLow = 0
Local $olImportanceNormal= 1
Local $olImportanceHigh = 2
;=====
; HTML
;=====
$oOApp = ObjCreate("Outlook.Application")
$oItem = $oOApp.CreateItem($olMailItem)

[/autoit] [autoit][/autoit] [autoit]

$oItem.BodyFormat = $olFormatHTML
$oItem.GetInspector
$sSignature = $oItem.HTMLBody
$oItem.Importance = $olImportanceHigh
$oItem.HTMLBody = "" & _
"The files in Directory" & _
"" & _DateTimeFormat(_DateAdd('d',+1, _NowCalcDate()),1) & " " & _Time() & @CRLF & $sSignature
$oItem.Subject = "Subject"
$oItem.Display

[/autoit] [autoit][/autoit] [autoit]

Func _Time()
Local $hour = @HOUR, $AMPM = "AM"
If $hour > 11 Then $AMPM = "PM"
If $hour = 0 Then $hour = 12
If $hour > 12 Then $hour -= 12
Return $hour & ":" & @MIN & " " & $AMPM
EndFunc ;==>_Time

[/autoit]

Die Signatur ist korrekt in der E-Mail vorhanden.

qwert23

Hallo Water,

die Signatur ist in Outlook vorhanden (HTML mit Text und Logo). Ziel ist es nun, dass jede E-Mail mit der Signatur erstellt wird.
Aus Deinen Beispielen kann ich nicht erkennen, wie die Signatur unter der ausgehenden E-Mail eingefügt wird.

Du hattest mal dieses Beispiel (hier nur ein Auszug) veröffentlicht und erstaunlicherweise funktioniert hier die Signatur unter der E-Mail. Also so, wie es in Outlook eingestellt ist. Doch wie ist das mit den Aufrufen aus dem OutlookEX-UDF.

[autoit]

$oItem = $oOutlook.CreateItem(0)
$oItem.BodyFormat = $olFormatHTML
$oItem.GetInspector
$sBody = $oItem.HTMLBody
$oItem.HTMLBody = "Mail Text" & $sBody
$oItem.Subject = "Subject"
$oItem.Display

[/autoit]

Damit erscheint die Signatur unter der E-Mail, da dieses so in Outlook eingestellt ist.

Nun erzeugt man eine E-Mail mit _OL_ItemCreate($oOutlook, $olMailItem.... und schon ist keine Signatur mehr vorhanden. Deshalb die Frage, wie das korrekt gehandhabt wird.
Ist das so verständlich formuliert?

qwert23

Hallo,
ich arbeite mit dem OutlookEX UDF.
Ziel ist es, dass eine erzeugte E-Mail mit der Standardsignatur aus Outlook 2010 versehen wird.
Derzeit löse ich die Situation durch eine oft-Vorlage.

Leider bekomme ich die Signatur nicht über die Funktion _ol_MailSignatureSet(Default,Default) hin.
Die Signatur besteht aus einem Bild und meinen Kontaktdaten. Verwenden möchte ich stets die Signatureinstellungen in Outlook für neue E-Mails.

Im folgenden der Versuch den (mit _ol_MailSignatureGet Funktion auslesbaren) Signaturnamen direkt mit FileRead einzulesen und dem E-Mail-Body anzuhängen.
Dann erscheint zwar der Text, jedoch das eigebettete Bild (Firmenlogo) wird nicht angezeigt. Es wird mit einem roten Kreuz quittiert.
Der E-Mailtext ist stets im HTML-Format und kann beliebig lang sein.

Im engl. Forum habe ich dieses gefunden: http://www.autoitscript.com/forum/topic/12…t/page__st__480

Ich möchte jedoch im UDF bleiben. Deshalb die Frage: Wie wird die Funktion _ol_MailSignatureSet richtig angewendet?

Spoiler anzeigen

[autoit]

#include <OutlookEX.au3>

[/autoit] [autoit][/autoit] [autoit]

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

[/autoit] [autoit][/autoit] [autoit]

Global $sCurrentUser = $oOutlook.GetNameSpace("MAPI").CurrentUser.Name

[/autoit] [autoit][/autoit] [autoit]

$sSignature = _ol_MailSignatureSet(Default,Default)
;msgbox(0,"signature",@error&@crlf&@extended)

[/autoit] [autoit][/autoit] [autoit]

global $bn= FileOpen(@AppDataDir&"\Microsoft\Signatures\qwert - Logo.htm",0)
$line=FileRead($bn)
FileClose($bn)

[/autoit] [autoit][/autoit] [autoit]

_OL_ItemCreate($oOutlook, $olMailItem, "","", "Subject=Hallo Sub", "BodyFormat=" & $olFormatHTML, "HTMLBody=Test" & @crlf & $line, "To=" & $sCurrentUser)
If @error Then
MsgBox(16,"Fehler",@error&@crlf&@extended )
EndIf

[/autoit] [autoit][/autoit] [autoit]

MsgBox(64, "OutlookEX UDF: Mail with Signature", "Mail successfully sent to user '" & $sCurrentUser & "'!")

[/autoit] [autoit][/autoit] [autoit]

_OL_Close($oOutlook)

[/autoit] [autoit][/autoit] [autoit][/autoit]

Danke schon mal...

qwert23

Wenn Du "nur" Zeichen ersetzen möchtest und das in der gesamten Datei, dann könnte _ReplaceStringInFile (siehe HilfeDatei zu den UDF) interessant sein.
Hier brauchst Du die Datei nicht selbst öffnen, sondern übergibst einfach die Datei, Suchstring, ersetzstring.
Ist ganz einfach.

Hier ein Auszug aus der HilfeDatei:

Spoiler anzeigen

_ReplaceStringInFile
Ersetzt in einer Textdatei einen String mit einem anderen String (binary funktioniert nicht!)
#include <File.au3>
_ReplaceStringInFile($szFileName, $szSearchString, $szReplaceString [, $fCaseness = 0 [, $fOccurance = 1]])
Parameter
$szFileName Name der zu öffnenden Datei. ACHTUNG !! Es wird der komplette Pfad benötigt, nicht nur der zurückgegebene Dateiname (wie z. B. bei FileFindNextFile)
$szSearchString Der zu ersetzende String in der Datei
$szReplaceString Der String, welchen man für $szSearchString einsetzen will
$fCaseness [optional] 0 = Berücksichtigt die Groß- und Kleinschreibung nicht (Standard), 1 = Groß- und Kleinschreibung wird berücksichtigt, falls dies auftritt
$fOccurance [optional] 0 = Nur die erste gefundene Stelle wird ersetzt, 1 = Alle Vorkommnisse werden ersetzt (Standard)
Rückgabewert
Erfolg: Gibt die Anzahl von Vorkommnissen von $szSearchString zurück
Fehler: Gibt -1 zurück und setzt @error
@error: 1 - Datei konnte nicht geöffnet werden
2 - Temporäre Datei konnte nicht geöffnet werden
3 - Temporäre Datei konnte nicht geschrieben werden
4 - Originale Datei konnte nicht gelöscht werden
5 - Temporäre Datei konnte nicht umbenannt/verschoben werden
6 - Datei ist schreibgeschützt
Bemerkungen
Keine.
Verwandte Funktionen
Beispiel

[autoit][/autoit] [autoit][/autoit] [autoit]

#include <File.au3>

[/autoit] [autoit][/autoit] [autoit]

Local $find = "VORHER"
Local $replace = "NACHHER"

[/autoit] [autoit][/autoit] [autoit]

Local $filename = "C:\_ReplaceStringInFile.test"

[/autoit] [autoit][/autoit] [autoit]

Local $msg = "Hallo Test " & $find & " Hallo Test" & @CRLF
$msg &= "Hallo Test" & @CRLF
$msg &= @CRLF
$msg &= $find

[/autoit] [autoit][/autoit] [autoit]

FileWrite($filename, $msg)

[/autoit] [autoit][/autoit] [autoit]

MsgBox(0, "VORHER", $msg)

[/autoit] [autoit][/autoit] [autoit]

Local $retval = _ReplaceStringInFile($filename, $find, $replace)
If $retval = -1 Then
MsgBox(0, "FEHLER", "Das Suchmuster konnte nicht Ersetzt werden!" & @CRLF & " & Datei: " & $filename & " Fehlercode: " & @error)
Exit
Else
MsgBox(0, "INFO", $retval & " Übereinstimmungen mit dem Suchmuster: " & $find & " in der Datei: " & $filename & " gefunden.")
EndIf

[/autoit] [autoit][/autoit] [autoit]

$msg = FileRead($filename, 1000)
MsgBox(0, "NACHHER", $msg)
FileDelete($filename)

[/autoit]

Alternativ siehe hier: http://www.autoitscript.com/autoit3/docs/l…tringInFile.htm

qwert23

Zum QR-Code Creator

QR-Code Creator

qwert23

Bei mir funktioniert das Script einwandfrei.
Das nutzt Dir sicherlich wenig

Hier mal eine If-Abfrage und @error, damit wir Deinem Problem vielleicht etwas näher kommen.

Sind in Deinem Verzeichnis tatsächlich nur xls und xlsx-Dateien?

Spoiler anzeigen

[autoit]

#include <Excel.au3>
#include <File.au3>
#include <Array.au3>
Local $folder = @ScriptDir ;test pfad passe ich dann noch an
Local $FileList = _FileListToArray($folder, '*.xls', 1)
For $i = 1 To UBound($FileList) - 1
$oExcel = _ExcelBookOpen($folder & '\' & $FileList[$i], 0)

[/autoit] [autoit][/autoit] [autoit]

If StringRight($FileList[$i],3) = "xls" Then
_ExcelBookSaveAs($oExcel, @ScriptDir & '\' & StringTrimRight($FileList[$i], 4), "txt") ;, 0, 1, "ReadOnly") ; für xls
If @error then msgbox(0,"xls",@error)
Else
_ExcelBookSaveAs($oExcel, @ScriptDir & '\' & StringTrimRight($FileList[$i], 5), "txt") ;, 0, 1, "ReadOnly") ; für xlsx
If @error then msgbox(0,"xlsx",@error)
EndIf

[/autoit] [autoit][/autoit] [autoit]

_ExcelBookClose($oExcel, 1, 0)
Next

[/autoit]

Falls das Problem mit der Dateiendung besteht, dann teile bitte den Dateinamen vorher mit _PathSplit auf.

qwert23

Was passiert denn genau?
Hast Du .xlsx oder .xls Dokumente?

Du hattest gestern bereits korrekt geschrieben: Bei xls funktioniert es, bei xlsx nicht.
Das ist schlicht der Unterschied bis zum ".", somit 4 oder 5 Stellen berücksichtigen.

qwert23

Wie bereits geschrieben ist die Lösung, dass Du anstatt 4 Zeichen nun 5 Zeichen mit StringTrimRight entfernen musst.

...StringTrimRight($FileList[$i],5)...

Also so:

Spoiler anzeigen

[autoit]

#include <Excel.au3>
#include <File.au3>
#include <Array.au3>

[/autoit] [autoit][/autoit] [autoit]

Local $folder = @ScriptDir ;test pfad passe ich dann noch an
Local $FileList = _FileListToArray($folder, '*.xlsx', 1)
For $i = 1 To UBound($FileList) - 1
$oExcel = _ExcelBookOpen($folder & '\' & $FileList[$i], 0)
_ExcelBookSaveAs($oExcel, @ScriptDir & '\' & StringTrimRight($FileList[$i],5), "txt", 0, 1, "ReadOnly") ; gleiches mit dem Pfad
_ExcelBookClose($oExcel, 1, 0)
Next

[/autoit]

Zumindestens mit meinen .xlsx Dateien funktioniert es....

qwert23

Hallo autoBert,
das ist ja toll, dass Du das noch testest und einen alternative Lösung präsentierst. Vielen vielen Dank.

Die erzeugte Grafik (BMP-File) wird mit _ClipBoard_SetDataEx an die Zwischenablage übergeben. Dann ist diese, so wie von Dir ursprünglich beschrieben, in das Dokument einfügbar. Dein Lösungsweg ist absolut korrekt gewesen.
(Funktionsbeispiel habe ich aus dem QR-Creator 1.0 von BugFix entnommen)

Herzlichen Dank und Gruß
qwert23

qwert23

Danke, autoBert - das setze ich so um...

qwert23

Hallo,
ich nutze das Word-UDF (nicht WordEx) und versuche ein Bild, an einer bestimmten Stelle, in ein Word-Dokument einzufügen.
Meine Vorstellung dazu ist, dass im Word-Dokument ein Platzhalter (hier im Beispiel dx_bild) eingefügt wird und das Bild dann am Platz dx_bild eingefügt wird.
Dieses sollte analog der Funktion _WordDocFindReplace erfolgen, damit im gesamten Word-Dokument das Bild am Platzhalter erscheint.

Hier ein leidlicher Versuch dieses mit _WordDocFindReplace umzusetzen. Es funktioniert nur leider nicht. Das Bild wird stets am Anfang des Dokuments eingefügt.

Spoiler anzeigen

[autoit]

#include <Word.au3>

[/autoit] [autoit][/autoit] [autoit]

Local $file = @ScriptDir & "\Testbild.png" ; irgendein Bild

[/autoit] [autoit][/autoit] [autoit]

Local $oWordApp = _WordCreate(@scriptdir & "\Test.docx") ; beinhaltet einen Platzhalter dx_bild als Text und wird durch _WordDocFindReplace... ersetzt
Local $oDoc = _WordDocGetCollection($oWordApp, 0)

[/autoit] [autoit][/autoit] [autoit]

Local $oShape = _WordDocAddPicture($oDoc, $file, 0, 1)
If Not @error Then $oShape.Range.InsertAfter(_WordDocFindReplace($oDoc, "dx_bild", _WordDocAddPicture($oDoc, $file, 0, 1)))

[/autoit]

Ein Testbild füge ich der Vollständigkeithalber bei. Die Test.docx sieht exemplarisch so aus - beachte den Eintrag dx_bild:

Spoiler anzeigen

Die Formatierung von markiertem Text im Dokumenttext kann auf einfache Weise geändert werden, indem Sie im Schnellformatvorlagen dx_bild Katalog auf der Registerkarte 'Start' ein Layout für den markierten Text auswählen. Text können Sie auch direkt mithilfe der anderen Steuerelemente auf der Registerkarte 'Start' formatieren. Die meisten Steuerelemente ermöglichen die Auswahl zwischen dem Layout des aktuellen Designs oder der direkten Angabe eines Formats.

Wie ist es korrekt, dass ein Bild an einem bestimmten Text (dx_bild) eingefügt wird?

Herzlichen Dank für Eure Unterstützung.

qwert23

Du musst im SaveAs auch den Punkt ersetzen.
Also Zeile 9 lautet dann:

[autoit]

_ExcelBookSaveAs($oExcel, @ScriptDir & '\' & StringTrimRight($FileList[$i],5), "txt", 0, 1, "ReadOnly") ; gleiches mit dem Pfad

[/autoit]

Schon sollte es funktionieren....

qwert23

Hier findest Du sicherlich Deine Lösung:
http://www.autoitscript.com/wiki/OutlookEX_UDF_-_Mail_Item

in dem Absatz: Send a mail on behalf of another user

qwert23

Versende aus diesem Account heraus die E-Mail.

qwert23

Hier noch ein weiteres Beispiel aus dem OutlookEX UDF.

Zuerst werden die Kontakte mit dem Nachnamen "Meier" gesucht und angezeigt. Im nächsten Fenster selbige Funktion mit allen properties zum Kontakt.
Der Aufruf erfolgt in "Kontakte" des OutlookUsers. Bitte ggf. anpassen.

Spoiler anzeigen

[autoit]

#include <OutlookEX.au3>

[/autoit] [autoit][/autoit] [autoit]

Global $oOutlook = _OL_Open()
$aItems = _OL_ItemFind($oOutlook, "*\Kontakte", $olContact, '[LastName] = "Meier"', "", "", "", "", 1)
If @error = 0 Then
_ArrayDisplay($aItems, "OutlookEX UDF: - Find contacts by lastname")
Else
MsgBox(48, "OutlookEX UDF - Kontakte", "Error finding a contact. @error = " & @error & ", @extended: " & @extended)
EndIf
; --------------------------------------------
Global $aOL_Item = _OL_ItemFind($oOutlook, "*\Kontakte", Default, '[LastName] = "Meier"', "", "", "EntryID", "", 0, "")
If $aOL_Item[0][0] = 0 Then Exit MsgBox(16, "OutlookEX UDF: _OL_ItemGet Example Script", "Could not find a contact in folder 'Contacts'. @error = " & @error)

[/autoit] [autoit][/autoit] [autoit]

Global $aOL_Properties = _OL_ItemGet($oOutlook, $aOL_Item[1][0])
If @error <> 0 Then Exit MsgBox(16, "OutlookEX UDF: _OL_ItemGet Example Script", "Error accessing properties. @error = " & @error)

[/autoit] [autoit][/autoit] [autoit]

_ArrayDisplay($aOL_Properties, "OutlookEX UDF: All properties of a contact item (name, value, datatype)", _
-1, 0, "", "|", "Row|Name|Value|Type")

[/autoit]

qwert23

Verwendest Du Outlook.au3 oder OutlookEX.au3 als UDF?

Im Outlook.au3 UDF gibt es die Funktion _OutlookGetContacts....
Im OutlookEX- UDF erfolgt der Zugriff über _OL_ItemFind (siehe auch: http://www.autoitscript.com/wiki/OutlookEX_UDF_-_Find_Items)

Hast Du ein Beispiel Deines Script, was nicht funktionieren mag?

Habe gerade gesehen, dass zum OutlookEX ein Beispiel für den Zugriff vorhanden ist.

Beiträge von qwert23

OutlookEX UDF - Signaturen

OutlookEX UDF - Signaturen

OutlookEX UDF - Signaturen

OutlookEX UDF - Signaturen

OutlookEX UDF - Signaturen

OutlookEX UDF - Signaturen

OutlookEX UDF - Signaturen

Zeichenkette aus Array lesen

Word UDF - Bild in .docx Dokument platzieren

Exel Daten (.xls / .xlsx) in .txt Daten umwandeln

Exel Daten (.xls / .xlsx) in .txt Daten umwandeln

Exel Daten (.xls / .xlsx) in .txt Daten umwandeln

Word UDF - Bild in .docx Dokument platzieren

Word UDF - Bild in .docx Dokument platzieren

Word UDF - Bild in .docx Dokument platzieren

Exel Daten (.xls / .xlsx) in .txt Daten umwandeln

Auf Outlookadressbuch Zugreifen

Auf Outlookadressbuch Zugreifen

Auf Outlookadressbuch Zugreifen

Auf Outlookadressbuch Zugreifen