Save calculations

Collapse
X
 
  • Time
  • Show
Clear All
new posts
  • epp319
    New Member
    • Apr 2008
    • 6

    Save calculations

    Hi! i am i trying to make o vb program and i have a big problem.
    I have a combination of forms into i put some keywords and i transfer data from one form into an other (from text to text or from labels to texts). I have a command and when i press it, it makes all the work, all the calculations and completes all the tables i have to the forms. The problem is when i have finished i want to keep this calculations. i don't want to lose them and to make them from the begging. The program take the names of the soldiers of the army and put them to a table of tasks. I want to use this program weekly. Is there any solution? A save command?? Or i way to export the tables as it is designed to a word with a simply command??
    I Hope to hear news soon. . .
    Many thanks J.K.
  • kadghar
    Recognized Expert Top Contributor
    • Apr 2007
    • 1302

    #2
    Originally posted by epp319
    I want to use this program weekly. Is there any solution? A save command?? Or i way to export the tables as it is designed to a word with a simply command??
    I Hope to hear news soon. . .
    Many thanks J.K.

    The easier way to save progress is to save your variables in a text file, then read them when you load it.

    If you promess you'll be honest, the text file can have variables as they are, but if not, you'd beter use some cryptography.

    HTH

    Comment

    • epp319
      New Member
      • Apr 2008
      • 6

      #3
      is there a code to load the variables automatically or i have to put them one by one from the beginning??

      many thanks for your help

      Comment

      • epp319
        New Member
        • Apr 2008
        • 6

        #4
        is there a code to load the variables automatically or i have to put them one by one from the beginning??

        many thanks for your help

        Comment

        • epp319
          New Member
          • Apr 2008
          • 6

          #5
          is there a code to load the variables automatically or i have to put them one by one from the beginning??

          many thanks for your help

          Comment

          • epp319
            New Member
            • Apr 2008
            • 6

            #6
            is there a code to load the variables automatically or i have to put them one by one from the beginning??

            many thanks for your help

            Comment

            • epp319
              New Member
              • Apr 2008
              • 6

              #7
              is there a code to load the variables automatically or i have to put them one by one from the beginning??

              many thanks for your help

              Comment

              • BorlandDelphi
                Banned
                New Member
                • Mar 2008
                • 18

                #8
                Yes, gon on my FREE VB TOOLS and you will find how to SAve and OPen a *.txt FILES.

                BorlandDelphi

                Comment

                • kadghar
                  Recognized Expert Top Contributor
                  • Apr 2007
                  • 1302

                  #9
                  Originally posted by epp319
                  is there a code to load the variables automatically or i have to put them one by one from the beginning??

                  many thanks for your help
                  Well, there's not a magic code, but its quite simple. I'll write a little example where i define a couple of public variables, a Sub to save them and a Sub to load them:

                  [CODE=vb]dim Var1 as string
                  dim Var2 as string

                  sub SaveVars()
                  dim Lon1 as integer
                  var1 = inputbox("write Var1") 'you dont need this, is just for this
                  var2 = inputbox("write Var2") 'example not to have empty variables.
                  lon1 = freefile
                  open "C:\SaveGame.tx t" for output as #lon1
                  print #lon1, var1
                  print #lon1, var2
                  close #lon1
                  end sub

                  sub LoadVars()
                  dim Lon1 as integer
                  lon1 = freefile
                  open "C:\SaveGame.tx t" for input as #lon1
                  input #lon1, var1
                  input #lon1, var2
                  close #lon1
                  msgbox "your first variable is: " & var1
                  msgbox "your second variable is: " & var2
                  end sub[/CODE]

                  you can run the first sub to store a couple of words, then close your application, or turn off your computer, then run only the second sub to see how it works (make sure you turn on your computer again before this step).

                  HTH

                  Comment

                  • BorlandDelphi
                    Banned
                    New Member
                    • Mar 2008
                    • 18

                    #10
                    Hah, so many code, so many work. Insert my Free VB Tools - Easy Open and Easy Save *.ocx,add to the form and the work is finished

                    BorlandDelphi

                    Comment

                    • kadghar
                      Recognized Expert Top Contributor
                      • Apr 2007
                      • 1302

                      #11
                      Originally posted by BorlandDelphi
                      Hah, so many code, so many work. Insert my Free VB Tools - Easy Open and Easy Save *.ocx,add to the form and the work is finished

                      BorlandDelphi
                      So many code??
                      its a simple-one-line method to read/write
                      i dont know an easier way, but if you do, please share the code. it's always good to learn something new.

                      Otherwise, please read the site's terms of use

                      Comment

                      Working...