From e6dd46da7b4ff4e557dc6743c07bbbb50ab9703f Mon Sep 17 00:00:00 2001 From: manuel Date: Fri, 26 Jun 2026 09:18:46 +0200 Subject: [PATCH] ' 26/06/2026 Se inicializa HoraControl --- My Project/AssemblyInfo.vb | 7 ++++--- baget/Aplicacion.nuspec | 2 +- ftp.vb | 2 +- 3 files changed, 6 insertions(+), 5 deletions(-) diff --git a/My Project/AssemblyInfo.vb b/My Project/AssemblyInfo.vb index b84eb1f..bb897a0 100644 --- a/My Project/AssemblyInfo.vb +++ b/My Project/AssemblyInfo.vb @@ -31,11 +31,12 @@ Imports System.Runtime.InteropServices ' mediante el asterisco ('*'), como se muestra a continuación: ' - - + + -' Cambios en la versión 3.0.0.0 +' Cambios en la versión 3.0.1.0 +' 26/06/2026 Se inicializa HoraControl ' 26/06/2026 Se controla todas las excepciones con tsl5.tsExcepcion y se añade HoraControl diff --git a/baget/Aplicacion.nuspec b/baget/Aplicacion.nuspec index 7f29d22..c5679a5 100644 --- a/baget/Aplicacion.nuspec +++ b/baget/Aplicacion.nuspec @@ -2,7 +2,7 @@ tsFluentFTP - 3.0.0 + 3.0.1 Tecnosis Tecnosis false diff --git a/ftp.vb b/ftp.vb index 7a4c8bf..44bd277 100644 --- a/ftp.vb +++ b/ftp.vb @@ -3,7 +3,7 @@ Imports System.Security.Authentication Imports System.Threading Imports FluentFTP Public Class ftp - Public Shared HoraControl As DateTime + Public Shared HoraControl As DateTime = Now Public Shared Function ObtenerFechaDeModificacion(Fichero As String, ServidorFTP As ServidorFTP) As Date Try Dim ftp As New FtpClient(ServidorFTP.Servidor, ServidorFTP.Usuario, ServidorFTP.Contraseña, ServidorFTP.Puerto)