Hier der Code:
Spoiler anzeigen
Func print()
;diese beiden Zeilen funktionieren, also Ausgabe in eine MsgBox
$data_print = _GUICtrlListView_GetSelectedIndices($hListView)
MsgBox(0, "Datensatz soll gedruckt werden", "Autor: " & _GUICtrlListView_GetItemText($hListView, Abs($data_print)) & @CRLF & "Autor: " & _GUICtrlListView_GetItemText($hListView, Abs($data_print), 1) & @CRLF & "ISBN: " & _GUICtrlListView_GetItemText($hListView, Abs($data_print), 7))
; Textdatei erstellen,funktioniert auch
Local $file = FileOpen("test.txt", 1)
; Prüfen, ob Datei im Schreibmodus geöffnet ist
If $file = -1 Then
MsgBox(0, "Fehler", "Die Datei konnte nicht geöffnet werden.")
Exit
EndIf
FileWrite($file, _GUICtrlListView_GetItemText($hListView, Abs($data_print)) & @CRLF)
FileWrite($file, _GUICtrlListView_GetItemText($hListView, Abs($data_print), 1) & @CRLF)
FileWrite($file, _GUICtrlListView_GetItemText($hListView, Abs($data_print), 7))
FileClose($file)
; Textdatei aus drucken
Local $file = FileOpenDialog("zu druckende Datei ", " ", "Textdokumente (*.txt) ", 1)
If @error Then Exit
Local $print = _FilePrint($file)
If $print Then
MsgBox(0, "Drucken ", "Die Datei wurde gedruckt. ")
Else
MsgBox(0, "Drucken ", "Fehler: " & @error & @CRLF & "Die Datei wurde nicht gedruckt. ")
EndIf
EndFunc ;==>print
[/autoit]1.)
Daten können in eine MSgBox ausgegeben werden: ja einwandfrei.
2.)
Textdatei kann erstellt werden: ja, einwandfrei.
3.)
Textdatei kann ausgedruckt werden: NEIN es komtm folgende Fehlermeldung:
Fehler 10
Die Datei wurde nicht gedruckt
ABER WIESO und wie bekomme ich die Datei ausgedruckt???
Das kann ja eine lange Nacht werden und dann morgen früh übermüdet.