Fullpath Method Failure

[mguidry5]

Howdy all,

When I run the code below, or any procedure using the "Fullpath" method, I get an error saying "Method 'Fullpath' of Object 'Reference' failed."

Dim ref As Access.Reference

    ' Enumerate through References collection.
    For Each ref In Access.References
        ' Check IsBroken property.
        If ref.IsBroken = False Then
            Debug.Print "Name: ", ref.Name
            Debug.Print "FullPath: ", ref.FullPath
            Debug.Print "Version: ", ref.Major & "." & ref.Minor
        Else
            Debug.Print "GUIDs of broken references:"
            Debug.Print ref.Guid
        End If
    Next ref

I'm assuming this is a dll issue. Can anyone tell me which dll might be the culprit, and if there is an elegant fix to this?

Thanks,
Mike

 

[Remou]

Have you checked your references to see if any are marked missing?

 

[mguidry5]

Yes I have...no missing references.

 

[Remou]

Have you see this:

http://www.granite.ab.ca/access/error2147319779.htm

It may help.

 

[mguidry5]

Thanks for the link, Remou. Unfortunately, it hasn't helped. I did have a few "superfluous" references checked, but leaving them out and recompiling didn't help.

The funny thing is that this code was working on my machine (running Access 2003 w/ databases compatible w/ 2000), but not running on some clients in "the field" that are using Access 2000. I began scrutinizing the versions of their references and attempting to update the references on the client computers, and at some point my computer started posting the same error where it did not before.

Not sure where to go from here. I've Googled the smack out of this one.

 

[Remou]

When all else fails, an uninstall and re-install of Access can help, though it is tedious.

 

[TheAceMan1]

how are ya mguidry5 . . .

I couldn't believe your code was having problems so I ran a similation (A2K) by:
[ol][li]Adding 5 references at random, then saving and closing access.[/li]
[li]Moving the reference files to a different location.[/li]
[li]Opening access and checking the references for the [blue]Is Missing[/blue] prompt. All 5 references showed missing as they should.[/li]
[li]Copied and pasted your code to a module then ran the code.[/li]
[li][blue]Beautiful![/blue] . . . as expected![/li]
[li]Closing access.[/li]
[li]Putting the files back where they belong.[/li]
[li]Openinging access to find the references are now linked![/li]
[li]Running your code was the same . . . [blue]Beautiful![/blue][/li][/ol]
Since you say . . .

[blue]Thanks for the link, Remou. Unfortunately, it hasn't helped.[/blue]

. . . Id say you had some kind of corruption! If this is the case have a look at the links below:

JamiesSoftware Microsoft® Access Database Corruption

EverythingAccess - Database Corruption Repair Guide

See Ya! . . . . . .

Be sure to see FAQ219-2884:

 

[mguidry5]

Thanks, Ace. I'll continue to troubleshoot this one. If and when I find the problem/fix, I'll post back.

Thanks again,
Mike