Что нового

функция преобразования любой даты к формату стандартных функций

Shinoby

Новичок
Сообщения
81
Репутация
2
AutoIt: 3.3.8
Версия: 1.0

Категория: Вспомогательные функции

Описание:
Преобразует любой формат даты (только числовое представление, с одинаковыми разделителями) к формату с которым работают стандартные функции AutoIt

Код
Код:
#include <String.au3>

; ============================================================================================
; Имя функции : _RightDate
; Описание    : преобразование даты любого формата в приемлемую для обработке в autoit
; Синтаксис   : _RightDate($datam, $sep, $dpl, $mpl, $ypl)
; Параметры   : $datam - дата в исходном виде (текст)
;                       : $sep - разделитель между годом, днем и месяцем. должен быть одинаковым (текст)
;                       : $dpl - позиция дня в исходной дате (число 1-3)
;                       : $mpl - позиция месяца в исходной дате (число 1-3)
;                       : $ypl - позиция года в исходной дате (число 1-3)
; Возвращает  : Успех   -  дата в формате "год/месяц/день"
;             : Неудача - 0 
; Автор       : Shinoby
; 
; ============================================================================================
Func _RightDate($datam, $sep, $dpl, $mpl, $ypl) 
	;; вводится: строка с датой, разделитель между данными, позиция дня, позиция месяца, позиция года
	$aArray1 = _StringExplode($datam, $sep)
	If UBound($aArray1) <3 Then Return(0)
         For $ii = 0 to 2
		Select
			Case $ii = $dpl - 1
				$day = $aArray1[$ii]
			Case $ii = $mpl - 1
				$mont = $aArray1[$ii]
			Case $ii = $ypl - 1
				$year = $aArray1[$ii]
		EndSelect
	Next
	If $year < 2000 Then $year = $year +2000
	Return($year & "/" & $mont & "/" & $day)

EndFunc

Файл:

Снимок:

История версий:

Источник: autoit-script.ru
Автор(ы): Shinoby
 
Верх