Códigos Fuente de Visual Basic

El objetivo de este programa fue crear un sistema de respaldo automatizado, aun no esta terminado el modulo de programación. El objetivo es que quede en la barra de tareas oculto previa programación de fecha.

Nuestra problemática era respaldar 150.000 archivos de audios mensualmente, conservando la misma estructura de carpetas del archivo de origen, como se usa para CALL CENTER. Los programas de audio necesitan esa misma estructura por lo tanto lo hice pensando en eso.

Por ejemplo: Si tienen una carpeta en el disco C:\musica\Electronica\XXXX.mp3

Al copiar o respaldar ese contenido a otro lugar, disco, pendrive, etc. El programa crea la misma estructura X:\Musica\Electronica\....

Muy útil para nosotros así todo queda igual a la original, con respecto a la eliminación, funciona advirtiendo 3 veces sobre el eliminado y cera los archivos. En mi caso asi lo usamos.

Se puede mejorar y compartan los cambios 100% operativo incluyo ejecutable e instalador para que puedan probarlo.

A_Lectura es un proyecto de hace muchos años, talvez unos 10 años atras.
Con el tiempo le he ido haciendo modificaciones (Ha ido evolucionando), hasta llegar a lo que es ahora.
En este proyecto el único control funcional de verdad es DbRichLectura, porque los demás al hacerles modificaciones y militarizaciones los deshabilite.
Esto me ha enseñado que un código ya creado se puede optimizar o actualizar hasta cierto limite; una vez llegado ese limite se debe crear un nuevo código desde cero pero basado en el punto final de la optimización del código original.
Así fue como hice con el control ActiveX DbRichLectura, el cual tiene 5 años o menos y desde el día en que lo crié no volví a hacerle modificaciones.
La lista de controles y formularios que le dejo de tarea para que los haga de nuevo funcionales, son: DbLectura, posiblemente LeerX, frmLecturaDelAyer.frm plataforma original de este proyecto, frmListasDeLectura.frm plataforma anterior a frmLecturaDelAyer.
Bueno hasta ahora esos.
Sin embargo, son funcionales en más del 95%.

En cuanto al control ActiveX DbRichLectura es 100% funcional.
Espero que pueda leer muchos libros con este proyecto, mejor dicho que pueda escuchar muchos libros.
DbRichLectura esta configurado con la velocidad estándar a la que yo escucho el texto (Máxima velocidad) pero usted puede reducirle la velocidad ya sea por medio de código o en modo usuario.

En estos años tuve muchos avances con este proyecto.
Tiene la capacidad de recordar las ultimas lineas que estaba leyendo de algún texto, la capacidad de posicionarse en donde había quedado la lectura justo cuando cerré el programa y previamente le dio guardar lectura.

Cambien combina la conccecion con una base de datos, el manejo de archivos *.rtf, archivos de texto y otras cosas más del almacenamiento en memoria.

El proyecto ahora es suyo, descargue-lo aquí, si llega a mejorar el proyecto o algunos aspectos del mismo, recuerde publicar esos avances aquí mismo en la Web Del Programador.

Se despide Rafael Angel Montero Fernández.

Proyecto A_GetAllDB.

Basado en códigos y ejemplos obtenidos de internet.
Incluyendo La Web Del Programador.
Yo le di nuevas habilidades y facilidades para el programador.
Este proyecto quiero compartirlo contigo programador programadora.

Tiene toda la libertad para modificar-lo a su gusto, darle nuevas capacidades.
Recuerde descargar el proyecto en la parte de descargas.

Este proyecto permite conectar fácilmente con bases de datos, realizar búsquedas entre tablas...

Ademas, incluye un proyecto exe estándar a modo de ejemplo como se puede usar A_GetAllDB.ocx.
El proyecto de ejemplo appObtenerFields también es un proyecto potente, robusto y avanzado.
De hecho me basé en appObtenerFields para crear o escalar junto con A_GetAllDB una nueva biblioteca capas de crear automáticamente consultas sql con solo seleccionar una tabla. Es la típica consulta SELECT Nombre_de_la_tabla...

Esto es muy emocionante, esperando que así se para usted.

Finalmente recuerde publicar los avances realizados con este y otros proyectos ya que la inteligencia grupal es mejor que la inteligencia individual así que en equipo o grupo podemos avanzar mejor.

Se despide Rafael Angel Montero Fernández.

Para conectarse a otras bases de datos fácilmente.
Siempre buscando la manera más inteligente, fácil, rápida para crear programas.
Sin quitarle el polimorfismo a los objetos.
Sin restricciones.

Puede modificar-lo y perfeccionar-lo y publicarlo de nuevo.

Esta librería yo la uso en casi todos mis proyectos.
Se usa en Asistente Ralfy (Un complemento de VB6) creado por mi.

Se usará en muchos ejemplos y proyectos que publicará en el futuro.

El asistente Ralfy vercion 1.0.136 puede introducir el codigo en el objeto seleccionado.
Si usted selecciono un class y llama al asistente, abrir una ventana para crear por ejemplo una propiedad.
Luego desde el panel principal del asistente introdujo el codigo pero antes cambia el foco hacia un form creyendo que al hacerlo, el asistente entonces, reaccionaria igual poniendo el codigo en el form al darle insertar.
No sucederá así.
Aunque haya seleccionado otra ventana u otro objeto, el asistente introducirá por ejemplo la propiedad creada en el class seleccionado en el momento en que se le llama.

Usted si gusta puede modificar o mejorar este defecto de mi asistente.
Yo lo veo como algo bueno pero también me gustaría que fuera flexible en esto.

En la anterior publicación había puesto vercion 200 porque no recordaba en cual vercion iba compilando este proyecto.

Hay mucho potencial en este proyecto, hay muchas cosas que se pueden mejorar, perfeccionar y hay mucho más que se le puede dar de habilidades a este asistente.


Atentamente Rafael Angel Montero Fernández.

Adding o asistente rápido, inteligente.
En modo diseño para que lo modifiquen a tu modo.
Te facilitará la creación de código, te evitará lo tedioso y repetitivo de vb6.

Compilarlo y el se registrará solo.

Hola les mando un soft para bares, esta hecho con VB6 & MySql, esta casi completo, le faltan detalles.
En la carpeta "OCX" estan los que usa el programa, hay un .BAS que te permite hacer scroll en el FlexGrid. Hay un archivo "restobar.sql", ahi esta la info para crear la base y la tabla en el servidor, yo
uso Apache AppServ en windows 7, en el BAS principal esta:


Ahi cambien el usuario y password.
Estoy sin laburo y para matar el tiempo escribo algo para no perder el training!, gracias.

Tres ejemplos básicos para mostrar el potencial de la programación en paralelo y las nuevas tecnologías.

Esta vez les comparto un simple programa en VB6 y otro en AI2 (compilados y proyectos) Cual es la idea de esto? es la de mostrar lo simple que resulta la integración de Android con VB6 que lo creen muerto? esta mas vivo que nunca en las mentes que superan sus limites. Esta todo lo necesario para que lo puedan modificar y hagan todo lo que quieran. Con este simple ejemplo henos desarrollado para nuestro sistema comercial una herramienta para Android que se puede acceder remotamente mostrando resúmenes, modificación de datos, etc. Todo esta en la imaginación de cada uno. Aclaro, con su cuenta de Google acceden a App Inventor 2 y desde allí importan el proyecto y lo pueden visualizar y modificar. Cualquier duda consulten

Algoritmo geneticon con 6 genes, es la vercion mejorada del algoritmo gentico con 4 genes.

Este proyecto es experimental a modo de demostracion que los algoritmos geneticos si funcionan.

'Autor Rafael Angel Montero Fernández. (Angel Continium ADNX)
'Fecha viernes 16 de septiembre del 2016.

'Despues de muchos intentos este es el primer algoritmo genético funcional al 100% que he diseñado basandome en la experiencia y conocimientos del tema y las practicas.
'El algoritmo si encuentra la solucion pero ahora la tarea que debo realizar es una función que lance la solucion encontrada la cual si llegará a nacer.
'Si sigo desarrollando y perfeccionando este algoritmo entonces, me permitirá crear una serie de programas muy interactivos y con la capacidad de aprender en forma interactiva similar a la de un bebe.

'Este algoritmo es totalmente funcional, se puede partir de aqui para crear nuevas variantes del algoritmo usando como estructura o base este mismo.
'Por ejemplo en la cimulacion de un vehiculo autonomo que trancita por un camino sin chocar contra otros objetos o bordes, aprendizaje interactivo con el usuario...
'Juegos de estrategia en la cual las unidades controladas por la computadora no realicen ataques suicidas sino que su comportamiento sea similar al de un ser humano.
'Busquedas no lineales de información sino, que en paralelo, por ejemplo divicion cilavica.


'Controles utilizados en este proyecto:
'9 controles Label, 9 controles ListBox, 2 controles TextBox, 3 controles CommandButton, 9 controles ProgressBar.
'Nombres para los controles Label: lbMejoresHabitantes,lbDesempeño, lbMutacion, lbReemplazo, lbFenotipoDecodificado, lbAdd, lbGenoma, lbFenotipoElegido, lbPoblacion.
'Nombres para los controles ListBox: lstGenoma, lstFenotipoElegido, lstMejores, lstRendimiento, lstMutacion, lstReemplazo, lstPoblacion.
'Nombres para los controles TextBox: txtAdd, txtFenotipo.
'Nombres para los controles CommandButton: cmdAdd, cmdEvolucionar, cmdEnd.
'Nombre para los controles ProgressBar: prgGenoma, prgFenotipoElegido, prgPoblacion, prgMejores, prgRendimiento, prgMutacion, prgReemplazo, prgIteracionesDo, prgGeneraciones.