Beiträge von BugFix

Für die reine Nutzung des Editors zum Programmieren ist es mehr oder weniger egal, ob Scite oder VSCode.

Wer aber gern am Editor eigene Funktionalität haben möchte, findet in SciTE mehr Möglichkeiten auf Ereignisse zu reagieren (z.B. OnChar, OnKey).

Sollte die Entwicklung eingestellt werden, würde ich zumindest versuchen, ob ich die SciTE Variante aktuell halten kann. - Schaun wir ma. 😁

Zitat von autoiter

Hi Leute, erst einmal frohes neues Jahr.

Ich finde es aber ehrlich gesagt albern, dass man bei Problemen mit dem eigenen System in diesem Forum von Leuten "Windoof" lesen muss.
Den Scheiß bekommt man eh oft zu hören. Aber im Forum einer Programmiersprache, die komplett auf Windows aufsetzt und nur dort funktioniert? (Erspart mir bitte Wine Hinweise).

Das ist verdammt peinlich. Ihr nutzt das System nicht nur; ihr nutzt es intensiv, sonst würdet ihr hier nicht schreiben. Kriegt euer Leben in den Griff.

Das, was du dort von dir gibst, ist peinlich.

Mein System lief Monate so, wie es sollte. Keine extraordinäre Software drauf - alles gut. Und dann nach einem Windows Update ging es los - Details oben beschrieben. Ich selber habe an meinem System nichts geschraubt. Das war ausschließlich Windows.

Ich nutze Windows seit der ersten Version. Wirklich stabil waren davon nur 3: Win 95, Win XP, Win 7. Alles, was Peter S. Taler zur Windows Entwicklung gesagt hat, kann ich absolut unterschreiben.

Wir sollen unser Leben in den Griff kriegen - was soll das bitte im Zusammenhang mit M$ Fehlentwicklungen bedeuten?

Zitat von Peter S. Taler

wie meinst Du das? .....keine Icon mehr angezeigt werden

Im gesamten Windows (Desktop, Explorerfenster) gab es keine Icon mehr, bzw. wurde auf dem Desktop für jeden Link ein- und dasselbe Icon verwendet, im Explorer und Menüs (Programme) jedoch gar keins.
Nur das WhatsApp-Icon wurde noch angezeigt - kein Wunder, die Installation ist so tief vergraben, die findet Windows nicht mal mehr selbst.

Zitat von Schnuffel

PS: du hast die KOnsole aber schon als Administrator gestartet? ...........

Ich nutze ConEMU mit Starteinstellung "cmd [Admin]".

ERFOLGSMELDUNG

Zitat von Schnuffel

hier der Link für alle, die auch mit "ruckeln der Maus" Tastaturaussetzer oder einem nicht reagierenden System zu tun haben.

Hat supi geklappt. Kann natürlich sein, dass auch ein im Hintergrund auf Neustart wartendes Update dazwischen gegrätscht hatte.
Sei es, wie es sei - die Kiste läuft wieder, wie gewollt. Danke

Zitat von Schnuffel

mein nachtrag in meinem oberen post ist ein einzeiler

Den hatte ich auch gefunden, bringt bei mir aber kein Ergebnis.
Soweit ich gelesen habe, muss dafür wohl die Installation mit einem MS-Konto erfolgt sein.

Zitat von Schnuffel

Auslesen kann man den auch, müsste ich aber erst nachsehen mit welchem Prog das geht.

Hab was gefunden, als VBS

' Auslesen des Digitalen Lizenzschlüssels
Set WshShell = CreateObject("WScript.Shell")
MsgBox ConvertToKey(WshShell.RegRead("HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\DigitalProductId"))
Function ConvertToKey(Key)
    Const KeyOffset = 52
    i = 28
    Chars = "BCDFGHJKMPQRTVWXY2346789"
    Do
        Cur = 0
        x = 14
        Do
            Cur = Cur * 256
            Cur = Key(x + KeyOffset) + Cur
            Key(x + KeyOffset) = (Cur \ 24) And 255
            Cur = Cur Mod 24
            x = x -1
        Loop While x >= 0
        i = i -1
        KeyOutput = Mid(Chars, Cur + 1, 1) & KeyOutput
        If (((29 -i) Mod 6) = 0) And (i <> -1) Then
            i = i -1
            KeyOutput = "-" & KeyOutput
        End If
    Loop While i >= 0
    WriteToFile(KeyOutput)
    ConvertToKey = KeyOutput
End Function

Function WriteToFile(sKey)
    Const ForWriting = 2
    Dim fso, f
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set f = fso.OpenTextFile(".\ProductKey.txt", ForWriting, True)
    f.Write sKey
End Function

Zitat von Schnuffel

manage-bde -status

a) Ich freue mich, dass nicht verschlüsselt wurde

b) Ich ärgere mich, weil ich nicht weiß, warum jetzt alles so langsam läuft.

Was auch noch ärgerlich ist: Windows war vorinstalliert. Ich habe versucht den Lizenz-Key auszulesen - Pech gehabt, digitale Lizenz. Den letzten Block der Lizenz bekomme ich gezeigt. Ich kann also nicht mal eine saubere Neuinstallation machen, ohne mir einen neuen Key zu kaufen.

Es werden übrigens immer mehr Macken sichtbar. Nach dem Start (oder Reaktivieren aus Hibernate) habe ich für ca. 1 Minute kein WLAN. Auch wenn ich irgendeinen Ordner öffnen will, passiert erst mal nichts. Es fühlt sich an, wie Win98 mit schlecht eingestellter config.sys.

Zitat von Schnuffel

dafür gibt es jetzt jeweils ein komplettes windows mit ca. 5-6 GB. die zu laden kann das system auch verlangsamen.

Danke für die "beruhigenden" Nachrichten. 🙈

Zitat von Racer

Wenn Du Windows 11 24H2 (Home, Pro oder Enterprice) neu installierst werden alles Disken die das Setup findet automatisch verschlüsselt - ohne zu fragen !!!! Aber auch dafür gibt es Abhilfe

Wie kann ich feststellen, ob verschlüsselt wurde und ggf. wie deaktivieren?

Entschlüsseln bei Zugriffen würde das schnarchlangsame Verhalten des Rechners erklären. Wenn ich früher auf eine Datei-Eigenschaften im Explorer geklickt habe, war das Fenster sofort da - jetzt mit Verzögerung und dem MS-Aktivitätskringel.

Ganz seltsam ist das Mausverhalten (egal ob Touchpad oder externe Maus). Wenn ich die Maus schnell ziehe, bewegt sie sich auf dem letzten Drittel sprungartig - völlig unabhängig von der eingestellten Zeigergeschwindigkeit (Win 11 hat ja leider nicht mehr die Möglichkeit die Zeigerbeschleunigung einzustellen, sondern nur noch "Zeigerbeschleunigung verbessern").

Ich hatte mir den Laptop eigentlich nur zugelegt, um sicher zu sein, dass meine AutoIt-Programme auch in Win 11 laufen. Und jetzt ist die Kiste langsamer als mein XP-Rechner vor 20 Jahren.

Es ist zum Mäuse melken - ich hatte ja vor einiger Zeit schon das Problem, dass nach einem Windows-Update keine Icon mehr angezeigt werden. Mit Deinstallation des Updates funktionierte alles wieder. Daraufhin habe ich dieses Update versteckt (Software: WinUpdate ShowHide).

Und nun ist dasselbe Problem wieder aufgetreten - also lag es wohl doch nicht am Update, obwohl der Zusammenhang gegeben schien. Nach viel Suchen habe ich einen Beitrag eines Nutzers mit demselben Problem gefunden. Er konnte dies mit einem Inline Setup von Windows 11 lösen (Win 11 ISO im System öffnen und Setup ausführen, bügelt das System neu drauf aber man kann auswählen, was beibehalten wird).

Das wollte ich nun auch so lösen. Aber nach dem Start der setup.exe bekam ich folgende Info:

Und das ist mein System:

Muss man nicht verstehen. Und ich kann jetzt nicht mal mein System neu installieren, weil Windoof meint, das geht so nicht.

Hat jemand eine Idee?

EDIT

Ich habe einen Eintrag für die Registry gefunden, der die Überprüfung auf TPM und Prozessor abschaltet.

Jetzt läuft gerade die Installation - ich hoffe das Ergebnis ist, wie gewünscht.

Den Registry-Eintrag reiche ich nachher nach.

Zitat

TPM 2.0- und CPU-Prüfung per Registry-Eintrag abschalten

Windows 11 prüft im laufenden Betrieb nicht, ob TPM 2.0 vorhanden ist, sondern nur bei der Installation des Betriebssystems. Das Betriebssystem läuft zudem auf CPUs, die nicht auf der Kompatibilitätsliste stehen. Um Nutzern zumindest die Möglichkeit zu geben, Windows 11 testweise auf solchen Maschinen zu installieren und auszuprobieren, hat Microsoft eine Möglichkeit zur Umgebung bestimmter Prüfungen beim Setup vorgesehen.

Wird TPM 1.2 auf einer Maschine mit Windows 10 unterstützt, kann der Anwender vor der Windows-11-Installation den Registrierungseditor regedit.exe mit administrativen Berechtigungen starten und dann zum Schlüssel

HKEY_LOCAL_MACHINE\SYSTEM\Setup\MoSetup

navigieren. In diesem Schlüssel muss der 32-Bit-DWORD-Wert AllowUpgradesWithUnsupportedTPMOrCPU eingetragen und auf 1 gesetzt werden. Das deaktiviert die Routine zur Prüfung auf TPM 2.0 sowie kompatible CPUs bei der Installation. Windows 11 sollte sich dann als Upgrade über ein lauffähiges 64-Bit-Windows 10 installieren lassen.

Ja - es hat geklappt. Bleibt nur zu hoffen, dass sich das nicht wieder ändert.

Naja, alles funktioniert nicht. Display flackert gelegentlich und Maus bewegt sich sprungartig.

Zitat von PSblnkd

und SciTE läuft nicht unter WinXP!

SciTE selbst ist ein Multi-OS Programm.

Das spezialisierte "SciTE4AutoIt" ist, wie der Name bereits sagt, auf AutoIt zugeschnitten und daher von der Windows Umgebung abhängig. AutoIt-Versionen, die eine höhere Windows-Version bedingen, erfordern somit auch eine angepasste SciTE-Version um alle neuen Fähigkeiten der AutoIt-Version darzustellen.

Wenn du also mit XP arbeitest, brauchst du eine alte AutoIt-Version mit zugehöriger alter SciTE4AutoIt-Version.

Fündig wirst du hier:

• AutoIt-Archiv
• SciTE4AutoIt-Archiv

Du kannst dann natürlich nicht auf die in späteren Versionen implementierten UDF zugreifen. Aber sofern diese nicht direkt auf Windows-Features höherer Generation zugreifen, kannst du diese ja einfach aus einer neuen Version rauskopieren.

EDIT:

Deine Frage nach "Step"-Fähigkeit (du meinst sicher Haltepunkte, zeilenweises Abarbeiten etc.) hat überhaupt nichts mit SciTE zu tun. Du editierst in SciTE ausschliesslich, nichts anderes kann oder macht SciTE. Und wenn du editiert hast, lässt du deinen Code ausführen. Das macht nicht SciTE, sondern der AU3-Wrapper, den du nur mit SciTE aufrufst.

Ich habe seit 2011 einen Samsung Smart TV. Welchen Sinn die Smartfunktionen haben sollen, hat sich mir bis heute nicht erschlossen. Receiver war jahrelang eine Sky-Kiste. War ich auch absolut zufrieden. Aber bei der letzten Preiserhöhung bin ich ausgestiegen. Jetzt tut ein waipu Stick seinen Dienst. Das Angebot ist viieel zu groß. Wann soll man das alles gucken?

4K ist für mich ohne Nutzen, ob HD oder 4K - meine Augen sehen da keinen Unterschied (hab mir das mal im Mediamarkt angesehen).

Also, wie schon vorab mal erwähnt wurde: Zum Händler gehen und das Testen, was einem wichtig ist.

MojoeB Das hat nur zweitrangig etwas mit Smart TV zu tun. Das Echtzeitaufzeichnen von Sendungen auf private Datenträger (VHS-Kasette 🤣), die zu bestimmten Sendezeiten ausgestrahlt werden, ist m. W. nach wie vor völlig legal. Du meinst sicher "On Demand"-Inhalte. Da streiten sich die Gelehrten. Aber in DE gilt: Was nicht explizit verboten ist, ist erlaubt. Insofern alles kein Problem - solange du nicht irgenwelche Inhalte in Umlauf bringst.

Blogging Plattformen halte ich in beiden Richtungen für wenig sinnvoll.

Der Schreibende kann den größten Quark unlektoriert von sich geben.

Der Lesende kann sich nicht darauf verlassen, dass der Wahrheitsgehalt im Artikel größer Null ist.

Suche nach Informationen im Netz ist nach wie vor etwas Lotterie. Wenn ich von mehr als 3 gefunden Ergebnissen ähnliche Inhalte bekomme "kann" das schon stimmig sein.

Danke für euren Input. 👍🏻

glpi schaut recht vielversprechend aus. Ich werde mich mal intensiv mit befassen.

Sei Herzlich Willkommen - nicht nur im AutoIt Forum, sondern auch im Klub '61. 😂

Mit Cobol habe ich letztmals vor 30 Jahren gearbeitet, da existieren nur noch nebulöse Reste. 😙

Was suche ich:

Verwaltung einer Werkstatt (NICHT Kfz-Werkstatt - dazu habe ich bestimmt 20 verschiedene gefunden)
Beinhaltet:
- Werkzeugmanagement (Anschaffung, Reparatur, Ausgabe, Rückgabe, Wartung, Prüftermine, Kalibration, ... , Aussonderung)
- Fahrzeugmanagement (Bestückung der Fzg. mit Werkzeugen und Material)
- Zuordnung Personen (angeschafft durch, Ausgegeben an, Vorgang erfasst durch etc.)

Es soll im Endeffekt eine lückenlose Dokumentation entstehen mit schnellem Überblick, welches Werkzeug sich wo befindet, wann es gewartet/kalibriert werden muss etc. Eine reine Prüfmittelverwaltung hatte ich schon mal in Autoit mit SQLite erstellt. War aber speziell auf ein bestimmtes Einsatzgebiet zugeschnitten. Da ich jetzt aber die Branche wechsele (He, Neuanfang mit 63 - ich hab gekündigt!), brauche ich eine allgemeine Lösung.

Also wer mal was gesehen hat oder mit gearbeitet hat - ich sammle alle Infos.

So, ich war leider etwas unter Zeitdruck, weil mein Chef natürlich gaaanz dringend die Resultate wollte.

Habe jetzt kurzerhand einfach alle betroffenen Tabellen in CSV Dateien exportiert. Und den Rest hat AutoIt erledigt.
Einlesen in Arrays, Datensätze auswerten und verknüpfen - die Auswertelogik in AutoIt zu schreiben ging (für mich) deutlich schneller als mich noch länger intensiv mit SQL Fallstricken zu quälen.

Nochmals Danke für Eure Bereitschaft.

OK, ich versuche mich dran. Danke erst mal.

Ich muss aus unsere Firebird SQL Datenbank alle Daten für unsere aktiven Kunden in eine Excel Tabelle überführen.
Der Export ist kein Problem, da lasse ich das Ergebnis einer Abfrage einfach in eine *.dbf ausgeben.

Problem ist die Verknüpfung der Daten aus den vielen Tabellen.

Die Struktur der Datenbank habe ich mit den im Moment wichtigen Tabellen & Feldern hier beschrieben: https://www.db-fiddle.com/f/8h4pVQYEibvQsiohuuNw8i/2

Hab gerade gesehen, dass auf der Seite meine Einträge nicht sichtbar sind, wenn ich es über den Link aufrufe (zu hoch für mich ) -- Retour: Beim Aktualisieren ändert sich die Verlinkung - korrigiert.

Dann hier:

/* Meine Datenbank ist Firebird SQL 1.5
  Ich hoffe, die Unterschiede sind nicht zu gravierend. 
  
  Hier die Tabellen, aus denen ich aktuell Daten abrufen muss mit den wichtigsten Feldern */
CREATE TABLE kunden (
 KUNDENNR INT, ADRESSGRP CHAR(6), NAME CHAR(40), STRASSE CHAR(40), PLZ CHAR(9), ORT CHAR(30),
 NM_BEAT CHAR(20), NM_KRANK_KASS CHAR(2), NM_KVNR CHAR(20), NM_GEBDAT DATE, NM_STATUS CHAR(5)
);
CREATE TABLE beleg (
 BELEGTYP CHAR(1), BELEGART CHAR(5), BELEGNR INT, BELEGDAT DATE, ADRESSNR INT, NAME CHAR(40), STRASSE CHAR(40), PLZ CHAR(9), ORT CHAR(30), NETTO FLOAT, BRUTTO FLOAT
);
CREATE TABLE belegpos (
 BELEGTYP CHAR(1), BELEGART CHAR(5), BELEGNR INT, ADRESSNR INT, ARTIKELNR CHAR(30), ARTTEXT TEXT, GESAMT FLOAT, NM_HILFSNR CHAR(30), NM_HMKZ CHAR(2), NM_HMVERSZEIT CHAR(2), NM_VERSZEIT_VON DATE, NM_VERSZEIT_BIS DATE
);
CREATE TABLE serien (
 HERSTSERNR CHAR(20), TEXT1 CHAR(40), KUNDENNR INT, ARTIKELNR CHAR(30), LILIDAT DATE, KENNUNG CHAR(20)
);
CREATE TABLE artikel (
 ARTIKELNR CHAR(30), WGR CHAR(6), ARTTEXT CHAR(255), NM_HIMINR CHAR(139
);

Ausreichend sinnvoll verknüpfte Datensätze zu erstellen, ist jetzt aber zu aufwändig. Ich hoffe, es wird auch so verständlich.

Ich habe eine Tabelle "kunden". Daraus ziehe ich mit einer Abfrage eine Liste mit KUNDENNR.
Ich brauche noch einige andere Felder aus der Tabelle, aber das hier ist meine Basisabfrage, da die KUNDENNR über alle Tabellen verbindet.

/* Alle Aktiven Kunden */
select KUNDENNR
from kunden
where
 KUNDENNR < 40000 and 
 ADRESSGRP in ("1", "11") and
 PLZ <> ""
;
/*--------------------------------------------------------------------*/

Ich möchte den Kunden zugebuchte Geräte abfragen:

/* &&SQL1 
  Alle Aktiven Kunden */
select KUNDENNR
from kunden
where
 KUNDENNR < 40000 and 
 ADRESSGRP in ("1", "11") and
 PLZ <> ""
;
/* &&SQL2 
  Geräte, die den aktiven Kunden zugebucht sind */
select SNR.KUNDENNR, SNR.ARTIKELNR, SNR.TEXT1 ARTIKEL, SNR.HERSTSERNR, SNR.LILIDAT LIEFDAT, SNR.KENNUNG
from "&&SQL1" KD
left join serien SNR
on KD.KUNDENNR = SNR.KUNDENNR
order by KD.KUNDENNR
;
/* ### Hier würde ich noch eine Abfrage auf die Tabelle "artikel" brauchen mit den SNR.ARTIKELNR aus der vorigen Abfrage
  Aus der Tabelle benötige ich: artikel.WGR und artikel.NM_HIMINR ### */
/*
Ergebnistabelle=Aktive_KD_SN.dbf
*/
/*--------------------------------------------------------------------*/

In einer Tabelle "beleg" sind alle Belege mit BELEGTYP, BELEGART, BELEGNR, BRUTTO, BELEGDAT gespeichert
In einer Tabelle "belegpos" sind alle Belegpositionen mit BELEGTYP, BELEGART, BELEGNR, ARTIKELNR, GESAMT gespeichert.
Für einen einzelnen Kunden kann ich erforderliche Werte aus den Tabellen abfragen. Aber ich brauche es für alle.

Das folgende müsste also wie eine Schleife für alle Kunden aus der Kundenabfrage ausgeführt werden. Wie geht das?

/*--------- PAUSCHALPOSITION & ZUZAHL FÜR KD-NR ---------------------
 So funktioniert es für eine KUNDENNR/ADRESSNR.
 Ich brauch das für alle KDNR aus der Abfrage:
    select KUNDENNR
    from kunden
    where
      KUNDENNR < 40000 and 
      ADRESSGRP in ("1", "11") and
      PLZ <> ""
    order by
      KUNDENNR
   ;
*/
/* &&SQL1
  LETZTES RE-DATUM AUSSER ZUZAHL FÜR KD-NR*/
select max(BELEGDAT) DATUM
from beleg
where
 BELEGTYP = "V" and
 BELEGART = "RE" and
 BRUTTO > 10 and
 ADRESSNR = 18489
;
/* &&SQL2
  BELEG(E) AUSSER ZUZAHL FÜR KD-NR VON DATUM=MAX_DAT */
select a.BELEGNR, a.BRUTTO
from beleg a, "&&SQL1" b
where
 a.ADRESSNR = 18489 and
 a.BELEGTYP = "V" and
 a.BELEGART = "RE" and
 a.BELEGDAT = b.DATUM
;
/* &&SQL3
  BELEGPOS ABFRAGEN FUER "SQL2" */
select
 a.ARTIKELNR, a.TEXT, a.NM_HILFSNR HIMINR, a.NM_HMKZ HIMIKZ, a.NM_HMVERSZEIT VERSZEIT,
 a.NM_VERSZEIT_VON VON, a.NM_VERSZEIT_BIS BIS, a.GESAMT
from belegpos a, "&&SQL2" b
where
 a.BELEGTYP = "V" and
 a.BELEGART = "RE" and
 a.BELEGNR = b.BELEGNR and
 a.ARTIKELNR not in("vpe")
;
/*--------------------------------------------------------------------*/