Beiträge von Moombas

Naja oh-ha , Kann er die ini denn korrekt auslesen (als default gibst du ja '' an, falls er nichts auslesen kann, was zu deinem Problem führen könnte)?

Vergleich mal die beiden Ausgaben von deinem $sCurrentUser ggf. ist dort ein Unterschied drin, der deinen Fehler hoch kommen lässt.

Also mal so testen z.B.:

$sCurrentUser1 = IniRead($programmini, "Mail", "user", "")
$sCurrentUser2 = $oOutlook.GetNameSpace("MAPI").CurrentUser.Name
MsgBox(1,'','Ini: ' & $sCurrentUser1 & '   Object: ' & $sCurrentUser2)

Wenn bei deiner ini gar nichts zurück kommt. Prüfe ob deine ini da liegt, wo $programmini es angibt und ob dort die Sektion Mail und der Key user überhaupt existiert.

Wenn bei beidem was ausgelesen wird aber Unterschiede bestehen, prüfe ob der Wert in der ini dem entspricht was du haben willst/musst.

Hört sich nach einer Sinnvollen Ergänzung an.

Werde es mir mal vormerken und bei Gelegenheit testen/nutzen

Zitat von AspirinJunkie

Jetzt klappt es auch mit der Datei.
Lass aber die Finger vom 4. Worksheet oder bearbeite es vorher - das funktioniert zwar, dauert aber ewig.
Grund: Alleine dieses Worksheet ist 82 mb groß obwohl im Grunde gar nichts drin steht.

Ab der 25. Zeile kommt inhaltlich nichts mehr aber die Zellen sind trotzdem in der Datei definiert.
Wenn man alle Zeilen ab der 26. ordentlich löscht dann ist die ganze Datei auf einmal nur noch 700kb groß.
Ähnlich ist es beim 2. Sheet mit den vielen überflüssigen Nullen.

Ein klassisches "Excel-Nutzer"-Problem, wenn Sachen ohne Sinn und Verstand hin und her kopiert wurden...

Was bekommst du denn als Fehler zurück?

Rein von der Logik müsste es funktionieren.

Also das finde ich nun schon merkwürdig. Warum kannst du die cmd (generell) nicht verwenden?

Ich gehe davon aus, weil es mehrere Benutzer sind mit unterschiedlichem Login.

Was gibt dir denn _Excel_BookClose($oWorkbook, False) als Wert zurück?

Ist @error wirklich direkt nach dem obigen Befehl 0?

Also z.B.:

$ReturnCode = _Excel_BookClose($oWorkbook, False) 
$error = @error
MsgBox(1, 'ReturnCodes', 'ReturnCode: ' & $ReturnCode & '   Error: ' & $error) ; Bei Erfolg Ausgabe: ReturnCode: 1    Error: 0

Was passiert wenn du es nicht als "readonly" öffnest, gleiches Problem?

Was spricht dagegen bei der IT anzufragen, das du ein anderes Layout zusätzlich installieren darfst? Ich meine das ist ja keine Sicherheitslücke oder so die du schaffst, erst recht zu irgendwelchen eigens geschriebenen Programmen -.-

BugFix Sieht aus als würde jemand versuchen mit einer Tastatur, die keine Umlaute hat (z.B. EN-Layout), diese über einen Umweg zu simulieren.

Ein Test bei mir kommt gar nicht hin.

Row 9 sagt 74498048 = 71,05 MB

Wobei der Taskmanager sagt: 16.580 K = 16,19MB (sofern das K hier für 1024 und nicht 1000 steht, sonst: 15,81MB)

Nein, es war nur eine Vermutung da häufig fälschlicherweise mit 1000 anstatt 1024 gerechnet wird.

Mein Beispiel bezog sich jedoch nur auf die beiden Zahlen 44,46 und 41,4. Ggf. war es nur Zufall das es so passte.

Aber ist [9] denn Korrekt, also das was du wirklich willst? Was steht im Rest des Arrays?

Fast hätte ich gesagt, das dies ein Fehler in der Umrechnung ist (1000 anstatt 1024) aber um von 44,46MB auf 41,4MB zu kommen braucht es 3*1024. Also:

44,46 * 1000 * 1000 * 1000 /1024 /1024 /1024 = 41,4

Aber MB wäre nur 2 mal, außer es wird generell mit GB gerechnet und falls "0,X" raus kommt mit 1000 multipliziert wenn das Ergebnis ausgegeben wird:

0,04446 * 1000 * 1000 * 1000 /1024 /1024 /1024 = 0,0414 -> weil 0, -> 0,0414 * 1000 = 41,4 als Ergebnis

Wobei 41,4MB dann das richtige Ergebnis wäre.

Hat keiner eine Idee?

Habe auch das hier gefunden: https://www.autoitscript.com/forum/topic/12…hon-and-autoit/

Bzw.: https://www.autoitscript.com/forum/topic/20…comment=1437840

Aber eigentlich würde ich es lieber in AutoIt code schreiben und nicht zusätzliche Software installieren.

Lass mal die "" weg. Also:

If $number_length <> 10 Then
    MsgBox($MB_SYSTEMMODAL, "", $number_length, 10) ;Timeout
EndIf

Würde das nicht mit WinWait kollidieren da AdlibRegister dadurch pausiert wird?

Vom Prinzip:

Startzeit loggen und nach JEDEM Schritt prüfen anhand der aktuellen Zeit ob 3 Minuten um sind und ggf. Abbrechen.

Das wären jedoch etliche Funktionsaufrufe.

Anders wäre folgendes möglich: Mit einem 2. Programm (oder sich selber mit entsprechenden Parametern) über einen run() befehl starten.

in einer Schleife 3 Min prüfen ob die PID (durch run zurückgegeben) noch existiert, wenn ja processclose().

Es gibt aber sicherlich noch eine andere Möglichkeit die ich nicht auf dem Schirm habe.

Hallo zusammen,

ich brauche mal eure Hilfe, da ich mich mit HTTP Requests (grundlegend) nicht auskenne.

Ich habe folgenden Python Code (extern) erhalten (funktioniert) der aber in autoit Konvertiert werden soll (für ggf. interne Anpassungen):

from http.client import HTTPConnection
from base64 import b64encode
import csv
import urllib.parse
from requests.auth import HTTPDigestAuth
import requests
import time

# Benutzer und Passwort
username = 'User'
password = 'PW'

with open('ips.csv', newline='') as csvfile: ;keine Umsetzung benötigt
    updateips = csv.reader(csvfile, delimiter=' ', quotechar='|') ;keine Umsetzung benötigt
    for row in updateips: ;keine Umsetzung benötigt
        print(', '.join(row))
        requesturlstart= 'http://' + row[0] + '/!' 
        requesturl = requesturlstart + urllib.parse.quote(u'Inhalt mit /Befehlen und Leerzeichen,falls relevant'.encode('utf-8'))
        print(requesturl)
        print(requests.get(requesturl, auth=HTTPDigestAuth(username, password)))

Wie bekomme ich das in AutoIt dargestellt? Habe mich schon anhand Beispielen versucht aber ich glaube ich mache noch etwas grundlegend falsch, da ich mit http bisher gar nichts am Hut hatte:

Func HTTP($IP)
Local $hOpen, $hConnect, $hRequest, $iSupportedSchemes, $iFirstScheme, $iAuthTarget, $sChunk, $sOut, $error
Local Const $sFocus = 'Inhalt mit /Befehlen und Leerzeichen,falls relevant'

   $hOpen = _WinHttpOpen()
   $hConnect = _WinHttpConnect($hOpen, $IP)
   $hRequest = _WinHttpOpenRequest($hConnect, "GET", $sFocus, Default, "", "*/*")

   If _WinHttpQueryAuthSchemes($hRequest, $iSupportedSchemes, $iFirstScheme, $iAuthTarget) Then
      _WinHttpSetCredentials($hRequest, $iAuthTarget, $iFirstScheme, 'User', 'PW')
      _WinHttpSendRequest($hRequest)
      _WinHttpReceiveResponse($hRequest)
   EndIf

   If _WinHttpQueryDataAvailable($hRequest) Then
      While 1
         $sChunk = _WinHttpReadData($hRequest)
         If @error Then
            $error = @error
            ExitLoop
         EndIf
         $sOut &= $sChunk
      WEnd
   EndIf

   _WinHttpCloseHandle($hRequest)
   _WinHttpCloseHandle($hConnect)
   _WinHttpCloseHandle($hOpen)
EndFunc

Damit wird eine Konfiguration an ein Gerät übertragen, leider funktioniert meine Variante nicht.

Ich kann aktuell nicht den ganzen Code überfliegen aber du öffnest das Excel "Silent" also im Hintergrund, mach es doch mal sichtbar (_Excel_Open(TRUE, TRUE, TRUE, FALSE)) ggf. siehst du den Fehler dann (eine Fehlermeldung).

Eine Schnellschussidee: Speicherst du die Dateien vorm beenden (wirklich)? Wenn nicht, musst du das explizit machen, denn sonst kommt eine Fehlermeldung "Soll das Dokument vorm Schließen gespeichert werden?"

Du brauchst dafür keine Schleife, sondern einen Funktionsaufruf.

Lager den Teil, der mehrfach ausgeführt werden muss, in eine "Func" aus und übergebe dieser immer den Dateinamen mit: Func($IniFile)

Dann brauchst du nur die Funktion immer wieder dort aufrufen wo du es benötigst und den neuen Dateinamen übergeben.

Es ist nicht generell schlecht. Aber es gibt halt viele negativ Beispiele:

- Kind wird vor dem Tablet (oder TV) "geparkt" (weil man gerade keine Zeit/Lust hat sich mit ihm zu beschäftigen)

- Kind wird schon extrem früh (vom Alter) davor gesetzt

- Kind sitzt (übertriebenermaßen) 24/7 davor

- Tablet ist ungeschützt und das Kind kann auf alle Webseiten

Das man, wenn man es nur Zeitweise erlaubt, es in Maßen passiert, der richtige Inhalt freigegeben wird (bzw. fragwürdiger gesperrt wird) und man es nicht als "Parkplatz", sondern zum zeitweiligen Spielen und Lernen nutzt positiv ist und auch das Gefühl für die Technik gibt (was heutzutage nun mal unabdingbar ist), dann sollte niemals jemand etwas dagegen haben.

Wenn ich mir aber aktuell schon die Zwerg-Smombies anschaue und teilweise wie stark einige vor TV und/oder Tablet geparkt werden, frage ich mich durchaus nach dem Maß der Dinge.