• Jueves 14 de Noviembre de 2024, 23:01

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - enterariel

Páginas: [1]
1
Visual Basic 6.0 e inferiores / Cargar Imagen en ListView segun el articulo
« en: Martes 1 de Febrero de 2011, 20:05 »
Hola amigos/as estoy creando un programatica de Restaurant. Lo que quiero hacer en un control ListView cargar los artículos con sus respectivos imagenes

Aca dejo una screen
http:/ /img832.imageshack.us/img832/9431/sinttulozas.png

Para ver el imagen tiene que unir las 2 barras "/", No se por que no se puede postear en el foro una imagen me dice que no tengo privilegios creo que tienen que cambiar este metodo asi para poder expresar mejor el problema.

Se como cargar las imágenes por como hago para asignar la imagen a tal articulo, por que este método lo que hace es asignar cualquier imagen al articulo.

2
Visual Basic 6.0 e inferiores / Odenar de esta forma en Visual Basic 6
« en: Martes 29 de Junio de 2010, 23:51 »
Hola de nuevo amigos estoy haciendo una aplicacion en VB6 con Base Datos Access y quiero ordenar un campo de esta forma

01.01.01
01.01.02
01.01.03
01.01.98
01.01.99
01.01.100
01.01.101
01.01.102 (este va ir subiendo puede alcanzar hasta mil)

a partir de aca cambia el 2do .01

01.02.01
01.02.02
01.02.03
01.02.98
01.02.99
01.02.100
01.02.101
01.02.102 (este va ir subiendo puede alcanzar hasta mil)

y así sucesivamente


Con este código de SQL de Access puedo hacer perfectamente (dentro de access).

Código: SQL
  1. SELECT *
  2. FROM tabla1
  3. WHERE (((ARTICULO) LIKE '*MUNDIAL*'))
  4. ORDER BY CInt(Mid([CODIGO],1,2)), CInt(Mid([CODIGO],4,2)), CInt(Mid(REPLACE(REPLACE([CODIGO],"(",""),")",""),7));
  5.  
  6.  
 

Pero al llevar en Visual Basic 6 me aparece este error

Error '3075' en tiempo de ejecucion:
Syntax error in string in query expresion

'Cint(Mid(Replace(Replace((P_Codigo),(',''),')',''),7))

Páginas: [1]