diff --git a/ValidarDocumentoIdentidad.vb b/ValidarDocumentoIdentidad.vb
index 9a97720..aab87bf 100644
--- a/ValidarDocumentoIdentidad.vb
+++ b/ValidarDocumentoIdentidad.vb
@@ -123,29 +123,33 @@ Public Class ValidarDocumentoIdentidad
''' tal cual lo ha introducido el usuario para su verificación
Public Sub New(numero As String)
' Se eliminan los carácteres sobrantes
- numero = EliminaCaracteres(numero)
+ Try
+ numero = EliminaCaracteres(numero)
- numero = numero.ToUpper()
+ numero = numero.ToUpper()
- ' Comprobación básica de la cadena introducida por el usuario
- If numero.Length <> 9 AndAlso numero.Length <> 11 Then
- Me.EsCorrecto = False ' Throw New ArgumentException("El NIF no tiene un número de caracteres válidos")
- Else
+ ' Comprobación básica de la cadena introducida por el usuario
+ If numero.Length <> 9 AndAlso numero.Length <> 11 Then
+ Me.EsCorrecto = False ' Throw New ArgumentException("El NIF no tiene un número de caracteres válidos")
+ Else
- Me.m_numero = numero
- Desglosa()
+ Me.m_numero = numero
+ Desglosa()
- Select Case tipo
- Case TiposDocumentosEnum.NIF, TiposDocumentosEnum.NIE
- Me.EsCorrecto = CompruebaNif()
- Exit Select
- Case TiposDocumentosEnum.CIF
- Me.EsCorrecto = validateCif(numero)
- ' Me.EsCorrecto = CompruebaCif()
- Exit Select
- End Select
- End If
+ Select Case tipo
+ Case TiposDocumentosEnum.NIF, TiposDocumentosEnum.NIE
+ Me.EsCorrecto = CompruebaNif()
+ Exit Select
+ Case TiposDocumentosEnum.CIF
+ Me.EsCorrecto = validateCif(numero)
+ ' Me.EsCorrecto = CompruebaCif()
+ Exit Select
+ End Select
+ End If
+ Catch ex As Exception
+ Me.EsCorrecto = False
+ End Try
End Sub
#Region "Preparación del número (desglose)"
diff --git a/tsUtilidades.vbproj b/tsUtilidades.vbproj
index d1a4478..94d78e8 100644
--- a/tsUtilidades.vbproj
+++ b/tsUtilidades.vbproj
@@ -16,11 +16,12 @@
net8.0
tsUtilidades
net8.0, libreria
- 1.1.1
+ 1.1.2
Manuel
Tecnosis S.A
Utilidades Varias
+ - 2025-09-05 1.1.2 Correccion en ValidarDocumentoIdentidad
- 2025-09-04 1.1.1 Correccion en ValidarDocumentoIdentidad
- 2025-07-29 1.1.0 Se añade UtilsCert para manejo de certificados
- 2025-07-29 1.1.0 Se elimina función DescomponerCNsuscriptor de la clase crypt