Kategorien
CodeArchiv Powershell

PowerShell Bildschirmbereich mit GetBufferContents sichern und wieder herstellen

Beschreibung

Da ich ein Fan der Konsole bin und gerne mehr mit Powershell  erledigen möchte , habe ich mich auf die Suche gemacht, komfortable Werte abzufragen in Form eines Formulars. Klar ich kann mit Tools mit eine GUI zusammenbasteln und auf die Ereignisse reagieren. Aber dann befinde ich mich schon wieder außerhalb der Konsole. Also was tun.

Ich habe also angefangen ein Formulartool für die Shell zu erstellen. Was bis dato auch schon super funktioniert. Aber da ich auch Auswahlfelder haben möchte, bin auf das Problem gestoßen, da ich beim Einblenden der möglichen Werte, andere Feldbreiche überschreibe. Also muss ich vor dem Einblenden den Bereich, in dem ich die Werte einlebenden möchte, zwischenspeichern. Dazu habe ich die Funktion GetBackGround geschrieben die mit der Funktion GetBufferContents einen Bereich sichert.

Ich gebe als Parameter die linke obere und die rechte untere Ecke als Koordinaten an. Dann sichert mir die Funktion den Inhalt und gibt sie mir zurück.

Ich fühle mich, irgendwie wie in alte DOS Zeiten versetzt. Die ersten Programmier Erfahrungen mit Fenstertechnik unter Turbo Basic und Dos.

Mit der Funktion SetBackGround wird der gesicherte Inhalt einfach wieder an der Ursprungsposition ausgegeben. Weitere Funktionen rund um mein Powershell Formulartool für die Shell werde ich zu einem späteren Zeitpunkt hier veröffentlichen.

PowerShell GetBackGround

PowerShell GetBackGround

Kategorien
CodeArchiv Dateien VBA

VBA Dateipfad aus Dateiname extrahieren

Beschreibung

Um aus einem Dateinamen inkl. Pfad Angabe nur den Pfad zu bekommen, ist die nachfolgende Funktion entstanden.

VBA GetPathFromFullPath

Kategorien
CodeArchiv Dateien VBA

VBA Alle Dateien eines Verzeichnisses ermitteln

Beschreibung

Beschreibung:

Um alle Dateien aus einem Verzeichnis auszulesen habe ich die nachfolgende Funktion geschrieben. Wird der Funktion nur der Pfad mitgegeben, so werden alle Dateien ausgelesen. Über den Parameter strSuffix kann eine Auswahl der Dateien angegeben werden. Die Variable strSeperator beschriebt ein Zeichen, mit dem die Dateien im Ergebnis voneinander getrennt werden, denn das Ergebnis wird in einem String zurück gegeben. Der letzte Optionale Parameter bitFullPath besagt, da wenn er Wahr ist, für jede Datei den vollen Pfad mit ausgibt.

VBA GetFileSuffixFromFilename