Файл FTP, последний измененный VB.NET

Как получить дату изменения из файла на FTP-сервере в Visual Basic?

Это то, что я до сих пор:

Dim request = CType(WebRequest.Create(URL + ZipFile), FtpWebRequest)
request.Method = WebRequestMethods.Ftp.GetDateTimestamp

После этого я попробовал пару строк, но ни одна из них не вернула дату.

1 ответ

Решение

Ну, я понял это, но я оставлю это здесь, так как я не мог найти другие посты vb.net об этом:

Imports System.Net
Imports System.Globalization

Dim request = CType(WebRequest.Create(URL + ZipFile), FtpWebRequest)
request.Method = WebRequestMethods.Ftp.GetDateTimestamp
Dim response = CType(request.GetResponse(), FtpWebResponse)
Dim ServerDate = DateTime.ParseExact(response.StatusDescription.Substring(4,14),"yyyyMMddHHmmss",_
                                     Cultureinfo.InvariantCulture,DateTimeStyles.None)
Private Function ServerDateFile(FtpFullPathFile) As Date
        Dim request As FtpWebRequest = WebRequest.Create(FtpFullPathFile)
        request.Credentials = New NetworkCredential( YourFtpUserName, YourPassWord)
        request.Method = WebRequestMethods.Ftp.GetDateTimestamp

        Dim dLastModified As Date = Date.MinValue 'Change for your default value or nothing

        Try
            Using response As FtpWebResponse = request.GetResponse()
                dLastModified = response.LastModified                   
            End Using
        Catch ex As WebException
            MsgBox(ex.Message, vbCritical)
        End Try

        Return dLastModified
    End Function
Другие вопросы по тегам