Как загрузить последний XML-файл и поместить в набор данных vb.net - PullRequest
Новая
       24

Как загрузить последний XML-файл и поместить в набор данных vb.net

0 голосов
/ 17 февраля 2012

Я снова застрял.Пожалуйста, помогите, если кто-нибудь из вас может.Я действительно ценю это.

Я создаю XML-файлы и загружаю их снова.Я использую этот следующий код для записи XML в папку.код ниже установит дату и время в имени файла.и этот код работает нормально. 

    Dim filename As String = Server.MapPath("XML\" & SESSIONid & "_" & Replace(timenow, ":", "-") & ".xml")
    dSetPupil.WriteXml(filename, True)

Опять же, я хочу загрузить последний XML-файл обратно и поместить в набор данных.Я обычно пишу код вроде 

    Dim dSet as new DataSet = ReadXml(Server.MapPath("AAA.xml")

Но как мне найти последний xml-файл и прочитать его?

Большое спасибо.Надеюсь, вы, ребята, хорошего дня.

1 Ответ

1 голос
/ 17 февраля 2012 
Dim strLastXmlFileWritten As String = String.Empty

Dim lstFiles As List(Of IO.FileInfo) = New IO.DirectoryInfo(Server.MapPath("XML\")).GetFiles().ToList()

Dim dteCreated As Date = DateTime.MinValue

For Each objFile As IO.FileInfo In lstFiles

    If objFile.CreationTime > dteCreated AndAlso _
       objFile.Extension = ".xml" Then

        dteCreated = objFile.CreationTime
        strLastXmlFileWritten = objFile.FullName

    End If

Next
...