Что нового

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

Delus1on

Новичок
Сообщения
8
Репутация
0
Всем привет. Помогите пожалуста, нужно создавать папку с версией файла, но что бы ее название было 3-х значным, а не 4-х.

Код:
$c_folder = FileGetVersion("AutoIt3.exe")
DirCreate($c_folder)


В данном виде оно создает папку 3.3.8.1 , а нужно 3.3.8

Заранее благодарен з ответ!)
 

ildar

Осваивающий
Сообщения
252
Репутация
30
Если просто удалить 2 символа, то так
Код:
$c_folder = StringRight(FileGetVersion("AutoIt3.exe"), 2)
DirCreate($c_folder)
 
Автор
D

Delus1on

Новичок
Сообщения
8
Репутация
0
ildar - спасибо)
вот только не StringRight a StringLeft.

Код:
$c_folder = StringLeft(FileGetVersion("AutoIt3.exe"), 5)
DirCreate($c_folder)
 

AZJIO

Меценат
Меценат
Сообщения
2,891
Репутация
1,195
Delus1on
Delus1on сказал(а):
А если 3.3.10.0, то вернёт 3.3.1 ? Регулярное выражение сделать.
Код:
$sText = StringRegExpReplace(FileGetVersion(@AutoItExe), '(\d+\.\d+\.\d+).*', '\1')
MsgBox(0, 'Сообщение', $sText)
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
Варианты.
Код:
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
 
Верх