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

Question

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

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

Существует обратный конвертер, который работает следующим образом:Xml.xmlconvert.tostring (новый временный проход (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, 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