Как конвертировать продолжительность ISO 8601 в TimeSpan в VB.Net?

Question

Существует ли стандартный метод библиотеки, который преобразует строку с длительностью в стандартном формате ISO 8601 Duration (также используется в XSD для его типа duration) в объект .NET TimeSpan?

Например, P0DT1H0M0S, который представляет продолжительность в один час, преобразуется в New TimeSpan (0,1,0,0,0).

Существует обратный преобразователь, который работает следующим образом: Xml.XmlConvert.ToString (New TimeSpan (0,1,0,0,0)) Вышеприведенное выражение вернет P0DT1H0M0S.

Answer 1

Это преобразует из xs: duration в TimeSpan:

System.Xml.XmlConvert.ToTimeSpan("P0DT1H0M0S")

См. http://msdn.microsoft.com/en-us/library/system.xml.xmlconvert.totimespan.aspx

Answer 2

Одно небольшое предостережение - XmlConvert.ToTimeSpan () немного забавен при работе с месяцами и годами. Класс TimeSpan не имеет членов месяца или года, возможно потому, что их длина варьируется. Однако ToTimeSpan () с радостью примет строку продолжительности со значениями месяца или года и предположения на длительности вместо того, чтобы выдавать исключение. Обратите внимание:

PS C:\Users\troll> [Reflection.Assembly]::LoadWithPartialName("System.Xml")

GAC    Version        Location
---    -------        --------
True   v2.0.50727     C:\Windows\assembly\GAC_MSIL\System.Xml\2.0.0.0__b77a5c561934e089\System.Xml.dll


PS C:\Users\troll> [System.Xml.XmlConvert]::ToTimeSpan("P1M")


Days              : 30
Hours             : 0
Minutes           : 0
Seconds           : 0
Milliseconds      : 0
Ticks             : 25920000000000
TotalDays         : 30
TotalHours        : 720
TotalMinutes      : 43200
TotalSeconds      : 2592000
TotalMilliseconds : 2592000000



PS C:\Users\troll> [System.Xml.XmlConvert]::ToTimeSpan("P1Y")


Days              : 365
Hours             : 0
Minutes           : 0
Seconds           : 0
Milliseconds      : 0
Ticks             : 315360000000000
TotalDays         : 365
TotalHours        : 8760
TotalMinutes      : 525600
TotalSeconds      : 31536000
TotalMilliseconds : 31536000000



PS C:\Users\troll>

Answer 3

Как сказал @ima dirty troll, TimeSpan всегда переводит годы как 365 дней, а месяцы как 30 дней.

TimeSpan ts = System.Xml.XmlConvert.ToTimeSpan("P5Y");
DateTime now = new DateTime(2008,2,29);
Console.WriteLine(now + ts); // 27/02/2013 0:00:00

Для решения этой проблемы вы должны добавить каждое поле отдельно чем использование TimeSpan.

DateTime now = new DateTime (2008, 2, 29);
string duration = "P1Y";
Regex expr = 
    new Regex (@"(-?)P((\d{1,4})Y)?((\d{1,4})M)?((\d{1,4})D)?(T((\d{1,4})H)?((\d{1,4})M)?((\d{1,4}(\.\d{1,3})?)S)?)?", RegexOptions.Compiled | RegexOptions.CultureInvariant);
bool positiveDuration = false == (input [0] == '-');

MatchCollection matches = expr.Matches (duration);
var g = matches [0];
Func<int,int> getNumber = x => {
    if (g.Groups.Count < x || string.IsNullOrEmpty (g.Groups [x].ToString ())) {
        return 0;
    }

    int a = int.Parse (g.Groups [x].ToString ());

    return PositiveDuration ? a : a * -1;

};
now.AddYears (getNumber (3));
now.AddMonths (getNumber (5));
now.AddDays (getNumber (7));
now.AddHours (getNumber (10));
now.AddMinutes (getNumber (12));
now.AddSeconds (getNumber (14));
Console.WriteLine (now); // 28/02/2012 0:00:00