Mensajes

Hola saludos ¡

Estoy usando jqtransform para darle estilo a mis formularios, ademas 2 archivos de ajax.js. El problema es que todo funciona a la perfeccion, pero haciendo uso de jqtransform no hace nada el boton del submit cuando le doy click, si le quito el la referencia del jqtransform  ya funca.

¿Alguien sabe a qué se debe? 

Gracias.

Me autorespondo, llame la funcion de sumar divs desde otra accion y realiza lo que deseo.
Gracias y estamos por aqui  .

Hola gente. Tengo el siguiente code:

Código [Seleccionar] Expandir



//funciona suma subtotales
function sumatoria(){
r1 = document.getElementById('resultado').innerHTML;
r2 = document.getElementById('resultado2').innerHTML;
r3 = document.getElementById('resultado3').innerHTML;
r4 = document.getElementById('resultado4').innerHTML;
r5 = document.getElementById('resultado5').innerHTML;



//convertimos el string a flotante;
n1 = parseInt(r1);
n2 = parseInt(r2);
n3 = parseInt(r3);
n4 = parseInt(r4);
n5 = parseInt(r5);



res=(n1 + n2 + n3 + n4 + n5);

//contenedor de  la sumatoria
divResultado = document.getElementById('total');


//asignamos el resultado de la suma
divResultado.innerHTML=res;


}


Ahi no me suma todos los valores,cosa que necesito lograr,  solo suma el primero.
Alguien ha sumado los textos o captions de una etiqueta o DIV ?
Gracias por sus sugerencias. 

Nota: si hago un alert(res);

antes de

divResultado.innerHTML=res;

si coloca la suma con el resultado correcto, ¿a qué se deberá?

Hola un saludo a todos¡

Alguien sabe cómo enviar un formulario sin resetear los valores que hay en el?
Estoy haciendo un cotizador de precios en php, usando ajax, pero manejor varios combos y no logro controlar los 10 combos anidados que manejo.
Ejemplo de lo que deseo lograr: http://www.telecable.net.mx/cotizador.aspx

Gracias, estamos por aqui intentando.   

Mmm yo buscaria antes de pedir ayuda, porque hay varios ejemplos posteados por leandro ascierto, para el vb6, y en .Net postie un ejemplo del uso de SkinCrafter obviamente con el source.

Saludos.

Podria ser que esté buscando tal licencia en una comparacion con el hardware de la pc, hd,procesador,teclado, etc.
Se me ocurre eso, o bien mira tu hw y el de las otras pc's donde funciona.

Espero ayude en algo, voy a preguntarle al señor Google 

Hola saludo a todos¡

Hace un tiempo realice un sistema en  vb.net, en el cual utilice la libreria para impresion de tickets que se encuentra aqui http://foros.hackerss.com/lofiversion/index.php/t2092.html.

Ahora he tratado de utilizarla en vb6, ya la registre, la agregué en las referencias del proyecto, pero al momento de crear instancias de la clase, no encuentra un punto de entrada.

¿Alguien sabe por qué? o bien, si alguien tiene un método de impresión de tickets le agradecería si lo comparte  

Gracias. Luison

[ColumnWidth]

Caballeros, gracias por leer el post, acabo de solucionar mi problema, al parecer, al registrar los ocx y dll que vienen con el control, se registraron con error, pues no me aparecia la propiedad ColumnWidth, con la cual solucioné el detalle.

Gracias. Luison 

['AutoWidthColumn']

Hola saludos¡

Para los que han usado el S-Grid  aun no encuentro la forma de aisgnarle un width a las columnas, hasta ahora he venido utilizando la propiedad  'AutoWidthColumn', pero esto solo pone el width de acuerdo al contenido devuelto en el recordset para cada celda. El detalle es que a veces el nombre del encabezado no es legible cuado el contenido de la celda es pequeño, ejemplo:

Codigo de Barras    Descripcion
        1                     Ego de Brut

Ahi el AutowidthColumn del codigo de barras es 1, y no es legible el encabezado.

Será que no se puede asignar una ancho de columna como en el Listview estandar del vb o no logro encontrarlo?   

Espero me haya explicado, enseguida viene el code que estoy manejando:

Código (vb) [Seleccionar] Expandir


Public Function LoadServicios()
    On Error GoTo Error_Handler
   
    ' -----------------------------------------------
    ' -- Crear nuevo recordset
       Dim rs As New Recordset
    ' -- Cargar la tabla
    ' -----------------------------------------------
       
        Set rs = Conexion.Execute("Una consulta cualquiera'")
               
       If rs.EOF = False Then
        Dim iCol   As Integer
        ' -- Setear Grid
        ' -------------------------------------------
        With vbGrid
        .Clear True
            '.ImageList = vbalImageList2
             .GridLines = True                       ' -- Mostrar Lineas divisorias
             .RowMode = True                         ' -- Seleccionar fila completa
             .HotTrack = False
            ' -- Deshabilitar Redraw para agilizar la carga
              '.AlternateRowBackColor = vbButtonFace
             .Redraw = False
            DoEvents
           
            ' -- Agregar columna para el icono del producto ( Hacerla fija -- Valor FixedWidth)
            ' ----------------------------------------
            '.AddColumn "icono", "", , , 34, , True
           
            ' -- Agregar columnas al Grid - Caption, la clave
            ' ----------------------------------------
            For iCol = 0 To rs.Fields.Count - 1
                 Call .AddColumn(rs(iCol).Name, rs(iCol).Name)
                 '.ColumnWidth = 50
                 
               
            Next
           
            ' -- Recorrer el rs
            ' -----------------------------------------
           Do While Not rs.EOF
                ' -- Nueva fila
                .AddRow
                ' -- Cargar la primer celda -- El icono
                'Call .CellDetails(.Rows, .ColumnIndex("icono"), , DT_CENTER, 0)
                ' -- recorrer las demás celdas
                For iCol = 1 To .Columns
                    ' -- Comprobar que el dato no sea un Null
                    If Not IsNull(rs(iCol - 1)) Then
                        ' -- Agregar el dato
                        Call .CellDetails(.Rows, .ColumnIndex(rs(iCol - 1).Name), rs(iCol - 1))
                        .AutoWidthColumn (iCol)
                    End If
                Next
                ' -- Alto de filas = al del icono + 4 pixeles
                ' .DefaultRowHeight = 4 'vbalImageList2.IconSizeX + 4
                ' -- Siguiente registro
                rs.MoveNext
            Loop
            ' -- Importante !! Habilitar nuevamente el Redraw
            ' --------------------------------------------
            .Redraw = True
             DoEvents
        End With
        'consulta = ""
       
        Else
            'msj "¡ NO SE ENCONTRO INFORMACION !"
            'txtDato.Text = "": txtDato.SetFocus
            Exit Function
        End If
        ' -- Cerrar
        rs.Close
        Set rs = Nothing
        ' -- Errores
        Exit Function
Error_Handler:
        MsgBox Err.Description, vbCritical, "Error al Cargar Servicios"
End Function



Ejecutar como administrador, hay un par de ejemplos en pscode.com, alguna vez lo encontré en vb6, nadamas seria cuestion de hacer la conversion a vb.net.

Ahora, me interesan algunas cosillas que mencionas. Espero que puedas compartir esa información por aqui, o subir los ejemplos.
Estoy desarrollando 2 aplicaciones que manejan cashdrawer y Miniprinters.

Saludos, Luison