[AccessD] Change code to A2003

Are you sure you haven't created an adp file instead of an mdb? The DAO 
reference is missing in an ADP file on first creation.
If you are really in an mdb with the reference tools window open,  
browse to this file and reset
C:\Program Files\Common Files\Microsoft Shared\DAO\dao360.dll

Hollis,Virginia wrote:

>I checked - no missing references.
> 
>Do I have to convert the database to 2003 like I did when I moved from 97 to
>2000?
> 
>Why don't they have the reference to DAO 3.6 anymore?
> 
>Virginia
> 
>*************
> 
>In the code window look under Tools->References, it sounds like you have one
>or more that are missing.  They should show up with:
> 
>MISSING:
> 
>as the prefix to the reference.  You will not be able to Compile your
>database until all of the references used in code are resolved.
> 
>-Chris Mackin
> 
>-----Original Message-----
>From: Hollis,Virginia [mailto:HollisVJ at pgdp.usec.com
><http://databaseadvisors.com/mailman/listinfo/accessd> ]
>Sent: Friday, June 11, 2004 8:49 AM
>To: 'accessd at databaseadvisors.com
><http://databaseadvisors.com/mailman/listinfo/accessd> '
>Subject: [AccessD] Change code to A2003
> 
> 
>I used your suggestion & it solved that problem.
> 
> 
> 
>But I am still getting errors in other places for example: .FindFirst
>"[FailureTimeID]= " & right.ItemData(i) & " And [FailureReportNo]= " &
>Me!FailureReportNo. I get an error on the last Me!FailureReportNo that
>Method or Member not found. I have never had that error before and have been
>using this database for years. I am getting compile errors on a lot of code.
>What can I do??
> 
> 
> 
>Virginia
> 
> 
> 
> 
> 
>*************
> 
> 
> 
>EXPLICITLY DECLARE YOUR VARIABLES!
> 
>Dim db as DAO.Database
>Dim RS as DAO.Recordset
> 
>Otherwise you are at the whim of how the references are listed and whatever
>Access finds first as a suitable reference library.
> 
>-Chris Mackin
> 
> 
>-----Original Message-----
>From: Hollis,Virginia [mailto:HollisVJ at pgdp.usec.com
><http://databaseadvisors.com/mailman/listinfo/accessd
><http://databaseadvisors.com/mailman/listinfo/accessd> > ]
>Sent: Friday, June 11, 2004 5:19 AM
>To: 'accessD at databaseadvisors.com
><http://databaseadvisors.com/mailman/listinfo/accessd
><http://databaseadvisors.com/mailman/listinfo/accessd> > '
>Subject: [AccessD] Change code to A2003
> 
> 
>I have been using the below code to count the number of hits on a form. I
>installed A2003 yesterday & receive an error on RS.Edit. In A2K I added a
>reference to DAO 3.6 & the code would work. But in 2003 this is not listed
>in the references.
> 
> 
> 
>What can I change the code to so it will work correctly?
> 
> 
> 
>Virginia
> 
> 
> 
>********************
> 
> 
> 
>Public Function CountThisForm(frm As Form) As Boolean
> 
>Dim db As Database
> 
>Dim RS As Recordset
> 
>Dim SQL As String
> 
>Set db = CurrentDb
> 
>SQL = "Select * FROM tblCounter Where FormName = """ & frm.Name & """;"
> 
>Set RS = db.OpenRecordset(SQL, dbOpenDynaset)
> 
>If RS.RecordCount > 0 Then
> 
>    RS.Edit
> 
>    RS!HitCount = RS!HitCount + 1
> 
>    RS.Update
> 
>Else
> 
>    RS.AddNew
> 
>    RS!FormName = frm.Name
> 
>    RS!HitCount = 1
> 
>End If
> 
>RS.Close
> 
>Set RS = Nothing
> 
>End Function
> 
>  
>

-- 
Marty Connelly
Victoria, B.C.
Canada