miércoles, 20 de octubre de 2010

Cambio de blog

He decidido cambiarme a wordpress... asi que esta es la nueva dirección..

New Blog !!

lunes, 18 de octubre de 2010

Utilizando el namespace My

Bueno, una de las grandes ventajas (a mi parecer) para todos aquellos que desarrollamos con visual basic.net es la posibilidad de poder usar el namespace my para algunas tareas comunes como acceder a la información del equipo, operacion de entrada y salida de archivos y capertas, acceso a puertos, entre otras.

Aunque es posible usarlo tambien con C# referenciando la libreria Microsoft.VisualBasic.dll para el lenguaje visua basic .net digamos que es nativo...

Esta vez no explicare todo el código, ya que el uso es realmente sencillo, además que podemos extender este namespace para agregarle nuevas funcionalidades, lo cual hare en un proximo post... por el momento solo comentar que el ejemplo obtengo información del sistema, realizo operaciones comunes con archivos como abrir, crear, copiar y eliminar un archivo y por último accedo al folder de música, se cargan las canciones en un listbox y tenemos dos botones uno para escuchar y el otro para detener la canción, lo único a tener en cuenta es que las canciones deben ser de tipo wav (en un proximo post veremos como hacer un reproductor de mp3 de una manera bastante fácil).

Sin más les dejo el ejemplo con una cancion en formato wav, solo deben copearla a la carpeta de música predefinida... espero que les sea de utilidad !!

Descarga del ejemplo !!

jueves, 7 de octubre de 2010

Creando un servicio windows...

Primero que todo, voy a explicar de una manera muy coloquial lo que es un servicio windows. Un servicio windows es una aplicación cliente sin interfaz de usuario, la cual se ejecuta de manera "transparente" al usuario, generalmente un servicio windows se inicia con la carga del sistema operativo.

Se puede decir que un servicio windows es un proceso que corre en background. Un servicio windows es una aplicación que se ejecuta constantemente sin interacción con el usuario.

Un aspecto muy importante, es que para probar un servicio windows este debe estar instalado en el equipo, no es posible ejecutarlo simplemente con f5 como con una aplicación asp.net o de escritorio.

Bueno ahora si a lo q te truje..jajaja

1. Crear un prpyecto de servicio windows:
Bueno en mi caso tengo el vs 2010, asi que vamos a File > New Project > seleccionamos windows, luego windows service, le asignamos un nombre y por último damos clic en ok.



2. Luego que Visual Studio ha creado el proyecto, se muestra una pantalla azul con un texto en el centro, el cual ofrece dos posibilidades: a) Arrastrar objetos desde la barra de herramientas (toolbox) y b) cambiar a la vista de código, siendo está la opción a usar.

3.En la pantalla de diseño del servicio, dar clic en cualquier area limpia para poder mostrar en el panel de propiedades las propiedades del prpyecto, y en las propiedades cambiamos el nombre del servicio, y establacemos las propiedades CanPauseAndContinue y CanShutdown en true, estas propiedades indican si el servicio puede ser pausaso y reinicicado, y si puede ser detenido respectivamente.

4.Ahora para este ejemplo, se debe agregar como referencia el namespace System.Net.

Se da clic derecho sobre el nombre del proyecto y luego seleccionar Add reference...



5. Ahora si seleccionamos la opción cambiar a vista de código, y automaticamente se cambia al editor de código donde se visualizan dos métodos a) OnStart y b) OnStop.

Adicionalmenete vamos a adicionar el código necesario para sobreescribir los métodos a) OnContinue y b)OnPause.

Aunque se sobreentiede lo que realiza cada método, lo voy a mencionar:
a)OnStart: código a ejecutar cuando se inicia el servicio.
b)OnStop: código a ejecutar cuando se detiene el servicio.
c)OnContinue: código a ejecutar cuando se reinicia el servicio.
d)OnPause: código a ejecutar cuando se pausa el servicio.

Adicionalmente importamos el espacio de nombres System.Timers, System.IO, Imports System.Diagnostics.Process y Imports System.Text, luego creamos de manera global un objeto de tipo Timer.



6.Ahora en el constructor de la clase, instanciamos la variable timer y le pasamos como argumento el valor en milisegundos del tiempo de espera para realizar un nuevo evento.

Un objeto de tipo Timer realiza una acción cada cierto tiempo, así que se define el tiempo ente cada "pasada".

Luego adicionamos un manejador para el timer.

Public Sub New()
InitializeComponent()
oTimer = New Timer(8000)
AddHandler oTimer.Elapsed, New ElapsedEventHandler(AddressOf Me.oTimer_Elapsed)
End Sub

Luego en los 4 eventos antes mencionados simplemente iniciamos el timer o lo detenemos respectivamente.

Inciar/Reiniciar: oTimer.Start()
Detener/Pausar: oTimer.Stop()

7.Ahora creamos el método Elapsed del timer, debajo de donde dice Me.oTimer_Elapsed vemos una rayita roja, la cual indica que el método no esta definido, así que para aprovechar una de las nuevas características de visual studio 2010 nos paramos con el mouse sobre la linea, expandemos las opciones y seleccionamos generar método para....y visual studio on genera la definición del método:



8.Ahora lo interesante, la idea es q el servicio windows cada 8 segundos abra el explorador de internet en una página específica y genere un documento en el cual se guarde la hra y fecha de intento de acceso a internet.


Private Sub oTimer_Elapsed(ByVal sender As System.Object, ByVal e As ElapsedEventArgs)

        Dim sUrl As String = "http://jtodonet.blogspot.com/"

        Dim sTexto As New StringBuilder

        Dim sRuta As String = AppDomain.CurrentDomain.SetupInformation.ApplicationBase & "MyLog.txt"



        If My.Computer.Network.IsAvailable Then

            sTexto.AppendLine("FECHA: " & Now)

            sTexto.AppendLine("ESTADO DE RED: disponible")

            sTexto.AppendLine("----------------------------------------------------------")

        Else

            sTexto.AppendLine("FECHA: " & Now)

            sTexto.AppendLine("ESTADO DE RED: no disponible")

            sTexto.AppendLine("----------------------------------------------------------")

        End If



        Try

            Dim oTextWriter As TextWriter = New StreamWriter(sRuta, True)

            oTextWriter.WriteLine(sTexto.ToString)

            oTextWriter.Close()

        Catch ex As Exception

            EventLog.WriteEntry("MyWindowsService", "Error: " & ex.Message.ToString)

        End Try

    End Sub


Bueno aunque el post es sobre crear un servicio windows, explicare brevemente el código:
a) Se crea una variable que tenga la dirección de la página web.
b) Variable que almacenara los datos a escribier en el archivo
c) Variable que tiene la ruta para el archivo de texto
d) Se verifica si el pc tiene acceso a internet (Con el espacio de nombres My que veremos en un proximo post)
e) Se crean los datos para escribir en el archivo
f) Se intenta crear y escribir en el archivo
g) Se controla todas las posibloes execpcionesy se mandar al visor de sucesos (Lo trataré en un proximo post).

Ahora que ya tenemos todos, hacemos un build al proyecto y verificamos que todo este bien.

En mi caso obtuve el siguiente error:

'Sub Main' was not found in 'MyWindowsService.Service1', el cual me indica que mi servicio no tiene un punto de entrada, asi que doy doble clic sobre el error y selecciono el método:



Ahora que tenemos el servicio listo, vamos a crear un instalador para el servicio:

1. En la vista de diseño, sobre la parte azul damos clic derecho y seleccionamos Add Installer...



Y automaticamente en el Solution Explorer vemos un elemento llamado ProjectInstaller.vb y se carga la vista de diseño del mismo.

2. Ahora a configurar el ServiceInstaller:

a) StartType: Indica el modo de inicio del servicio, manual quiere decir que el servicio debe ser iniciado por el usuario (panel de control > servicios), automatico que el servicio se iniciará cuando se cargue el sistema operativo y deshabilitado. Vamos a dejarlo en automático.

b)Description: Descripción del servicio. Para nuestro caso "Mi servicio windows". Está serpa la descripción que se verá en panel de control > servicios

c)DisplayName: Nombre del servicio mostrado el panel de control > servicios. Para el ejemplo "MyService"

d)Account: Indica la cuenta que maneja el servicio. Para el ejemplo LocalSystem. [Esta opción la vemos al seleccionar ServiceProcessInstaller1]

Luego y ya para terminar adicionamos un proyecto de instalador a la solución y lo usamos para generar el instalador de nuestro servicio (en el proximo post lo explicare en forma detallada)

Descarga del ejemplo !!

miércoles, 29 de septiembre de 2010

Icono de notificación en Windows Form

Hola, muchas veces deseamos darle una mayor profesionalidad a nuestras aplicaciones, por ejemplo, implementar las nuevas funcionalidades de Windows 7, realizar una excelente interfaz con WPF, etc.

Sin embargo, una buena opción es realizar una aplicación la cual disponga de un icono de notificación al estilo de Windows Live Messenger o alguno de nuestros antivirus, y aunque este proceso es realmente sencillo, es raro que sea utilizado.. así que voy a mostrarles como poder usar un icono de notificación de una manera sencilla y bonita...

Lo primero es crear un proyecto de aplicación windows, le damos un nombre y lo primero que vamos a ver es un windows form en blanco, para el ejemplo vamos a usar este formulario.

A este formulario vamos a cambiarle los valores de algunas propiedades las cuales son:

Text: Icono de notificación
StartPosition: CenterScreen || Con esta propiedad lo que hacemos es que el formulario siempre se cargará en la parte central de la pantalla.
AutoSizeMode: GrowAndShirink || Con este valor lo que hacemos es bloquear la posibilidad de redimensionar el formulario.
Opacity: 75% || Hacemos el formulario medio transparente.
MinimizeBox: False || Quitamos el boton de minimizar.
MaximizeBox: False || Quitamos el boton de maximizar.
Icon: Aca vamos a establecer el icono que deseamos tenga el formulario en la barra de titulo.

Ahora vamos a agregar un par de controles al formulario para que no se vea vacio, así que nuestro formulario debe verse algo así:



Hasta ahora un formulario normal, ahora vamos a nuestro toolbox y agregamos un objeto de tipo NotifyIcon...



En este caso, cuando agregamos un objeto de tipo NotifyIcon, el cual se conoce como componente este no es visualizado sobre la superficie del formulario, al contrario lo vemos debajo del formulario, y allí es donde podremos ver todos los componentes (objetos que no son dibujados sobre la interfaz del formulario) como los cuadros de diálogo y en nuestro caso el NotifyIcon.

Para el notifyicon, en la propiedad icon establecesmo el icono que deseamos usar, y en la propiedad text el texto que se va a mostrar cuando el mouse este sobre el icono.

Sin embargo, hasta el momento nuestro icono de notificación no hace nada, ahora vamos a configurarle un menu contextual que debe aparecer cuando se de click derecho sobre el icono, para este efecto agregamos un objeto de tipo ContextMenuStrip, el cual se debe visualizar en la parte inferior del formulario.

Cuando seleccionamos el ContextMenuStrip, en la parte superior izquierda del formulario podemos ver nuestro menu, alli definimos las diferentes opciones que tendrá el menu.

Ahora para que nuestro menu sea diferente a lo que estamos aconstumbrados, en la propiedad BackgroundImage del contextmenustrip seleccionamos una imagen para el fondo del menu.

Por último en la propiedad ContextMenuStrip del NotifyIcon seleccionamos el contextmenustrip que hemos acabo de crear... y listo ya tenemos un bonito icono de notificación.

En la imagen podemos ver como se muestra el icono definido y el menu que hemos creado.



Espero que les sea de utilidad.

Descargar ejemplo !!

lunes, 9 de agosto de 2010

Leer pdf desde windows form

Hola a todos, bueno hoy quiero mostrarles como de una manera rápida podemos tener un lector de archivos pdf en nuestra aplicación windows, asi no necesitamos tener que lanzar un acrobat reader o algo parecido.

Bien, lo que vamos a hacer es acceder al componente COM del adobe reader y asi crear una instancia de el en nuestra aplicación...

Bueno manos a la obra, lo primero será crear un nuevo proyecto de tipo windows, asi el visual no generá un formulario por defecto... vamos a trabajar con este formulario, si desean pueden setear las propiedas como el tamaño, el título y demás características que deseen.

Ahora lo que vamos a hacer es en nuestro toolbox damos click derecho y luego seleccionamos elegir elementos...o en choose items si lo tienen en inglés...



luego se abrirá una ventana en la cual disponemos de varias pestañas, pero en este casp la que nos interesa en al pestaña que dice componentes COM (COM Components), y alli seleccionamos Adobe PDF Reader...



al seleccionar este componenete y dar clic en ok, debe aparecer en nuestro toolbox un objeto llamado Adobe Pdf Reader...



ahora solo debemos arrastrar nuestro nuevo objeto al formulario. Ahora lo que haremos sera darle la opción al usuario qiue pueda buscar un archivo y este sea cargado en el formulario, asi que ya han visto la interfaz (básica) que he diseñado, lo que voy a explicar será el code behind... como siempre en vb..

Primero instanciamos un nuevo objeto de tipo OpenFileDialog, este objeto nos permite hacer una búsqueda de archivos en nuestro equipo:

Dim oOpenFileDialog As New OpenFileDialog

Ahora en el load del formulario, vamos a limitar los tipos de archivo que podemos buscar estableciendo un valor para la propiedad filter de nuestro cuadro de diálogo, basicamente establecemos un nombre y le asociamos una extensión, en este caso .pdf:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
oOpenFileDialog.Filter = "Archivos PDF (*.pdf) | *.pdf"
End Sub

Ahora en el boton de buscar archivo, lo que hacemos es establecer la propiedad filtername a vacio, abrir el cuadro de diálogo y si el usuario selecciona archivo y presiona ok entonces mostrar la ruta del archivo en el cuadro de texto:

Private Sub ButtonArchivo_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonArchivo.Click
oOpenFileDialog.FileName = String.Empty
If oOpenFileDialog.ShowDialog() = Windows.Forms.DialogResult.OK Then
TextBoxFile.Text = oOpenFileDialog.FileName
End If
End Sub

Bueno, ahora que ya tenemos la ruta del archivo, por fin vamos a cargar el archivo pdf en el formulario, lo único que debemos hacer el al componente COM asignarle el archivo pdf con la función LoadFile, la cual retorna un true si el cargue ha sido exitoso y false en caso contrario, en esta caso simplemente mostramos un mensaje informando si ocurrio un error o si no:

Private Sub ButtonCargar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonCargar.Click
If ComPDF.LoadFile(TextBoxFile.Text) Then
MsgBox("Archivo cargado con éxito", MsgBoxStyle.Information, "Sistema")
Else
MsgBox("Ocurrió un error al cargar el archivo", MsgBoxStyle.Information, "Sistema")
End If
End Sub

Bueno y eso es todo, ya podemos ver nuestros pdf sin salir de nuestra aplicación.

Descarga el código de ejemplo !!

Nos vemos proximamente...

jueves, 5 de agosto de 2010

Autocomplete con Jquery

Hola a todos, el dia de hoy quiero mostrarles como gracias a JQuery podemos hacer un autocompletar en u textbox de una manera rápida y sencilla, y así poder ofrecer al usuario una mejor experiencia y nuestro webform será un poco más profesional.

En el ejemplo se hara una búsqueda de nombres en una lista genérica, la cual contiene unos nombres preestablecidos, la idea aquí sería llenar la lista con datos desde una base de datos, en esta caso lo único que cambiaría sería el llenado de la lista, lo demás será pracricamente igual, pero veamos como quedaría nuestro campo de texto cuando se encuentran coincidencias...



Ahora q vimos como se verá la función de autocomplete pues manos a la obra..

Lo primero será diseñar la interfaz de usuario, en este caso solo necesitamos un label y un textbox, luego referenciamos los scripts de jquery y jquery ui a nuestra página, es decir:


<script src="Scripts/jquery-1.4.2.js" type="text/javascript"></script>

<script src="Scripts/jquery-ui-1.8rc3.custom.min.js" type="text/javascript"></script>


Para nuestro ejemplo, como tenemos q hacer todo en codebehind, porque las conicidencias se deberián cargar de una base de datos (en el ejemplo usaremos una lista), entonces agregamos un scriptmanager a la página, y le establecemos la propiedad EnablePageMethods en true para poder acceder a la función que retorna las conicidencias ya que debemos comunicar el cliente con el servidor una forma de hacerlo es usando un WebMethod. Es decir, el control scriptmanager quedaria:


<asp:ScriptManager ID="ScriptManager1" runat="server" EnablePageMethods="true"></asp:ScriptManager>


Ahora, en nuestro codebehind vamos a declarar una función la cual hará la consulta a la lista de nombres y retornará solo aquellos q sean coincidentes con lo que el usuario va escribiendo en el textbox. Lo importante a tener en cuenta es que el método debe ser declarado como public shared y debe tener el atributo WebMethod(). Es decir, la función quedaria:


<WebMethod()> _

    Public Shared Function ObtieneNombres(ByVal sNombre As String) As Object

        Dim oListNombres As List(Of String) = New List(Of String)()

        oListNombres.Add("Julio Avellaneda")

        oListNombres.Add("Javier Alfredo")

        oListNombres.Add("Juan Manuel")

        oListNombres.Add("Jesus Alfredo")

        oListNombres.Add("Jose Manuel")

        oListNombres.Add("Luis Carlos")

        oListNombres.Add("Julieta")



        sNombre = sNombre.ToLower()

        If Not oListNombres Is Nothing Then

            Dim oNombres As Object

            oNombres = From nombre In oListNombres _

                        Where nombre = sNombre OrElse nombre.ToLower.StartsWith(sNombre) _

                        Select nombre



            Return oNombres

        Else

            Return Nothing

        End If

    End Function


Vamos a explicar la función:La funciñon recibe un parámetro de tipo String, este parámetro es lo que el usuario va tecleando en el textbox, ahora se crea una lista genérica de tipo string para almacenar los nombres de los usuarios, luego simplemente llenamos la lista (aquí sería el lugar en donde se llena la lista desde la base de datos), luego verificamos que la lista no este vacía para poder hacer la comparación y así mostrar los datos coincidentes.
Ahora, se declara una variable de tipo object, y a esa variable le asignamos el resultado de una consulta con linq hecha sobre la lista para poder consultar los items relacionados, la consulta de linq lo que hace es en la primera linea es especificar en donde vamos a realizar la búsqueda (en este caso en la lista creada), en la segunda línea especificamos las condiciones de búsqueda, en este caso donde almacenado en la lista sea igual a lo tecleado por el usuario o los items que comienzen por lo tecleado por el usuario, en la tercera línea le especificamos lo que deseamos mostrar, finalmente retornamos las coincidencias.

Ahora que vimos la lógica para traer las coincidencias, vamos a revisar como debemos trabajar en el cliente con jquery, nuestro script de jquery sería:


<script type="text/javascript">

         jQuery(document).ready(function () {

             $("#<%= TextBoxNombre.ClientID  %>").autocomplete({

                delay: 0,

                source: function (request, response) {

                    PageMethods.ObtieneNombres(request.term,

                            function (data) {

                                var nombres = (typeof data) == 'string' ? eval('(' + data + ')') : data;

                                response(nombres);

                            },

                            fnLlamadaError);

                },

                minLength: 1

            });

        });



        function fnLlamadaError(excepcion) {

            alert('Ha ocurrido un error al traer los nombres: ' + excepcion.get_message());

        }


Pero como funciona este código:
Lo primero es relacionar el plugin de autocomplete jquery con el textbox, luego comenzamos a definir las propiedades del plugin, delay hace referencia al tiempo en que tarde en aparecer las coincidencias, minLength especifica el número de caracteres minimos para poder comenzar a usar el autocomplete, source hace referencia a la fuente de valores en la cual se va a hacer la comparación, en nuestro caso hacemos un llamado al webmethod creado, para llamarlo usamos PageMethods., por último especificamos una función para informar al usuario mediante un mensaje sise produjo algún error al llamar a la función.

Bueno y eso es todo lo que debemos hacer para poder usar un autocomplete de jquery, en el ejemplo encuentran la hoja de estilo y los scripts de jquery... hasta un próximo post que espero no se tarde más de dos semanas !!

Descarga del ejemplo !!

sábado, 31 de julio de 2010

Crea un gif de loading

Hola, bueno solo quiero recomendarles esta buena página en donde podemos crear un gif de cargando con los colores que nos gusten, asi como podemos elegir si será con fondo transparente o no...

http://ajaxload.info/

Alli lo unico q hacemso el tipo de gif, luego si deseamos que tenga fondo transparente y por ultimo el color que deseamos tenga el gif...luego le damos generar y podemos ver el gif.. por último damos clic en download y listo.. tenemos nuestro gif !!