Sección de código fuente Visual basic

Programa - Buscador Mp3

Este es un programa con el código fuente que permite buscar archivos Mp3 en internet y descargarlos en forma asincrónica con el método AsyncRead de los controles de usuario de visual basic, y de esta forma poder realizar las descargas de los archivos en forma simultánea.

Las opciones que tiene el programa son

Se puede buscar utilizando tres directorios de internet: mp3realm.org , playlist.com y mp3000.net
Contiene una pantalla para presentar los resultados con la lista de Mp3, en otra pantalla las transferencias actuales, y en una tercera las descargas completas
Poder cancelar y reiniciar las descargas , pero no permite ponerlas en pausa.
Visualizar un ícono para cada estado del archivo mp3: En Espera, el que se está descargando, un ícono con error, y el archivo finalizado.
Mostrar el porcentaje de transferencia , el tamaño y la duración para cada descarga.
Reproducir el Mp3 haciendo doble clic en el archivo usando la función de windows MciExecute, o con el reproductor predeterminado que se tenga instalado en windows.
Obtener información Mpeg para el Mp3 : valor del Bitrate, la frecuencia, la versión mpeg, y otros.
Recuperar información de los tags : Soporta IDv3 versión 1 y versión 2 . También se pueden editar los tags, y eliminarlos en forma automática al descargar, o eliminarlos en forma manual.

Créditos del código fuente

Mathias Kunter : Por el módulo de código ( Mp3info.bas ) que permite leer y acceder a los tags. Nota. El módulo de código es parte de un programa open source escrito en Visual basic que se puede descargar gratuitamente desde este enlace : Magic Mp3 tagger
Leandro Ascierto : Por el módulo CSubClassListview para hacer un hook a los controles Listview y modificarles los encabezados mediante skins, y también por el módulo cSubClassToolBar para aplicar Skin a la barra de herramientas.
Paul Caton : Por el módulo de código c_Timer
Sitio web vbnet.mvps.org : Por una función que usa la Api de windows UrlCanonicalize, para convertir las secuencias de escape de las direcciones URL : Ejemplo

Descargar

04/11/2008

Descargar código fuente del programa.

Usando un archivo Manifest.

Este es el mismo proyecto, pero sin los estilos, es decir usando los controles de Visual basic CommandButton en ves del control de botones, y también sin los módulos de clase para subclasificar el ListView y la barra de herramientas.

Descargar

Actualizado ( 06/11/2008 )

Se agregó una opción para copiar los archivos finalizados a una carpeta ( los del listview lvFiles )
Opción para resaltar y remarcar los items en el listview de búsqueda ( lvFind), cuando se vuelve a buscar y los mp3 ya se encuentran en la opción de transferencias.
Se arregló la opción "Eliminar archivos con error", que en algunos casos no los quitaba de la lista.
En el proyecto sin skin, se agregó un control picturebox en ves de un control Frame, para que los controles label de la información mpeg, no parpadeen cuando se use un archivo manifest para tomar la apariencia de los temas de windows.
Opción para ordenar los archivos por la hora, al hacer clic en un encabezado de columna, ya que al cambiar el orden en otra columna, se pierde la referencia de cuales son los últimos archivos que se van agregando.

Descargar con skin

Descargar sin Skin

Capturas de pantalla del buscador

Pantalla para buscar

Pantalla para descargar, reproducir, ver la información de cada transferencia ( el tiempo de duración, el tamaño, bitRate, frecuencia), editar los tags( título, álbum, artista, track etc ..)

Notas

Referencias, Activex, dll:

El programa no utiliza Ocx ni Activex, solo usa una sola referencia y es el archivo WinSubHook2.tlb que lo requiere el módulo de clase cTimer.

Errores

El programa contiene algunos errores. Por ejemplo puede que se vuelva inestable si se agregan muchos archivos de descarga al mismo tiempo. Otro error, es que al buscar utilizando el directorio mp3000.net, en algunas ocasiones es necesario volver a refrescar la búsqueda, ya que si no el archivo que se intente agregar para descargar, lo marque como error.

Buscar en Recursos vb