Executed in Access 2000 or Access XP

I want , if exists one function in Access , that can return if a program is executed with Access is in Access 2000 or in Access XP



Thanks in advance

Try this piece of code on the different Access versions:



Function ReferenceProperties()



Dim ref As Reference



' Enumerate through References collection.

For Each ref In 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

End Function