Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: eszzes en 21 Noviembre 2008, 01:27 am



Título: necesito ayuda para un contador de facturas
Publicado por: eszzes en 21 Noviembre 2008, 01:27 am
lo que quiero hacer es q cuando se abra el formulario factura q directamente se ponga el nº de factura. q se fije la utima factura q se gardo y q le sume 1. yo hice asi pero tenia 2 facturas guardadas y cuando lo probe pense q me salio bien pero cuando agregue otra factura en la base de datos me sigue dando el mismo numero de factura q antes osea sigue dando "3" en vez de "4"
este es el codigo si se pueden fijar todo bien
Código:
factura_articulo.MoveNext
Do While Not factura_articulo.EOF
 txtnfactura.Text = factura_articulo("nº_factura") + 1
 Exit Do
Loop


Título: Re: necesito ayuda para un contador de facturas
Publicado por: seba123neo en 21 Noviembre 2008, 02:21 am
move el recorset al final, saca el valor de la factura.. y sumale 1...

saludos.


Título: Re: necesito ayuda para un contador de facturas
Publicado por: Angeldj27 en 21 Noviembre 2008, 15:09 pm
Como dice seba te funciona bien pero seria importante generar el numero de la factura cuando se balla a salvar la transaccion porque si bas atrabajar en entorno de red seria lo mas conveniente

Código:

factura_articulo.Recordset.MoveLast
txtnfactura.Text = Val(factura_articulo("nº_factura")) + 1



Título: Re: necesito ayuda para un contador de facturas
Publicado por: eszzes en 24 Noviembre 2008, 05:16 am
yo lo q hice fue esto
Código:
maximo = 0
 Do Until factura_articulo.EOF
   
    If factura_articulo("nº_factura") > maximo Then
        maximo = factura_articulo("nº_factura")
    End If
    factura_articulo.MoveNext
    Loop
    maximo = maximo + 1
    txtnfactura.Text = maximo

esta bien asi o puede ser q me tire error alguna ves? osea si ya lo empaqueto y todo eso