[Файловая система] Создание папки с версией файла

$c_folder = FileGetVersion("AutoIt3.exe")
DirCreate($c_folder)

$c_folder = StringRight(FileGetVersion("AutoIt3.exe"), 2)
DirCreate($c_folder)

$c_folder = StringLeft(FileGetVersion("AutoIt3.exe"), 5)
DirCreate($c_folder)

$sText = StringRegExpReplace(FileGetVersion(@AutoItExe), '(\d+\.\d+\.\d+).*', '\1')
MsgBox(0, 'Сообщение', $sText)

For $i = 1 To 10;00
	$sFulVer = StringFormat('%d.%02d.%02d.%d', Random(1, 9, 1), Random(0, 99, 1), Random(0, 99, 1), Random(0, 999, 1))
	$sShortVer_1 = StringRegExpReplace($sFulVer, '\.[^.]*$', '')
	$sShortVer_2 = StringLeft($sFulVer, StringInStr($sFulVer, '.', 0, -1) - 1)
	ConsoleWrite(StringFormat('%s  ---> %s  ---> %s\n', $sFulVer, $sShortVer_1, $sShortVer_2))
Next