lopezatienza.com

Buenas a todos.

El problema proviene al tratar de conectar a una Base de Datos de SQL Server 2008 desde Visual Studio 2005, mostrando el emergente:

"Esta versión del servidor no es compatible. Debe tener instalado Microsoft SQL Server 2005 Beta 2 o posterior"
Read more »

Buenas a todos.

Os muestro una función para comprobar la fuerza de una contraseña.

Se comprueba que la contraseña tenga una longitud de 8 caracteres, que al menos uno de ellos sea minúscula, una mayúscula, un número y un carácter especial:

Private Function IsStrongPassword(ByVal password As String) As Boolean
     Dim upperCount As Integer = 0
     Dim lowerCount As Integer = 0
     Dim digitCount As Integer = 0
     Dim symbolCount As Integer = 0

     For i As Integer = 0 To password.Length - 1
          If [Char].IsUpper(password(i)) Then
               upperCount += 1
          ElseIf [Char].IsLetter(password(i)) Then
               lowerCount += 1
          ElseIf [Char].IsDigit(password(i)) Then
               digitCount += 1
          ElseIf [Char].IsSymbol(password(i)) Then
               symbolCount += 1
          End If
     Next

     Return password.Length >= 8 AndAlso upperCount >= 1 AndAlso lowerCount >= 1 AndAlso digitCount >= 1 AndAlso symbolCount >= 1
End Function

Un saludo.

Autor: Antonio Lopez Atienza

Buenas a todos.

En este artículo voy a explicar cómo cerrar aplicaciones de manera explícita, como si las cerráramos desde el Administrador de tareas.

For Each p In Process.GetProcesses()
     If Not p Is Nothing Then
          If p.ProcessName.ToString = "NombreAplicacion" Then
               Try
                    p.Kill()
                    Exit For
               Catch ex As Exception
                    MsgBox(ex.Message.ToString, MsgBoxStyle.Critical)
                    Exit Sub
               End Try
          End If
     End If
Next

Un saludo.

Autor: Antonio Lopez Atienza

Buenas a todos.

En este artículo voy a explicar cómo asignar una imagen de fondo a un Formulario en tiempo de ejecución, accediendo para ello a la propiedad BackgroundImage del Formulario.

Para ello por ejemplo podemos escribir el código en el Load del formulario, añadiendo la siguiente línea:

Me.BackgroundImage = New System.Drawing.Bitmap(Application.StartupPath & "\ImagenNueva.png")

Un saludo y espero os sirva de ayuda.

Autor: Antonio Lopez Atienza

Comentarios

Al tratar de Obtener un proyecto o solución del Control de Código Fuente SouceSafe, éste se obtiene de manera correcta, pero al intentar abrir el sln nos aparece la siguiente ventana:

Read more »

Comentarios

En este artículo explico la forma de convertir un tipo System.Drawing.Image a un Array de Bytes.

Read more »