Adding Number for invoice

[allanmc10]

i have set up a invoice part to my program, but need to set up a number in my system for the invoice no(automatically)

 

[RebeccaLynn]

If you are wanting to increment the number each time, then just store the last number used in a file, BD, or registry. When making a new invoice retrieve the last number used, and add 1 to it, then store the NEW last number used.

Becca

Somtimes, the easy answer is the hardest to find.

Still under construction ...

http://webpages.charter.net/rlmsoft

 

[allanmc10]

hi Becca

roughly new to this game any chance of a sample bit of code, to help me on my way

rgrds

allan

 

[RebeccaLynn]

Writing to a file is probably the simplest way.

Public invoiceNumber As Int16
    Public invoiceFile As String = System.Windows.Forms.Application.StartupPath & "invoicenumber.txt"

    Public Sub openInvoiceNumber()
        Dim FN As Int16 = FreeFile()
        FileOpen(FN, invoiceFile, OpenMode.Input)
        Input(FN, invoiceNumber)
        FileClose(FN)
    End Sub

    Public Sub saveInvoiceNumber()
        Dim FN As Int16 = FreeFile()
        FileOpen(FN, invoiceFile, OpenMode.Output)
        Write(FN, invoiceNumber)
        FileClose(FN)
    End Sub

Becca

Somtimes, the easy answer is the hardest to find.

Still under construction ...

http://webpages.charter.net/rlmsoft

 

[Tarwn]

Read/Write File:

http://www.freevbcode.com/ShowCode.asp?ID=4492

Registry:

http://www.codeproject.com/vb/net/registry_with_vb.asp?df=100&forumid=15036&exp=0&select=621358

GUID:

http://www.freevbcode.com/ShowCode.asp?ID=2725

And a whole lot of MSDN videos:

http://msdn.microsoft.com/vbasic/atthemovies/dataandxml/default.aspx