Moin Zusammen.
Ich hatte mich gefragt, wie ich nur an den Dateinamen (ohne Dateiendung) komme.
Wie das mit einem festen Pfad (C:\Dokumente und Einstellungen\bla\muster.txt) habe ich ja im Forum gefunden und es unten nach meinem Bedarf
"angepasst".
Aber was ist, wenn ich nicht beim Laufwerksbuchstabe beginne, sondern im @ScriptDir Verzeichnis und die eigene Datei (@ScriptName) verwende?
Spoiler anzeigen
C
#include <file.au3>
#include <array.au3>
ConsoleWrite("########################################################" & @CRLF)
ConsoleWrite("# Pfad = C:\Dokumente und Einstellungen\bla\muster.txt #" & @CRLF)
ConsoleWrite("########################################################" & @CRLF)
Dim $szDrive, $szDir, $szFName, $szExt
$TestPath = _PathSplit("C:\Dokumente und Einstellungen\Username\muster.txt", $szDrive, $szDir, $szFName, $szExt)
; Ganzer Pfad
$_filename_ganzer_pfad = $szDrive & $szDir & $szFName & $szExt
ConsoleWrite("Pfad ganz : " & $_filename_ganzer_pfad & @crlf)
; Pfad zur Datei
$_filename_pfad_zur_datei = $szDrive & $szDir
ConsoleWrite("Pfad zur Datei : " & $_filename_pfad_zur_datei & @crlf)
; Dateiname mit Dateiendung
$_filename_datei_mit_endung = $szFName & $szExt
ConsoleWrite("Dateiname mit Endun : " & $_filename_datei_mit_endung & @crlf)
; Dateiname ohne Dateiendung
$_filename_datei_ohne_endung = $szFName
ConsoleWrite("Dateiname ohne Endung : " & $_filename_datei_ohne_endung & @crlf)
; Dateiendung mit Punkt
$_filename_dateiendung_punkt = $szExt
ConsoleWrite("Punkt und Dateiendung : " & $_filename_dateiendung_punkt & @crlf)
; Dateiendung mit Punkt
$_filename_dateiendung_ohnepunkt = StringTrimLeft($_filename_dateiendung_punkt, 1) ; Entfernt 1 Zeichen von links des Strings.
ConsoleWrite("Dateiendung ohne Punkt : " & $_filename_dateiendung_ohnepunkt & @crlf & @crlf)
ConsoleWrite("#################################" & @CRLF)
ConsoleWrite("# Pfad = @ScriptDir\@ScriptName #" & @CRLF)
ConsoleWrite("#################################" & @CRLF)
;#################################
;# Pfad = @ScriptDir\@ScriptName #
;#################################
Dim $s2zDrive, $s2zDir, $s2zFName, $s2zExt
$Test2Path = _PathSplit(@ScriptDir & "\" & @ScriptName, $s2zDrive, $s2zDir, $s2zFName, $s2zExt)
; Ganzer Pfad
$_filename_ganzer_pfad2 = $s2zDrive & $s2zDir & $s2zFName & $s2zExt
ConsoleWrite("Pfad ganz : " & $_filename_ganzer_pfad2 & @crlf)
; Pfad zur Datei
$_filename_pfad_zur_datei2 = $s2zDrive & $s2zDir
ConsoleWrite("Pfad zur Datei : " & $_filename_pfad_zur_datei2 & @crlf)
; Dateiname mit Dateiendung
$_filename_datei_mit_endung2 = $s2zFName & $s2zExt
ConsoleWrite("Dateiname mit Endung : " & $_filename_datei_mit_endung2 & @crlf)
; Dateiname ohne Dateiendung
$_filename_datei_ohne_endung2 = $s2zFName
ConsoleWrite("Dateiname ohne Endung : " & $_filename_datei_ohne_endung2 & @crlf)
; Dateiendung
$_filename_dateiendung2 = $s2zExt
ConsoleWrite("Punkt und Dateiendung : " & $_filename_dateiendung2 & @crlf)
; Dateiendung mit Punkt
$_filename_dateiendung_ohnepunkt2 = StringTrimLeft($_filename_dateiendung2, 1) ; Entfernt 1 Zeichen von links des Strings.
ConsoleWrite("Dateiendung ohne Punkt : " & $_filename_dateiendung_ohnepunkt2 & @crlf & @crlf)
Alles anzeigen
Weiß nicht ob es hier her gehört, sonst gerne verschieben.