How to display progress messages

Collapse
This topic is closed.
X
X
 
  • Time
  • Show
Clear All
new posts
  • Ragtimer

    How to display progress messages

    I'm struggling my way through building an Access 2k application,
    learing how to do each step as I get to it .... in other words I'm
    pretty new at this ......

    I'm running a series of processes that update local tables from a data
    warehouse connected through ODBC, some of which are pretty time
    consuming, all as a result of the user clicking one button. I'd
    really like to display a list of the tasks that are being done and
    check each of them off as they're completed. It'd be cool to show
    something like the Windows Uninstaller's progress dialog, but
    whatever's achievable will satisfy me.

    Any help would be GREATLY appreciated. And please remember that I
    haven't been doing this for very long.

    Thanks!!!
  • (Pete Cresswell)

    #2
    Re: How to display progress messages

    RE/[color=blue]
    >I'm running a series of processes that update local tables from a data
    >warehouse connected through ODBC, some of which are pretty time
    >consuming, all as a result of the user clicking one button. I'd
    >really like to display a list of the tasks that are being done and
    >check each of them off as they're completed. It'd be cool to show
    >something like the Windows Uninstaller's progress dialog, but
    >whatever's achievable will satisfy me.[/color]

    Chuck's on the Good Right And Holy Path, but I use the status bar a lot.

    Like when running a series of queries or stored procedures.... I'll just update
    the status bar with a little message like "Rating Import: Getting raw rating
    data from JJK....", then "Rating Import: Checking ratings for matches against
    held securities..." and so-on and so-forth.

    Only two catches:
    - At startup time, make sure the status bar is visible
    - Don't forget to clear the status bar at the end.


    For processes that go through a number of iterations that can be at least
    roughly estimated in advance, of course I use SysCmd's InitMeter and
    UpdateMeter... But that's not going to work for something that's being done by
    the server unless you can write some sort of loop that gets updates from the
    server - which I haven't even thought about yet, much less attempted....
    -----------------------
    PeteCresswell

    Comment

    • Ragtimer

      #3
      Re: How to display progress messages

      I looked for the statusbar control (and the progressbar control) and
      see that they're ActiveX controls included with the MOD. I'm just
      running with the standard Office 2k Professional package.

      On Fri, 05 Sep 2003 00:20:40 GMT, "(Pete Cresswell)" <x@y.z> wrote:
      [color=blue]
      >RE/[color=green]
      >>I'm running a series of processes that update local tables from a data
      >>warehouse connected through ODBC, some of which are pretty time
      >>consuming, all as a result of the user clicking one button. I'd
      >>really like to display a list of the tasks that are being done and
      >>check each of them off as they're completed. It'd be cool to show
      >>something like the Windows Uninstaller's progress dialog, but
      >>whatever's achievable will satisfy me.[/color]
      >
      >Chuck's on the Good Right And Holy Path, but I use the status bar a lot.
      >
      >Like when running a series of queries or stored procedures.... I'll just update
      >the status bar with a little message like "Rating Import: Getting raw rating
      >data from JJK....", then "Rating Import: Checking ratings for matches against
      >held securities..." and so-on and so-forth.
      >
      >Only two catches:
      >- At startup time, make sure the status bar is visible
      >- Don't forget to clear the status bar at the end.
      >
      >
      >For processes that go through a number of iterations that can be at least
      >roughly estimated in advance, of course I use SysCmd's InitMeter and
      >UpdateMeter. .. But that's not going to work for something that's being done by
      >the server unless you can write some sort of loop that gets updates from the
      >server - which I haven't even thought about yet, much less attempted....
      >-----------------------
      >PeteCresswel l[/color]

      Comment

      • Patrick Finucane

        #4
        Re: How to display progress messages

        Ragtimer wrote:
        [color=blue]
        > I looked for the statusbar control (and the progressbar control) and
        > see that they're ActiveX controls included with the MOD. I'm just
        > running with the standard Office 2k Professional package.[/color]

        Check out http://www.attcanada.net/%7ekallal.m.../msaccess.html. Albert has
        a WordMerge download that contains a status bar and does what you want.


        Comment

        • Hank Reed

          #5
          Re: How to display progress messages

          I have a simple progress bar function that takes the number of records
          in the dataset and scales the bar automatically so you see record by
          record progress in a digital and analog display.
          Write to me directly if you want the code.
          Hank Reed hankrunner@aol. com

          Comment

          • (Pete Cresswell)

            #6
            Re: How to display progress messages

            RE/[color=blue]
            >I looked for the statusbar control (and the progressbar control) and
            >see that they're ActiveX controls included with the MOD.[/color]

            I didn't mean status bar, the control - just the status bar that's built in to
            the MS Access window.

            e.g.
            ------------------
            Sub statusSet(theMe ssage As String)
            debugStackPush mModuleName & ": statusSet"
            On Error GoTo statusSet_err

            ' PURPOSE: To provide a tool for setting the 'Status' line in the
            ' lower left of MS Access' window
            ' ACCEPTS: A free-form text message or an empty string
            ' SETS: Status bar at bottom of screen to contents
            ' of message or, if empty string, clears it

            Dim v As Variant

            If theMessage & "" = "" Then
            On Error Resume Next
            v = SysCmd(SYSCMD_C LEARSTATUS)
            On Error GoTo statusSet_err
            Else
            v = SysCmd(SYSCMD_S ETSTATUS, theMessage)
            End If

            statusSet_xit:
            debugStackPop
            On Error Resume Next
            Exit Sub

            statusSet_err:
            bugAlert True, ""
            Resume statusSet_xit
            End Sub
            --------------------------
            -----------------------
            PeteCresswell

            Comment

            • Ragtimer

              #7
              Re: How to display progress messages

              Thanks for that offer, Hank.

              Actually, I'd rather leave email out of it, so if you could post it as
              a response here I'd much appreciate it. But if you'd rather not and
              would prefer using email, I understand.

              Thanks again.


              On 5 Sep 2003 08:59:28 -0700, hankrunner@aol. com (Hank Reed) wrote:
              [color=blue]
              >I have a simple progress bar function that takes the number of records
              >in the dataset and scales the bar automatically so you see record by
              >record progress in a digital and analog display.
              > Write to me directly if you want the code.
              >Hank Reed hankrunner@aol. com[/color]

              Comment

              Working...