1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. lloid

Beiträge von lloid

  • Windows-Fax und -Scan aufrufen

    • lloid
    • 27. Februar 2018 um 12:59

    Kopieren funktioniert, allerdings auch nur mit dem Windows Kopierprozess. TeraCopy findet die Datei beispielsweise wieder nicht.

    Aus dem Scriptverzeichnis heraus lässt sich mit der kopierten Datei das Scan-Fenster nun auch nicht öffnen, bei Doppelklick auf die Datei passiert gar nichts.

    Auch ist es möglich, eine Verknüpfung zu der exe ins Scriptverzeichnis zu legen. Bei Doppelklick öffnet sich auch das Scanfenster.
    Allerdings lässt sich die lnk nicht via AutoIt öffnen.

  • Windows-Fax und -Scan aufrufen

    • lloid
    • 27. Februar 2018 um 12:36

    Auch nicht.

    Angezeigt wird mir die Datei im System32-Ordner über den Windows Explorer sowie CMD
    Allerdings taucht der Eintrag nicht auf, wenn ich den Abruf über AutoIt mache:

    C
    #include <File.au3>
    #include <Array.au3>
    $sourceFolder1 = "C:\Windows\System32"
    $sourceFolder2 = "C:\Windows\SysWOW64"
    Local $FileList = _FileListToArray($sourceFolder1, "W*.exe")
    _ArrayDisplay($FileList)
    $FileList = _FileListToArray($sourceFolder2, "W*.exe")
    _ArrayDisplay($FileList)

    Ist mir ein Rätsel, wo die Datei wirklich liegt..

    [Blockierte Grafik: https://ibin.co/3t919v7dz97u]

  • Windows-Fax und -Scan aufrufen

    • lloid
    • 27. Februar 2018 um 12:19

    Ist bereits aktiviert.
    Auch arbeite ich schon länger damit, ich möchte daher einige Abläufe automatisieren..

    [Blockierte Grafik: https://ibin.co/3t8ubPdISrhL]


    Es muss etwas mit 32/64 Bit und der Pfadangabe sein.
    Auf einer 32 Bit VM hat es gerade funktioniert, aber auf meinem 64 Bit System findet er die Datei nicht..

  • Windows-Fax und -Scan aufrufen

    • lloid
    • 27. Februar 2018 um 11:55

    Danke, alpines.

    Leider funktioniert es auch nicht mit #RequireAdmin
    Das hatte ich schon versucht. Auch verschiedene Arten der Pfadzusammensetzung gingen nicht.

    Funktioniert der Aufruf mit #RequireAdmin auf Deinem System?

    EDIT:

    Code
    #RequireAdmin
    $WFSFullPath = 'C:\Windows\System32\WFS.exe'
    If Not FileExists ($WFSFullPath) Then
    MsgBox (16, 'Error', 'Unable to find File: ' & $WFSFullPath)
    Else
    MsgBox (0, 'Success', 'Juhuu! found File: ' & $WFSFullPath)
    EndIf

    EDIT2:

    Auf 32 Bit-Systemen wird die Datei scheinbar gefunden! Hab es gerade auf ner VM probiert, da geht es.

  • Windows-Fax und -Scan aufrufen

    • lloid
    • 27. Februar 2018 um 11:48

    Hallo zusammen :)

    Ich versuche, folgendes Programm zu starten: WFS.exe
    Dieses befindet sich im System32-Verzeichnis, lässt sich sowohl über den Windows-Explorer, als auch über cmd problemlos aufrufen.

    Leider scheint AutoIT die Datei nicht wahrzunehmen..


    Code
    $WFSFullPath = 'C:\Windows\System32\WFS.exe'
    If Not FileExists ($WFSFullPath) Then MsgBox (16, 'Error', 'Unable to find File: ' & $WFSFullPath)



    Was mache ich falsch?
    :/

  • Kontakteintrag an CardDAV Schnittstelle senden (ownCloud)

    • lloid
    • 17. Januar 2018 um 22:21

    Danke alpines für Deinen Tip!

    Hier also mein Minimal-Codebeispiel:

    Code
    #include <StringConstants.au3>
    
    $AppProject = 'ownCloud'
    $AppName = 'CardDAV'
    
    OnAutoItExitRegister("_Terminate")
    TCPStartup ()
    If @error Then Exit MsgBox(0, $AppProject&'.'&$AppName, "TCPStartup Error: "&@error)
    
    $strUser = 'MyUserName'
    $strPass = 'MyPasswdString'
    $strServer = '192.168.xxx.xxx'
    $strPort = '80'
    
    $ETag = _SendCardDAV_VCARD ( $strUser, $strServer, $strPort, _
        'Daboo', _                        ; LastName
        'Cyrus', _                        ; Firstname
        '2822 Email HQ', _                ; Adr
        'Suite 2821', _                    ; Appartm
        'RFCVille', _                    ; City
        'PA', _                            ; Region
        '15213', _                        ; PostalCode
        'USA', _                        ; County
        'cyrus@example.com', _            ; Email
        'me', _                            ; Nick
        'Example VCard', _                ; Note
        'Self Employed', _                ; Org
        '412 605 0499', _                ; WorkTel
        '412 605 0705', _                ; Fax
        'http://www.example.com', _        ; URL
        '1234-5678-9000-1')                ; UID
    
    MsgBox (0, $AppProject&'.'&$AppName, '$ETag = ' & $ETag & @CRLF & '@error = ' & @error & @CRLF & '@extended = ' & @extended)
    
    
    
    Func _SendCardDAV_VCARD ($User, $Server, $Port, $LastName, $Firstname='', $Adr='', $Appartm='', $City='', $Region='', $PostalCode='', $County='', $Email='', $Nick='', $Note='', $Org='', $WorkTel='', $Fax='', $URL='', $UID='')
    
        Local $tPacket = '', $Content = '', $tMaxTimeOut = 10000, $intErr
        $tPacket = 'PUT ' & 'http://' & $Server & '/remote.php/dav/addressbooks/users/' & $User & '/contacts/' & ' HTTP/1.1' & @CRLF
        $tPacket &= 'If-None-Match: *' & @CRLF
        $tPacket &= 'Host: '& $Server & @CRLF
        $tPacket &= 'Content-Type: text/vcard' & @CRLF
        $tPacket &= 'Content-Length: '
        $Content &= 'BEGIN:VCARD' & @CRLF
        $Content &= 'VERSION:3.0' & @CRLF
        If $Firstname <> '' Then
            $Content &= 'FN:' & $Firstname &' '& $LastName & @CRLF
        Else
            $Content &= 'FN:' & $LastName & @CRLF
        EndIf
        If $Firstname <> '' Then
            $Content &= 'N:' & $LastName &';'& $Firstname & @CRLF
        Else
            $Content &= 'N:' & $LastName & @CRLF
        EndIf
        If ($Adr <> '') Or ($Appartm <> '') Or ($City <> '') Or ($Region <> '') Or ($PostalCode <> '') Or ($County <> '') _
        Then $Content &= 'ADR;TYPE=POSTAL:;'&$Adr&';'&$Appartm&';'&$City&';'&$Region&';'&$PostalCode&';'&$County & @CRLF
        If $Email <> '' Then $Content &= 'EMAIL;TYPE=INTERNET,PREF:' & $Email & @CRLF
        If $Nick <> '' Then $Content &= 'NICKNAME:' & $Nick & @CRLF
        If $Note <> '' Then $Content &= 'NOTE:' & $Note & @CRLF
        If $Org <> '' Then $Content &= 'ORG:' & $Org & @CRLF
        If $WorkTel <> '' Then $Content &= 'TEL;TYPE=WORK,VOICE:' & $WorkTel & @CRLF
        If $Fax <> '' Then $Content &= 'TEL;TYPE=FAX:' & $Fax & @CRLF
        If $URL <> '' Then $Content &= 'URL:' & $URL & @CRLF
        If $UID <> '' Then $Content &= 'UID:' & $UID & @CRLF
        $Content &= 'END:VCARD'
        $tPacket &= StringLen ($Content) & @CRLF & @CRLF & $Content
        ConsoleWrite ($tPacket & @CRLF& @CRLF)
        $tSocket = TCPConnect ($Server, $Port)
        If (@error <> 0) Then Return SetError (1, @error, 0)
        ConsoleWrite ('Connected to Server ' & $Server &':'& $Port & @CRLF)
        $SentBytes = TCPSend ($tSocket,StringToBinary($tPacket))
        If (@error <> 0) Then Return SetError (2, @error, 0)
        ConsoleWrite ('Packet was sent: ' & $SentBytes &' Bytes' & @CRLF)
        Do
            $RecvBytes = TCPRecv ($tSocket,2048)
        Until $RecvBytes <> ""
        ConsoleWrite (@CRLF& 'Data Received: '& @CRLF & $RecvBytes & @CRLF)
        $intErr = @error
        Local $aArray = StringRegExp($RecvBytes, '(?i)ETag: "(.*?)"', $STR_REGEXPARRAYGLOBALMATCH)
        If IsArray ($aArray) Then Return SetError (0, 0, $aArray[0])
        Return SetError (4, $intErr, 0)
    
    EndFunc
    
    
    Func _Terminate()
        TCPShutdown()
    EndFunc   ;==>_Terminate
    Alles anzeigen

    Die Antwort des Servers lautet:

    HTTP
    HTTP/1.1 401 Unauthorized
    Date: Wed, 17 Jan 2018 21:10:48 GMT
    Server: Apache/2.4.10 (Raspbian)
    Set-Cookie: ocq78n29mqi1=0d9b2ko7r7ilf1epdn7j8jr657; path=/; HttpOnly
    Expires: Thu, 19 Nov 1981 08:52:00 GMT
    Cache-Control: no-store, no-cache, must-revalidate, post-check=0, pre-check=0
    Pragma: no-cache
    Set-Cookie: oc_sessionPassphrase=zUhjocdByC95RsUZw4nx16RhCb5L8CyLvhfyCmmenuKA2x8oGMWE3iqmb1QYh9T1CvN%2FAlfHq8Vkq7q0FyYFv2ajFrgKk3pzWm9J8DM0FIhEnYj6U4uccrptPfpRT2nA; path=/; httponly
    Content-Security-Policy: default-src 'none';
    X-XSS-Protection: 1; mode=block
    X-Content-Type-Options: nosniff
    X-Frame-Options: Sameorigin
    X-Robots-Tag: none
    X-Download-Options: noopen
    X-Permitted-Cross-Domain-Policies: none
    WWW-Authenticate: Basic realm="ownCloud"
    Content-Length: 414
    Content-Type: application/xml; charset=utf-8
    
    <?xml version="1.0" encoding="utf-8"?>
    <d:error xmlns:d="DAV:" xmlns:s="http://sabredav.org/ns">
      <s:exception>Sabre\DAV\Exception\NotAuthenticated</s:exception>
      <s:message>No 'Authorization: Basic' header found. Either the client didn't send one, or the server is mis-configured, No 'Authorization: Basic' header found. Either the client didn't send one, or the server is mis-configured</s:message>
    </d:error>
    Alles anzeigen

    "No 'Authorization: Basic' header found."

    Was mir also dringend fehlt, ist diesr Authorization Basic header...

    Mit diesem hätte ich eine schöne Funktion, um VCARDS auf CardDAV Schnittstellen abzulegen.
    Ein bischen Schützenhilfe würde mich sehr freuen.

  • Kontakteintrag an CardDAV Schnittstelle senden (ownCloud)

    • lloid
    • 17. Januar 2018 um 19:29

    Ja, Peter, Du warst natürlich ungeheuer hilfreich. Möge die Macht mit Dir sein.

    Auf Wikipedia habe ich TCP-Packets gefunden:

    Anfrage:

    Code
    PUT /lisa/addressbook/newvcard.vcf HTTP/1.1
    If-None-Match: *
    Host: addressbook.example.com
    Content-Type: text/vcard
    Content-Length: xxx
    
    BEGIN:VCARD
    VERSION:3.0
    FN:Cyrus Daboo
    N:Daboo;Cyrus
    ADR;TYPE=POSTAL:;2822 Email HQ;Suite 2821;RFCVille;PA;15213;USA
    EMAIL;TYPE=INTERNET,PREF:cyrus@example.com
    NICKNAME:me
    NOTE:Example VCard.
    ORG:Self Employed
    TEL;TYPE=WORK,VOICE:412 605 0499
    TEL;TYPE=FAX:412 605 0705
    URL:http://www.example.com
    UID:1234-5678-9000-1
    END:VCARD
    Alles anzeigen

    Antwort:

    HTTP
    HTTP/1.1 201 Created
    
    Date: Thu, 02 Sep 2004 16:53:32 GMT
    Content-Length: 0
    ETag: "123456789-000-111"

    Diese könnte man doch sicherlich als Anfang nutzen. Den Header kann man ja leicht aufbauen und mit einem TCP_Send / ..Receive handlen.
    Leider ist nicht erläutert, wie die Anmeldung mit User/Passwd läuft. Wahrscheinlich bekomme ich daher aber die UID.

    Ließe sich die Anmeldung an der web-Oberfläche als Einstieg nutzen?
    Die http Header sehen ungefähr so aus:

    Anfrage

    Code
    http://192.168.xxx.xxx/index.php/login
    
    
    POST /index.php/login HTTP/1.1
    
    Host: 192.168.xxx.xxx
    
    User-Agent: Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:47.0) Gecko/20100101 Firefox/47.0
    
    Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
    
    Accept-Language: en-US,en;q=0.5
    
    Accept-Encoding: gzip, deflate
    
    Cookie: ocq78n29mqi1=vqnuvc82m31o3saf8dtrthqm74; oc_sessionPassphrase=%2FgTj2Jcf50decovwRWBgVR7nXXefdDbYZoI9O%2FsxnOL6dX8Ben7rneL8IcchGzuGvtUIX3%2Bx%2Bnnq9%2F4sjzyKyRh0UwAfta4PHbVTeO2t2yGXjZLsGyE3PV9Ts%2BFw2iiW
    
    Connection: keep-alive
    
    Content-Type: application/x-www-form-urlencoded
    
    Content-Length: 195
    
    user=Geht&password=KeinenWasAn&timezone-offset=1&timezone=Europe%2FBerlin&requesttoken=IRQ%2FLR9paSgsIQ59L0kUP1EDsh06KVIEZRErUTpaZjU%3D%3AYuRbT8XrDr6%2BVfyg9imcspki%2BEj5sh%2FdpjKUvTquRIE%3D
    Alles anzeigen

    Antwort:

    HTTP
    HTTP/1.1 303 See Other
    
    Date: Tue, 16 Jan 2018 20:55:05 GMT
    
    Server: Apache/2.4.10 (Raspbian)
    
    Expires: Thu, 19 Nov 1981 08:52:00 GMT
    
    Cache-Control: no-cache, must-revalidate
    
    Pragma: no-cache
    
    Content-Security-Policy: default-src 'none';script-src 'self' 'unsafe-eval';style-src 'self' 'unsafe-inline';img-src 'self' data: blob:;font-src 'self';connect-src 'self';media-src 'self'
    
    X-XSS-Protection: 1; mode=block
    
    X-Content-Type-Options: nosniff
    
    X-Frame-Options: Sameorigin
    
    X-Robots-Tag: none
    
    X-Download-Options: noopen
    
    X-Permitted-Cross-Domain-Policies: none
    
    Set-Cookie: ocq78n29mqi1=9rq8j81sgvoeli0crq1i88gfj3; path=/; HttpOnly
    
    Location: http://192.168.xxx.xxx/index.php/apps/files/
    
    Content-Length: 0
    
    Keep-Alive: timeout=5, max=100
    
    Connection: Keep-Alive
    
    Content-Type: text/html; charset=UTF-8
    Alles anzeigen

    Leider wird keine UID zurückgegeben, mit

    Code
    oc_sessionPassphrase

    oder

    Code
    requesttoken

    weiss ich nichts anzufangen.. Jemand ne Idee?

  • Kontakteintrag an CardDAV Schnittstelle senden (ownCloud)

    • lloid
    • 16. Januar 2018 um 20:58

    Hallo liebe Community :)

    Ein bestehendes GUI soll eingegebene Personendaten nun an eine CardDAV Schnittstelle einer ownCloud Installation senden. Leider finde ich keinerlei Anleitung, Einträge oder sonstiges.

    Kann mir bitte jemand helfen und mich aufklären, wie das umsetzbar wäre?

    Liebe Grüße
    lloid

  • Word Tabelle formatieren

    • lloid
    • 25. Mai 2017 um 16:26

    Vielen Dank.

    Wie kann ich denn die AutoFitBehavior-Eigenschaft auf wdAutoFitContent setzen? Bekomme die Syntax nicht zusammen..

    https://msdn.microsoft.com/de-de/library/office/ff820953.aspx

  • Word Tabelle formatieren

    • lloid
    • 5. Mai 2017 um 00:45

    Hallo liebes Forum
    Wie kann ich denn eine Tabelle, die ich per _Word_DocTableWrite in ein Dokument eingefügt habe formatieren?
    Ich möchte gerne Funktionen oder Objekteigenschaften nutzen, die mir die Tabelle an Inhalt und Seitenbreite anpassen (AutoFit, AutoFormat) und ich möchte gerne Rahmen für die Tabelle definieren.
    Leider habe ich keine Ahnung, wie ich den Kollegen Word dazu bekomme, das auch umzusetzen und meine Google Suche war nicht erfolgreich..

    Kann mir da bitte jemand einen Tipp geben?
    Lieben Dank :)

  • Outlook Kontakte editieren

    • lloid
    • 2. November 2015 um 20:01

    Danke water :thumbup:

  • Outlook Kontakte editieren

    • lloid
    • 2. November 2015 um 13:03

    Hallo water,
    Vielen dank für Deinen Tipp!
    Die EntryIDs hatte ich schon mit ausgelesen und das hat auch sofort funktioniert.

    Allerdings kann ich nur das Standard-Adressbuch (also das erste aus der Liste) erreichen.
    gefunden habe ich in der Hilfe folgende Beispiel-Pfadangabe:

    "*\Outlook-UDF-Test\SourceFolder\Contacts"

    Ich konnte dann mit der Änderung der Angabe auf

    "*\Kontakte"

    das Standard-Adressbuch problemlos abfragen. Versuche, das Konto mit Namen anzugeben, haben nur zu Fehlern geführt... Nun habe ich aber den Fall, dass ich ein bestimmtes Adressbuch erreichen möchte.

    Kennt jemand die Pfadangabe für ein bestimmtes Konto an dieser Stelle? Da würde ich mich über einen kleinen Tipp sehr freuen ;)

    Viele Grüße
    lloid

  • Outlook Kontakte editieren

    • lloid
    • 1. November 2015 um 23:47

    Hallo Bioshade,
    hat alles super funktioniert! Danke für Deine Schützenhilfe :thumbup:

    Viele Grüße
    lloid

  • Outlook Kontakte editieren

    • lloid
    • 29. Oktober 2015 um 21:14

    Hallo Bioshade,
    Vielen Dank für Deine Antwort!
    Denke das war das fehlende Stück. Komme leider heute nicht mehr dazu, aber morgen bestimmt.

    Woher hast Du die Feldbezeichnungen (zB [LastName])? Sind alle übereinstimmend mit den Eigenschaften wie beschrieben in https://msdn.microsoft.com/.../ff868407.aspx oder weicht das ab?

    8)

  • Outlook Kontakte editieren

    • lloid
    • 28. Oktober 2015 um 19:06

    Hallo liebes Forum :thumbup:

    Wie kann man denn in Outlook 2013 die Felder eines eingeplegten Kontaktdatensatzes verändern? Insbesondere möchte ich das Feld "Anzeigename" bzw. "Anzeigen als" verändern. Outlook selbst bringt lediglich die Formate "Vorname Nachname (EmailAdresse)" bzw alternativ "Nachname, Vorname (EmailAdresse)". Ein manuelles Editieren kommt nicht in Frage. Das Format "Firma, Vorname Nachname (EmailAdresse)" ist das Ziel.

    Gibt es da eine Möglichkeit? Oder weiss jemand ein Beispiel oder Anleitung das mit Outlook.au3 oder OutlookEx.au3 umzusetzen?

    Vielen Dank!
    lloid

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™