A veces a los botones hay que ponerles una imagen bonita para hacerlo más llamativo o fácil de reconocer y ahí es cuando perdemos el tiempo buscando alguna que sea significativa para la acción que realiza Aquí les traigo una colección de botones típicos para usarlos cuando manejes datos desde un motor de base de datos :D Están en un proyecto en Visual Basic 6.0 listo para abrir y copiar Archivos adjuntos [download id="955"]
Este es un ejemplo de Uso de ADO y DAO en Visual Basic 6.0 con Clases del tipo Recordset. Hace las operaciones básicas de edición, grabación , nuevo sobre una base de datos hecha en Access 2000 (db.Provider = "Microsoft.Jet.OLEDB.4.0") Con esto puedes aprender lo básico para el manejo de datos conectándose a un sistema de motor de base de datos Archivos adjuntos [download id="951"] [download id="953"]
Este código es super sencillo :D, solo recuerda que debe existir la referencia a la librería del ADO Option Explicit Dim WithEvents Rs As Recordset Y tu variable Rs tendrá eventos como si fuera un control pegado en el formulario, puedes hacer esto con todas las variables tipo objetos (y que tenga eventos) Private Sub rs_EndOfRecordset(fMoreData As Boolean, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset) End Sub Private Sub rs_FetchComplete(ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset) End Sub Private Sub rs_FetchProgress(ByVal Progress As Long, ByVal MaxProgress As Long, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset) End…
Hola a todos Muchos programadores usan cualquiera de estos controles para mostrar una imagen, (usualmente el que esta mas cerca del puntero mouse) pero existe una gran diferencia entre ambos Si tu intensión es solo mostrar una imagen y nada mas, usa el control imagen que es muy ligero, no tiene muchos eventos y para eso fue creado, para mostrar imagen, incluso tiene una propiedad que no tiene el PictureBox, la de Stretch que es obligar a la imagen a tener el tamaño de nuestro control El PictureBox es un contenedor (como el Frame) y es más para dibujar que…
Con este código podrás llenar una hoja de Microsoft Excel usando un Recordset, lo que se hace es abrir el EXCEL, manipular las celdas como si fuera código VBA (Visual Basic for Aplication), es decir, como una MACRO, y luego grabarlo y cerrarlo. en el siguiente código ya asumo que tienes un Recordset con datos listos para ser pasado a la hoja de calculo. Hacer referencia a Microsoft Excel Objetc Private Sub LlenaExcel() Dim prgExcel As Excel.Application Set prgExcel = New Application prgExcel.Workbooks.Add prgExcel.Sheets(1).Name = "Prueba" Dim i As Integer Dim j As Integer j = 1 Do While Not…
Esta función les va a servir un montón cuando tengan que hacer filtros ya sea con la propiedad filter del RecordSet o haciéndolo en consulta Solo tienen que pasarle como parámetros lo que va a buscar Ejemplo: FiltroMultiple "Juan Pérez","Nombre" Y les va a crear el Filtro así: Nombre like '%Juan%' and Nombre like '%Perez%' Private Function FiltroMultiple(strCadena As String,strCampo as String) As String Dim strFiltro As String Dim Posicion As Byte While Len(strCadena) > 0 Posicion = InStr(2, Trim(strCadena), " ") If Posicion = 0 Then FiltroMultiple = strFiltro & strCampo & " like '%" & ReemplazaComilla(Trim(strCadena)) & "%'"…
Bueno, parece que tendré que seguir usando el formato de [de que trata] - [que hablo] para seguir posteando :D Quiero comenzar a hacer pequeñas aplicaciones para que entiendan más o menos como es el asunto de la programación, pero primero considero que deben saber lo que a continuación les voy a postear: Comprender propiedades, métodos y eventos Todos los objetos en el lenguaje de Visual Basic (y en casi todos los lenguajes Visuales), incluidos los formularios y controles, tienen sus propias propiedades, métodos y eventos. Las propiedades pueden considerarse como los atributos de un objeto, los métodos como sus…
Muchos programadores tienen problemas al hacer consultas a campos de tipo Fecha por una sencilla razón: La Fecha en formato Peruano (y en otros países) es dd/mm/yy y en formato americano es mm/dd/yy. Si haces la siguiente consulta, suponiendo que la fecha actual es 03/05/07 (3 de Mayo del 2007) Rs.open "Select * from ventas where fecha=' & Now & ' " Si nuestra PC tiene el formato dd/mm/yy, y el motor que usemos (Access,SQL SERVER) tiene su configuración de formato en mm/dd/yy no vamos a tener los resultados que esperamos. Otro problema que se puede dar es que muchos…
Para aquellos que hacen sentencias SQL en MySQL y no les sale el TOP, es porque en ese Motor no existe esa función :D, lo que existe es el LIMIT y se usa de esta manera Si tu consulta original es: Select Top 10 * from ventas su equivalente para que funcione en mysql es: select * from Productos LIMIT 10 No he probado si el LIMIT tiene el mismo problema que el TOP en caso de EMPATE, supongo que si porque no puede excluir a uno de los registros empatados
Hay un error que siempre veo que comenten los novatos, ya sea al hacer un software, una pagina WEB e incluso algún batch en D.O.S o Linux U_U y es el usa "rutas Absolutas" una ruta absoluta es cuando haces referencia a un archivo con una ubicación especifica e inamovible, un ejemplo en HTML de ruta Absoluta, asumiendo que el HTML esta en la RAIZ (y se llama index.html) <img src="http://www.elcodigofuente.com/imagen/imagen_prueba.jpg" alt="" /> haciendo el código de arriba, indicamos que siempre va a buscar esa imagen (imagen_prueba.jpg) en esa ruta... si cambiamos de hosting, o movemos el archivo a una…