Crash mit Word.au3

Der Teil des Codes ist eigentlich eine Altlast.
Um bei deinem Beispiel zu bleiben:
Der Benutzer hatte 2 Word-Dokumente offen und drückt meinen Hotkey.
Nun öffnete sich das Word-Dokument, AutoIt bekam aber keine Zuordnung der Instanz hin - es war keine Bearbeitung über Word.au3 möglich.
Im Task Manager ist bei dem Fehler aufgefallen, dass es zwar 3 Word-Dokumente aber bspw 5 Prozesse Winword.exe gab.
Daher dann das beenden der Prozesse.

Soweit ich weiß, war der Teil aber schon lang nicht mehr notwendig.
Aber meine Überlegung: Könnte der Absturz entstanden sein, weil

$hand = _WordCreate(@MyDocumentsDir & "\sdb_zahlung.doc")

kein Word-Dokument erstellen konnte, oder nicht schnell genug?, und meine "Altlast" dann versucht hat, die nicht vorhandenen Winword-Prozesse mit einer leeren Variable $hand als Refenz zu beenden?

Ach ich seh gerade, du bist doch der Autor des aktuellen Word.au3
Dann kannst du mir sicher verraten, was ich als Ersatz für die alte Funktion

_WordDocPropertyGet

nehmen soll?
Hab damit die Anzahl der Seiten des Dokuments gezählt, um in bestimmten Fällen noch die Kopfzeile des Dokuments zu bearbeiten.

Ich grab das hier mal wieder aus, da ich jetzt wieder etwas mehr Zeit dafür hatte.

Nach dem dezenten Hinweis, dass mein AutoIt in ein Museum gehört , hab ich mich doch mal für einen Wechsel auf die aktuelle 3.3.10.2 entschieden.
Es hat mich nun nicht wirklich überrascht, dass das Script nicht sofort funktioniert.

Func _bestp()
Local $sdbvar, $hand, $name, $datearray[1], $var2 = 1, $araten, $oDoc
If WinExists("SDB") Then
$sdbksvar = 1
$WordDoc = _Word_Create()
$hand = _WordCreate(@MyDocumentsDir & "\sdb_zahlung.doc")
$name = "sdb_zahlung"
Else
$WordDoc = _Word_Create()
$hand = _WordCreate(@MyDocumentsDir & "\Zahlung.doc")
$name = "zahlung"
EndIf
WinWait($name)

If Not @error Then
$oDoc = _Word_DocGet($hand, 0)
Sleep(300)
_Word_DocFindReplace($oDoc, "xx Euro zum TT. Monat JJJJ", $araten & " Euro zum " & $datearray[1])
Sleep(100)
;[....] Script gekürzt

Ich hab nun das Problem, dass die Funktion _Word_DocFindReplace nicht mehr funktioniert - keine der gewünschten Ersetzungen vornimmt.
Soweit ich der Dokumentation hier folgen kann, hat sich aber nur die Schreibweise geändert - genauso wie für das frühere _WordDocGetCollection.
Was hab ich übersehen?

Ein mischen hatte ich auch nicht beabsichtigt, nur den falschen Code kopiert.

Func _bestp()
Local $sdbvar, $hand, $name, $datearray[1], $var2 = 1, $araten, $oDoc
If WinExists("SDB") Then
$sdbksvar = 1
$WordDoc = _Word_Create()
$hand = _Word_DocOpen(@MyDocumentsDir & "\sdb_zahlung.doc")
$name = "sdb_zahlung"
Else
$WordDoc = _Word_Create()
$hand = _Word_DocOpen(@MyDocumentsDir & "\Zahlung.doc")
$name = "zahlung"
EndIf
WinWait($name)

If Not @error Then
$oDoc = _Word_DocGet($hand, 0)
Sleep(300)
_Word_DocFindReplace($oDoc, "xx Euro zum TT. Monat JJJJ", $araten & " Euro zum " & $datearray[1])
Sleep(100)
;[....] Script gekürzt

Bleibt bei dem von mir genannten Problem.
Ich hab nun das Problem, dass die Funktion _Word_DocFindReplace nicht mehr funktioniert - keine der gewünschten Ersetzungen vornimmt.
Soweit ich der Dokumentation hier folgen kann, hat sich aber nur die Schreibweise geändert.
Was hab ich übersehen?

Ich merk schon, Sonntag war eindeutig nicht mein Tag. In dem Quelltext steckten ja jede Menge Fehler.
Unter 3.3.10.2 bin ich jetzt wieder bei der folgenden Situation:

- bei den Rechnern, an denen das Script auch schon zuvor funktioniert hat, funktioniert es auch jetzt wieder.

- bei dem Rechner, an dem es anfänglich sogar abgestürzt ist - durch schlechte Programmierung -, funktioniert es wieder nicht korrekt.

@Error wird durch _Word_DocGet auf 3 (Specified document could not be found or error occurred. @extended is set to the COM error code) gesetzt und der abgefangene Fehler, zweimal vorhanden, sieht wie folgt aus:

COM Error intercepted !
	err.number is: 		0x80020009
	err.windescription:	Ausnahmefehler aufgetreten.


	err.description is: 	Unzureichender Arbeitsspeicher. Speichern Sie jetzt Ihr Dokument.
	err.source is: 		Microsoft Word
	err.helpfile is: 	C:\Programme\Microsoft Office\OFFICE11\1031\wdmain11.chm
	err.helpcontext is: 	24577
	err.lastdllerror is: 	0
	err.scriptline is: 	-1
	err.retcode is: 	0x800A13E9

An den funktionierenden Rechnern wird nur der Fehler Unbekannter Name. abgefangen.

Der Quelltext, der zu beiden Ergebnissen führt:

Func _bestrp()
Local $sdbvar, $hand, $name, $datearray[1], $var2 = 1, $araten, $oDoc, $WordDoc, $oError = ObjEvent("AutoIt.Error", "_ErrFunc")
$sdbksvar = 0
$WordDoc = _Word_Create()
$hand = _Word_DocOpen($WordDoc, @MyDocumentsDir & "\zahlung.doc", Default, Default, True)
$name = "zahlung"
WinWait($name)
WinActivate($name)
$oDoc = _Word_DocGet($WordDoc, 1)
If @error <> 0 Then MsgBox(0, "", "@Error wurde auf "& @error & " gesetzt!")
;[....] Script gekürzt

Bin ehrlich gesagt einmal mehr ratlos, was ich nun tun soll.
Alle Rechner haben meines Wissens eine identische, technische Ausstattung und Software.

Hab ich, @Error wird nun nach _Word_DocOpen auf 3 gesetzt.
Dazu folgende, abgefangene Fehler:

(-1) : ==> COM Error intercepted !
	err.number is: 		0x80020006
	err.windescription:	Unbekannter Name.


	err.description is: 	
	err.source is: 		
	err.helpfile is: 	
	err.helpcontext is: 	
	err.lastdllerror is: 	0
	err.scriptline is: 	-1
	err.retcode is: 	0x00000000


(-1) : ==> COM Error intercepted !
	err.number is: 		0x80020009
	err.windescription:	Ausnahmefehler aufgetreten.


	err.description is: 	Unzureichender Arbeitsspeicher. Speichern Sie jetzt Ihr Dokument.
	err.source is: 		Microsoft Word
	err.helpfile is: 	C:\Programme\Microsoft Office\OFFICE11\1031\wdmain11.chm
	err.helpcontext is: 	24577
	err.lastdllerror is: 	0
	err.scriptline is: 	-1
	err.retcode is: 	0x800A13E9

Hm.. bei beiden Rechnern Windows XP mit Office Standard Edition 2003 und SP3. Beide Rechner haben den gleichen, nicht gerade üppigen Arbeitsspeicher von 2 GB.

Das mit dem hin und her über das RTF-Format hab ich noch nicht ausprobiert, dürfte meiner Meinung nach aber nichts bringen, weil:
Bei jedem Anmelden am PC und damit dem ersten Start des Tools wird das entsprechende Word-Dokument von einer Netzwerkquelle kopiert.
Es haben also alle PCs das gleiche Dokument und nur an einem tritt dieser Fehler auf.
Dass Dokument selber ist Schreibgeschützt, beim kopieren werden daher vor dem Kopieren am Ziel die Flags -RA gesetzt und nach dem Kopieren von der Quelle wieder +RA gesetzt.

Und was das OS angeht, ist alles am laufen aber manche Mühlen mahlen langsam.

Zitat von water

Dann sind mir leider die Ideen ausgegangen

Ich hatte es ja schon befürchtet, ein unlösbares Mysterium der XP-Welt.
Dennoch danke für deine Zeit und Mühe.