[AccessD] Sudden Format() Problem

Eric Barro ebarro at afsweb.com
Wed Jul 30 13:08:30 CDT 2003


Or you can reference it explicitly as...

VBA.Format() instead of just Format()

---
Eric Barro
Senior Systems Analyst
Advanced Field Services
(208) 772-7060
http://www.afsweb.com 

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Frank Tanner
III
Sent: Tuesday, July 29, 2003 9:00 AM
To: Access Developers discussion and problem solving
Subject: Re: Re: [AccessD] Sudden Format() Problem


Hooked on Typing failed me today....hehehehe

--- Frank Tanner III <pctech at mybellybutton.com> wrote:
> Thank you very much.  That solved it.  Although the
> odd part is the missing reference was to an Autio
> ActiveXpiece.  Odd.  But whatever.
> 
> --- paul.hartland at fsmail.net wrote:
> > go into the design of the module, then click
> > TOOLS/REFERENCES sometimes Access loses a
> reference
> > that it needs even though you didn't setup one in
> > the first place.  and have a look at all the
> > references that are checked, there may be one that
> > says MISSING (reference name).  If so, uncheck the
> > reference, close the database and try again.
> > 
> > if that fails let me know and we will see what
> else
> > we can come up with.
> > 
> > Paul
> > 
> > 
> > From: Frank Tanner III <pctech at mybellybutton.com>
> > Date: Tue 29/Jul/2003 15:01 GMT
> > To: Access Developers discussion and problem
> solving
> > 	<accessd at databaseadvisors.com>
> > Subject: Re: [AccessD] Sudden Format() Problem
> > 
> > I'm not sure what you're talking about.  I didn't
> > specifically set up any references when I
> orignally
> > added the code snippet.  I, literally, C&P'ed it
> > into
> > a module in Access.
> > 
> > --- paul.hartland at fsmail.net wrote:
> > > Silly one, but have you tried looking in
> > references
> > > to see if any have gone missing, if so, uncheck
> > them
> > > and try running again
> > > 
> > > 
> > > From: Frank Tanner III
> <pctech at mybellybutton.com>
> > > Date: Tue 29/Jul/2003 14:19 GMT
> > > To: Database Advisors
> > <accessd at databaseadvisors.com>
> > > Subject: [AccessD] Sudden Format() Problem
> > > 
> > > I have been using the following code snippet I
> got
> > > from the list for a few months now.  All of a
> > sudden
> > > it gives the error "Compile Error.  Can't find
> > > project
> > > or library."  Any ideas?
> > > 
> > > Function TotHours(Duration As Double) As String
> > > 
> > > Dim strTemp As String
> > > Dim Days As Long
> > > 
> > > Days = Int(Duration)
> > > strTemp = Format(Duration, "hh:mm:ss")
> > > 
> > > If Days > 0 Then
> > >     strTemp = Str$(Val(Left$(strTemp, 2)) + Days
> *
> > > 24)
> > > + Mid$(strTemp, 3)
> > > End If
> > > 
> > > TotHours = strTemp
> > > 
> > > End Function
> > > 
> > > 
> > > Thank you for any assistance you can give me.
> > > _______________________________________________
> > > AccessD mailing list
> > > AccessD at databaseadvisors.com
> > >
> >
> http://databaseadvisors.com/mailman/listinfo/accessd
> > > Website: http://www.databaseadvisors.com
> > > 
> > > 
> > >
> >
>
__________________________________________________________________________
> > > Join Freeserve http://www.freeserve.com/time/
> > > 
> > > Winner of the 2003 Internet Service Providers'
> > > Association awards for Best Unmetered ISP and
> Best
> > > Consumer Application.
> > > 
> > > 
> > > _______________________________________________
> > > AccessD mailing list
> > > AccessD at databaseadvisors.com
> > >
> >
> http://databaseadvisors.com/mailman/listinfo/accessd
> > > Website: http://www.databaseadvisors.com
> > 
> > _______________________________________________
> > AccessD mailing list
> > AccessD at databaseadvisors.com
> >
> http://databaseadvisors.com/mailman/listinfo/accessd
> > Website: http://www.databaseadvisors.com
> > 
> > 
> >
>
__________________________________________________________________________
> > Join Freeserve http://www.freeserve.com/time/
> > 
> > Winner of the 2003 Internet Service Providers'
> > Association awards for Best Unmetered ISP and Best
> > Consumer Application.
> > 
> > 
> > _______________________________________________
> > AccessD mailing list
> > AccessD at databaseadvisors.com
> >
> http://databaseadvisors.com/mailman/listinfo/accessd
> > Website: http://www.databaseadvisors.com
> 
> _______________________________________________
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com

_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com

---
Incoming mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.504 / Virus Database: 302 - Release Date: 7/24/2003

---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.504 / Virus Database: 302 - Release Date: 7/24/2003




More information about the AccessD mailing list