NoMatch

[Guest]

My version of Access 2003 cannot read the code "NoMatch". Does anyone how I
can make access recognize this code?

 

[Douglas J. Steele]

What's your code that's failing, and what's the exact error message?

 

[Guest]

Error Message:

Comple Error:
Method or Data Member not found

Code:
Function UpdateToc(TocEntry As String, Rpt As Report)

' Called from the OnPrint property of the section containing
' the Table Of Contents entry. Updates the Table Of Contents
' entry.

toctable.Seek "=", TocEntry

If toctable.NoMatch Then <------Error Line
toctable.AddNew
toctable!Description = TocEntry
toctable![page number] = Rpt.Page
toctable.Update
End If

End Function


Thanks for the help.

 

[Douglas J. Steele]

What is toctable? (How have you declared it, and where?)

--
Doug Steele, Microsoft Access MVP

(no e-mails, please!)

Error Message:

Comple Error:
Method or Data Member not found

Code:
Function UpdateToc(TocEntry As String, Rpt As Report)

' Called from the OnPrint property of the section containing
' the Table Of Contents entry. Updates the Table Of Contents
' entry.

toctable.Seek "=", TocEntry

If toctable.NoMatch Then <------Error Line
toctable.AddNew
toctable!Description = TocEntry
toctable![page number] = Rpt.Page
toctable.Update
End If

End Function


Thanks for the help.

What's your code that's failing, and what's the exact error message?

--
Doug Steele, Microsoft Access MVP

(no e-mails, please!)


message

 

[Guest]

Option Explicit

Dim da As DAO.Database
Dim toctable As DAO.Recordset
Dim intpagecounter As Integer

What is toctable? (How have you declared it, and where?)

--
Doug Steele, Microsoft Access MVP

(no e-mails, please!)

Error Message:

Comple Error:
Method or Data Member not found

Code:
Function UpdateToc(TocEntry As String, Rpt As Report)

' Called from the OnPrint property of the section containing
' the Table Of Contents entry. Updates the Table Of Contents
' entry.

toctable.Seek "=", TocEntry

If toctable.NoMatch Then <------Error Line
toctable.AddNew
toctable!Description = TocEntry
toctable![page number] = Rpt.Page
toctable.Update
End If

End Function


Thanks for the help.

What's your code that's failing, and what's the exact error message?

--
Doug Steele, Microsoft Access MVP

(no e-mails, please!)


message
My version of Access 2003 cannot read the code "NoMatch". Does anyone
how
I
can make access recognize this code?

 

[Bill Mosca, MS Access MVP]

Doug

Just so you don't spend a lot of time spinning your wheels, the OP is using
the code to generate a report table of contents found at:
http://support.microsoft.com/default.aspx?scid=kb;en-us;210269.