🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.databases.ms-access
Article #377

Re: Help, I need an answer, can you, the expert help???????

#377
From: Kurt Johnson
Date: Sun, 16 Aug 1998 00:00
164 lines
8145 bytes
This is a multi-part message in MIME format.

------=_NextPart_000_010E_01BDC8AD.EC15F000
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

Jay wrote in message <6r2euf$a89@news3.force9.net>...
>Can nobody in the .net universe answer this question???
>I am a first time user of these 'ere newsgroups and i thought they =
might be
>somebody out there who can answer this........
>I have a problem that I hope somebody out there can solve.....
>I am transferring data into an Access 95 database from a text file =
which is
>held on my server.
>I have a macro set up that does the job effectively, but I want to make =
it a
>bit more user friendly.
>Currently at the beginning of the Macro I have set the systems warnings =
to
>'off', I have now written some code to carry out the import procedure, =
I now
>want to add a splash screen to show the progress of the importation.
>What can I use to gauge the time left i.e. the Growrate?
>i.e. on the click event of the import button to DoCmd.OpenForm
>"frmTimeIndicator" and graphically show the amount of time remaining by
>having a blueline on the Splash screen.
>I appreciate that the recordset that is produced from the standard =
Microsoft
>Application is probably well hidden deep inside one of the .dll files =
but if
>I knew where it was I might be able to start using it....
>Please O please will you help if you can....
>Attempts and even duff answers accepted.....(at least it's a starting =
point
>for me to have a look..!)
>
>Top stuff..
>
>Jay
>jason@attraxion.force9.co.uk


Right from the Access 97 help files, I know you're using Access 95, but =
this function also exists in that version as well.

You can use the SysCmd function to perform one of the following =
functions:

=B7 Display a progress meter or optional specified text in the status =
bar.
=B7 Return information about Microsoft Access and its associated files.
=B7 Return the state of a specified database object to indicate whether =
the object is open, is a new object, or has been changed but not saved.

For example, if you are building a custom wizard that creates a new =
form, you can use the SysCmd function to display a progress meter =
indicating the progress of your wizard as it constructs the form.

The help file has all the parameters, etc and an example.  It will work =
with the warnings set to off.

Kurt Johnson
>

------=_NextPart_000_010E_01BDC8AD.EC15F000
Content-Type: text/html;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD>

<META content=3Dtext/html;charset=3Diso-8859-1 =
http-equiv=3DContent-Type>
<META content=3D'"MSHTML 4.72.3110.7"' name=3DGENERATOR>
</HEAD>
<BODY>
<DIV>Jay<JASON@ATTRAXION.FORCE9.CO.UK> wrote in message &lt;<A=20
href=3D"mailto:6r2euf$a89@news3.force9.net">6r2euf$a89@news3.force9.net</=
A>&gt;...</DIV>
<DIV>&gt;Can nobody in the .net universe answer this =
question???<BR>&gt;I am a=20
first time user of these 'ere newsgroups and i thought they might=20
be<BR>&gt;somebody out there who can answer this........<BR>&gt;I have a =
problem=20
that I hope somebody out there can solve.....<BR>&gt;I am transferring =
data into=20
an Access 95 database from a text file which is<BR>&gt;held on my=20
server.<BR>&gt;I have a macro set up that does the job effectively, but =
I want=20
to make it a<BR>&gt;bit more user friendly.<BR>&gt;Currently at the =
beginning of=20
the Macro I have set the systems warnings to<BR>&gt;'off', I have now =
written=20
some code to carry out the import procedure, I now<BR>&gt;want to add a =
splash=20
screen to show the progress of the importation.<BR>&gt;What can I use to =
gauge=20
the time left i.e. the Growrate?<BR>&gt;i.e. on the click event of the =
import=20
button to DoCmd.OpenForm<BR>&gt;&quot;frmTimeIndicator&quot; and =
graphically=20
show the amount of time remaining by<BR>&gt;having a blueline on the =
Splash=20
screen.<BR>&gt;I appreciate that the recordset that is produced from the =

standard Microsoft<BR>&gt;Application is probably well hidden deep =
inside one of=20
the .dll files but if<BR>&gt;I knew where it was I might be able to =
start using=20
it....<BR>&gt;Please O please will you help if you =
can....<BR>&gt;Attempts and=20
even duff answers accepted.....(at least it's a starting =
point<BR>&gt;for me to=20
have a look..!)<BR>&gt;<BR>&gt;Top stuff..<BR>&gt;<BR>&gt;Jay<BR>&gt;<A=20
href=3D"mailto:jason@attraxion.force9.co.uk">jason@attraxion.force9.co.uk=
</A><BR></DIV>
<DIV><FONT style=3D"BACKGROUND-COLOR: #ffffff"></FONT><FONT =
color=3D#000000=20
face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT color=3D#000000 face=3DArial size=3D1><FONT color=3D#000000 =
face=3DArial=20
size=3D2>Right from the Access 97 help files, I know you're using Access =
95, but=20
this function also exists in that version as well.</FONT></FONT></DIV>
<DIV><FONT color=3D#000000 face=3DArial size=3D1></FONT>&nbsp;</DIV>
<DIV><FONT color=3D#000000 face=3DArial size=3D1><EM>You can use the =
SysCmd function=20
to perform one of the following functions:</EM></FONT></DIV>
<DIV><FONT color=3D#000000 face=3DArial =
size=3D1><EM></EM></FONT>&nbsp;</DIV>
<DIV><FONT color=3D#000000 face=3DArial size=3D1><EM>&middot; Display a =
progress meter=20
or optional specified text in the status bar.<BR>&middot; Return =
information=20
about Microsoft Access and its associated files.<BR>&middot; Return the =
state of=20
a specified database object to indicate whether the object is open, is a =
new=20
object, or has been changed but not saved.</EM></FONT></DIV>
<DIV><FONT color=3D#000000 face=3DArial =
size=3D1><EM></EM></FONT>&nbsp;</DIV>
<DIV><FONT color=3D#000000 face=3DArial size=3D1><EM>For example, if you =
are building=20
a custom wizard that creates a new form, you can use the SysCmd function =
to=20
display a progress meter indicating the progress of your wizard as it =
constructs=20
the form.</EM></FONT></DIV>
<DIV><FONT color=3D#000000 face=3DArial size=3D1></FONT>&nbsp;</DIV>
<DIV><FONT color=3D#000000 face=3DArial size=3D2>The help file has all =
the parameters,=20
etc and an example.<FONT color=3D#000000>&nbsp; It will work with the =
warnings set=20
to off.</FONT></FONT></DIV>
<DIV><FONT color=3D#000000 face=3DArial size=3D2></FONT>&nbsp;</DIV>
<DIV><FONT color=3D#000000 face=3DArial size=3D1><FONT color=3D#000000 =
face=3DArial=20
size=3D2>Kurt Johnson</FONT><BR></FONT>&gt;</DIV></BODY></HTML>

------=_NextPart_000_010E_01BDC8AD.EC15F000--
Technical Details
Message-ID: <6r5qri$q5f$1@supernews.com>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <6r2euf$a89@news3.force9.net>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII
X-Google-Thread: 111a5a,5f8f5f1c154466d0
X-Google-Attributes: gid111a5a,public
X-Google-Thread: fb7cd,5f8f5f1c154466d0
X-Google-Attributes: gidfb7cd,public
X-Google-Thread: 10c7bc,5f8f5f1c154466d0
X-Google-Attributes: gid10c7bc,public
X-Google-Thread: 1143dd,5f8f5f1c154466d0
X-Google-Attributes: gid1143dd,public
X-Google-Thread: 10a93f,5f8f5f1c154466d0
X-Google-Attributes: gid10a93f,public
X-Google-Thread: ff0ac,5f8f5f1c154466d0
X-Google-Attributes: gidff0ac,public
X-Google-Thread: 109eae,5f8f5f1c154466d0
X-Google-Attributes: gid109eae,public
From: "Kurt Johnson" <buzz1@mc.net>
Subject: Re: Help, I need an answer, can you, the expert help???????
Date: 1998/08/16
Message-ID: <6r5qri$q5f$1@supernews.com>
X-Deja-AN: 381589886
References: <6r2euf$a89@news3.force9.net>
Content-Type: multipart/alternative; boundary="----=_NextPart_000_010E_01BDC8AD.EC15F000"
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.3110.3
X-Complaints-To: newsabuse@supernews.com
X-Trace: 903245490 NHWTRR.SM865CD1ACC usenet58.supernews.com
Organization: http://www.supernews.com, The World's Usenet: Discussions Start Here
Mime-Version: 1.0
Newsgroups: comp.databases.ms-access,es.comp.bd.ms-access,microsoft.public.access.3rdpartyusergroups,microsoft.public.access.3rdpartyusrgrp,microsoft.public.access.chat,microsoft.public.access.conversion,microsoft.public.access.customcontrols,microsoft.public.