lopezatienza.es

Comentarios

En este artículo os muestro la forma de renombrar un archivo o una carpeta.
Read more »

Comentarios

En este artículo os muestro una función que se le pasa como parámetro un tipo String, que puede ser tanto una url (Ej: www.google.es) como un nombre de dominio (Ej: DOMINIO.COM), y devuelve una colección de String con todas las IPs asociadas a dicha url o dominio.

Read more »

Hola a todos.

Voy a explicar un ejemplo sencillo para leer y escribir en un archivo xml desde vb.net

Primeramente creamos un archivo con extensión xml. En este ejemplo vamos a trabajar con un archivo que guarda la hora y minuto de 2 horas diferentes.
Read more »

Hola a todos.

Me he visto en la necesidad de realizar un Split a una cadena de texto String, pero la primera sobrecarga del método Split (la que siempre he utilizado), únicamente funciona con un único caracter, por mucho que se le pase como parámetro una cadena de texto, te cogerá el primer caracter de la cadena.

La solución para poder hacerle un Split con una cadena de texto se encuentra en otra sobrecarga de este método.

String.Split Method (String(), StringSplitOptions)

Read more »

Hola a todos.

En este artículo voy a explicar cómo realizar una transacción desde Visual Basic .NET.

Esto es muy importante para poder dejar la base de datos en el estado original antes de realizar cualquier modificación, si ocurre algún error al ejecutar algunas sentencias DML, o por algún fallo del código de programación.

Hay que tener en cuenta que esto es necesario al realizar más de una sentencia DML, ya que las sentencias de inserción, modificación y borrado ya son Transacciones, y no tendría sentido introducir esta sentencia dentro de una Transacción.

Read more »

Hola a todos.

Me he encontrado después de debugar correctamente siempre dentro de un DoWork() de un BackgroundWorker, que de pronto los puntos de interrupciones (break-points) me dejaba el Visual Studio congelado unos segundos saliéndose a continuación, y no se realizaban las tareas que había a continuación del punto de interrupción, teniendo que reiniciar la depuración ya que bloqueo el formulario de mientras que se realizan estas tareas, y no se llega a desbloquear nunca.

Si deshabilito los puntos de interrupción dentro de la función DoWork(), todo va correcto, pero si vuelvo a ponerlo me pasa de nuevo lo mismo.

Read more »

Hola a todos.

En este artículo os paso una función para saber el número de bytes de un fichero, para ello utilizaremos la clase System.IO.FileInfo.

A esta función se le pasa la ruta del fichero, y devolverá un tipo Integer con el tamaño en bytes del fichero.

Read more »

Hola a todos.

En este artículo voy a explicar cómo detectar una combinación de teclas, y realizar una acción teniendo en cuenta que se pulse la combinación que deseamos.Primeramente deberemos cambiar la propiedad KeyPreview de nuestro formulario a True, para así determinar si los eventos de teclado para los controles del formulario se registren junto con el formulario.

A continuación vamos al evento KeyDown de nuestro formulario e introducimos el siguiente código:

Read more »

Hola a todos.

En este artículo voy a mostraros una forma de cancelar el evento CheckedChanged de un CheckBox, ya que el tipo EventArgs e no tiene e.Cancel, ni he encontrado una forma mejor de hacerlo.

Se trata de quitarle el manejador de evento CheckedChanged, para poder así cambiar el valor del tipo CheckBox sin que se produzca un bucle infinito, ya que si lo cambiamos en esta misma función se llamará indefinidamente y no tendrá fin.

Finalmente le establecemos de nuevo el manejador de evento.

Read more »

Hola a todos.

En este artículo voy a hablar del objeto System.Net.Mail.SmtpClient, y de cómo enviar correos de forma asíncrona (enviar correos en segundo plano), permitiendo que la aplicación quede libre para otras tareas.

Esta opción es indispensable si debemos enviar un gran número de correos, o si los Attachments del objeto MailMessage  tienen un peso considerable. He comprobado por experiencia que al realizar el envío por el método Send, si los Attachments tienen un peso alrededor de 5MB y 10MB, en ocasiones, incluso con una conexión a Internet óptima, salta una excepción de Timeout, no he llegado a probar con conexiones lentas, pero ya os vaticino que tendréis altas probabilidades de sufrir esta excepción.

Read more »

Hola a todos.

En  este artículo voy a tratar de explicar mediante un proyecto de ejemplo, cómo hacer para realizar acciones de forma asíncrona con un objeto BackgroundWorker, para liberar la aplicación y que se pueda seguir trabajando sin que se quede bloqueada.

Esto es interesante cuando se precisa copiar archivos, enviar correos y otras acciones que requieren su tiempo.

Read more »

Como sabemos cuando añadimos una referencia a un servicio WEB se nos añade en el fichero de configuración app.config una linea en la que se especifica la URL que el sistema usará para acceder al servicio WEB al ejecutarse.

Cuando creamos una aplicación que será distribuida en entornos distintos como puede ser intranet e internet, una posible solución sería hacer dos publicaciones de la misma de forma que una tenga las URL de servicios WEB para acceso via internet y la otra las URL para acceso via INTRANET.

Read more »

Hola a todos.

En este artículo voy a explicar cómo asignar un valor a un campo de parámetro de un Crystal Report.

Primeramente crearemos  un Campo de parámetro en nuestro rpt.

Ya en nuestro rpt, vamos al Explorador de campos y hacemos click con el botón derecho en Campos de parámetro, y pulsamos en Nuevo:

Read more »

Hola a todos.

En este post explico como darle la funcionalidad a un control linklabel (System.Windows.Forms.LinkLabel) para que funcione como en una página web, es decir, que se te abra con tu programa predeterminado gestor de correos.

Primeramente añadimos dicho control System.Windows.Forms.LinkLabel.

A continuación vamos a su evento LinkClicked y añadimos la siguiente funcionalidad:

System.Diagnostics.Process.Start( "mailto:direccion_correo@dominio.com" )

Un saludo y espero os sirva de ayuda.

Buenas a todos.

Aquí os dejo una clase para trabajar con Active Directory.

Entre otras funcionalidades se encuentran:

• Validar inicio de sesión de usuario.
• Modificar propiedades de usuario.
• Añadir / Quitar un usuario a / de un grupo.
• Crear cuenta de usuario.
• Habilitar / Deshabilitar cuenta de usuario.

Nota: Deberemos modificar tanto las variables globales a nuestras necesidades, como las propiedades de la variable interna dirEntry de la función GetDirectoryEntry()

Read more »

Aquí os dejo un proyecto realizado en Visual Basic.NET que trata de la resolución de cómo funciona este juego.

No se trata de una aplicación para jugar, sino muestro la lógica de este juego y cómo sería el algoritmo que se formula en cada turno, y que se aplique de forma recursiva.

Descargar código del proyecto

pass: lopezatienza.es

Aquí os dejo un proyecto en Visual Basic.NET que trata de acertar 6 números, y te va avisando en cada turno en la columna verde que números están en la posición correcta, en la columna naranja los números que no están en la posición correcta y en la columna roja qué números no forman parte de la combinación ganadora.

Descargar código del proyecto

pass: lopezatienza.es

Trabajar con archivos VBScript

Hay dos categorías principales de control de archivos:

• Crear, agregar o quitar datos y leer archivos
• Mover, copiar y eliminar archivos

Crear archivos

Hay tres formas de crear un archivo de texto vacío (algunas veces se le llama "secuencia de texto").

La primera forma es utilizar el método CreateTextFile. El ejemplo siguiente demuestra cómo crear un archivo de texto utilizando el método CreateTextFileMethod:

Read more »

Primeramente crearemos nuestro proyecto.

Añadiremos 2 TextBox llamados "textbox1" y "textbox2".

Añadiremos un Button llamado "button1"

Añadiremos el siguiente código a nuestro "Form1.vb"

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim act, res As Double

        Dim ant As Integer

        act = textbox1.Text

        ant = act - 1

        Do

            res = fact(act, ant)

            act = res

            ant -= 1

        Loop While (ant > 0)

        textbox2.Text = res

    End Sub

    Private Function fact(ByVal act As Double, ByVal ant As Integer) As Double

        fact = act * ant

    End Function

End Class

Asociar el evento Click del botón Button1 a la función Button1_Click o añade el código directamente.

Un saludo y espero que os sirva de ayuda.

Primeramente crearemos nuestro proyecto.

Le cambiamos el tamaño de nuestro Form1 a: 435; 320

Agregaremos 2 botones llamados "btnon" y "btnoff".

Agregaremos un PictureBox llamado "balon" con la imagen que queramos.

Agregamos un Timer al que llamamos "Timer".

Introduciremos el siguiente código a nuestro "Form1.vb"

Read more »