Beiträge von gmmg
-
-
Hallo Joachim,
danke für die Rückmeldung. Euch auch eine schöne Woche.
Gruß Marcel
-
Hallo Sven,
danke für die Rückmeldung.
Dir auch eine schöne Woche und grüße zurück
Marcel
-
Hallo Joachim, Hallo Sven
ich habe die vorherigen Posts nur überflogen. Eine Access.mdb lässt sich ja Problemlos mit Autoit bedienen (lesen/schreiben) und die Werte dann per Webdriver an den Browser übergeben.
Ich nutze hier die Access_UDF.au3. falls da bedarf besteht kann ich die noch teilen, diese ist aber auch im engl forum vorhanden.
Gruß Marcel
-
Hi entsel,
ist deine Ausgangsdatei eine CSV? Du kannst ja auch gleich in eine Excel Datei schreiben, dafür gibt es in Autoit die Funktionen.
Hier mal ein Beispiel aus dem engl Forum: https://www.autoitscript.com/forum/topic/19…with-autoit-v3/
Für LibreOffice gibt es unter anderem die UDF: https://github.com/mlipok/Au3LibreOffice
Gruß Marcel
-
Messagebox mit Beep liegt ja bestimmt am Soundschema bei Windows. Bei uns ist das ausgestellt.
Soundschema "keine Sounds"
Silent MsgBox()?Hi all,How might I go about firing off a MsgBox() that doesn't play a sound or beep the PC speaker?I tried doing this:msgBox(80, "", "Does not ding") msgBox(0,…www.autoitscript.comMessagebox mit Timer
AutoIt
Alles anzeigen#include <Timers.au3> $iSec = 8 ;---------------------------------------------- _Timer_SetTimer("msg", 1000, '_ShowSeconds') MsgBox(0, 'Info', "Meine MsgBox Text!", $iSec) _Timer_KillAllTimers("msg") ;---------------------------------------------- Func _ShowSeconds($hWnd, $Msg, $iIDTimer, $dwTime) #forceref $hWnd, $Msg, $iIDTimer, $dwTime $iSec -= 1 ControlSetText('Info', '', '[CLASS:Button; INSTANCE:1]', 'Ok ' & $iSec & 's') EndFunc
-
Schnuffel, danke, das war der richtige Hinweis
Habe den folgenden Wert in der Datei "C:\Users\%username%\AppData\Local\AutoIt v3\SciTE\SciTEUser.properties" hinzugefügt.
buffers=35
Gruß Marcel
-
Hallo Zusammen,
ich musste mein System neu installieren und bekomme es aktuell nicht hin im Scite die Anzahl der geöffnet Tabs zu erhöhen.
Ich bin der Meinung das ging in der Datei "SciTEGlobal.properties" in der Zeile buffers=20.
Hier habe ich auf dem alten PC auch die Einstellung buffers=55 gefudnen, welche korrekt wäre, nur greift das nicht in de rneuen Installation.
Hat jemand eine Idee?
Gruß gmmg
-
-
Über die Word UDF kannst du das sicherlich auch umsetzen.
Wir haben da früher mal per AutoIT automatisch Verrechnungsschecks erstellt und diese für den postalischen Versand ausgedruckt.
Im Word Dokument wurde mit Tabellen gearbeitet, die dann beschrieben wurden.
Auch kann man ja im Word als PDF speichern.
folgend ein Code Schnipsel, muss aber noch angepasst werden.AutoIt
Alles anzeigen#include <Word.au3> $Logo = "D:\Scripte\Icons\flug.jpg" Local $oWord = _Word_Create() Local $oDoc = _Word_DocOpen($oWord, @ScriptDir & "\Schecktemplate.doc") Local $aData = _Word_DocTableRead($oDoc, 1) ; Tabelle 1 Scheckempfänger und Absender $oDoc.Tables(1).Cell(1, 1).Range.Text = "Test" ;Adresse Absender Scheckaus $oDoc.Tables(1).Cell(2, 1).Range.Text = "Herr" ; Anrede $oDoc.Tables(1).Cell(3, 1).Range.Text = "Max Muster" ; Vorname Name Scheckempfänger $oDoc.Tables(1).Cell(4, 1).Range.Text = "musterweg 1" ; Straße Scheckempfänger $oDoc.Tables(1).Cell(5, 1).Range.Text = "0000000" ; PLZ Scheckempfänger $oDoc.Tables(1).Cell(5, 2).Range.Text = "Musterstadt" ; Ort Scheckempfänger ; Firmenlogo Absender Tabelle 2 $oDoc.Tables(2).Cell(1, 1).Range.InlineShapes.AddPicture($Logo) ; Logo einfügen
Gruß gmmg
-
Schnuffel laut Dokumenteneigenschaften wurde das Template mit OpenOffice erstellt
-
Ich nutze auch nur die bekannte dll Version.
-
Montag könnte ich auf Arbeit schauen, welche ich da einsetze.
hier gibt es die von 2021. ohne Gewähr.
-
prüfe doch auch mal die Version der libmysql.dll
-
Hallo Sven,
hoffe es geht dir gut und danke für deine Antwort
Zum Post Befehl, das mache ich über die folgende FUNC.
Das Problem ist für meine Nutzung gelöst, ich teste die Tage aber auch nochmal deinen Ansatz.
AutoIt
Alles anzeigen_POST_DATA($URL, $JSON) FUNC _POST_DATA($URL, $JSON) ; Post with URL & JSON DATA $oHTTP = ObjCreate("winhttp.winhttprequest.5.1") $oHTTP.Open("POST", $URL, False) $oHTTP.SetRequestHeader("Content-Type", "application/json") $oHTTP.SetRequestHeader("Cache-Control", "no-cache") $oHTTP.Send($JSON) $oReceived = $oHTTP.ResponseText $oStatusCode = $oHTTP.Status If $oStatusCode <> 200 Then MsgBox(4096, "Error", $oStatusCode,2) EndIf ;ConsoleWrite($oReceived) EndFunc
Gruß Marcel
-
Schnuffel ja, da bin ich mir auch nicht 100% sicher. Gestern als ich mit einem Base64 Converter getestet habe, war der Base64 String des Bildes in einer Zeile. Wollte ich diesen per Autoit Post absetzen, kam der Fehler zurück, der auf die Zeichenbegrenzung von 4096 Zeilen hindeutet. Mit dem Tool Postman hingegen ging der Post Befehl mit diesem langen String durch.
Nun habe ich bissl im engl Forum gestöbert und habe den Codeschnipsel zum base64 Convert gefunden. Diesen im ersten Step getestet und die gleiche Fehlermeldung bekommen.
Jetzt nachdem ich dem Script im Base64 Code noch das StringReplace für @LF eingefügt habe läuft dieses.
Code$FN = "D:\testbild.jpg" $dat=FileRead(FileOpen($FN,0)) $objXML=ObjCreate("MSXML2.DOMDocument") $objNode=$objXML.createElement("b64") $objNode.dataType="bin.base64" $objNode.nodeTypedValue=$dat $objNode.Text = StringReplace($objNode.Text, @LF, '') ; entferne Zeilenumbruch
sozusagen ist das Problem für diesen Fall gelöst.
Gruß Marcel
-
das ist dann das JSON welches ich absende
Code
Alles anzeigen$JSON = '{' & _ '"UserLogin":"user",' & _ '"Password":"pass",' & _ '"Ticket":{ ' & _ '"Title":"' & $JsonTitleSubject & '",' & _ '"QueueID":"5",' & _ '"LockID":"1",' & _ '"TypeID":"4",' & _ '"ServiceID":"",' & _ '"SLAID":"",' & _ '"StateID":"4",' & _ '"PriorityID":"3",' & _ '"CustomerUser":"' & $AbsenderMail & '"' & _ '},' & _ '"Article":{' & _ '"ArticleTypeID":"8",' & _ '"SenderTypeID":"1",' & _ '"From":"' & $AbsenderMail & '",' & _ '"Subject":"' & $JsonTitleSubject & '",' & _ '"Body":"' & $JsonBody & '",' & _ '"ContentType":"",' & _ '"MimeType":"text/html",' & _ '"Charset":"UTF8"' & _ '},' & _ '"Attachment":{' & _ '"ContentType":"image/jpg",' & _ '"Filename":"Testbild.jpg",' & _ '"Content":"' & $Attachment & '"' & _ '}' & _ '}'
-
mit diesem Stück Quellcode wandle ich das Bild in Base64
AutoIt
Alles anzeigen;Xroot 2011 ClipPut("") ;$FN=FileOpenDialog("Pick The Image You Want...","C:My DocumentsImages","Images(*.*)",3) ;If @error Then ; MsgBox(4096,"","No File Selected.....",2) ; Exit ;EndIf $FN = "D:\testbild.jpg" $dat=FileRead(FileOpen($FN,16)) $objXML=ObjCreate("MSXML2.DOMDocument") $objNode=$objXML.createElement("b64") $objNode.dataType="bin.base64" $objNode.nodeTypedValue=$dat $objNode.Text = StringReplace($objNode.Text, @LF, '') ;um den Zeilenumbruch zu entfernen ClipPut($objNode.Text)
-
Hallo Zusammen,
ich habe ein beliebiges jpg, z.B aus einem Screenshot Tool)
Dieses möchte ich an einem Webservice per Post Befehl übergeben, dazu muss diese Base64 Convertiert sein.
Leider ist hier der Base64 String von diesem Bild dann länger wie die von Autoit erlaubten 4095 Zeichen. (but keep in mind that no line in an AutoIt script can exceed 4095 characters.))
Mit der Anwendung Postman kann ich diesen String verarbeiten. Wie kann man das Problem für Autoit lösen?
Gruß Marcel
-
Hallo Chris,
ich mache es immer so.
Zuerst das _WD_Shutdown() , dann _WDeleteSession($sSession) .
Gruß Marcel