View Single Post
  #3  
Old May 16th, 2010, 02:50 PM posted to microsoft.public.access.forms
Daniel Pineault
external usenet poster
 
Posts: 658
Default Retriving database properties

Allen also has another funtion that could help you out, below is a very
slightly modified version of his original function

Function ShowDatabaseProps()
'Purpose: List the properies of the current database.
Dim db As DAO.Database
Dim prp As DAO.Property

On Error GoTo Error_Handler

Set db = CurrentDb()
For Each prp In db.Properties
Debug.Print prp.Name & ":: " & prp.Value
Next

Set db = Nothing

Error_Handler_Exit:
On Error Resume Next
Exit Function

Error_Handler:
If Err.Number = 3251 Then
Resume Next
Else
MsgBox "MS Access has generated the following error" & vbCrLf & vbCrLf &
"Error Number: " & _
Err.Number & vbCrLf & "Error Source: ShowDatabaseProps" & vbCrLf &
"Error Description: " & _
Err.Description, vbCritical, "An Error has Occured!"
Resume Error_Handler_Exit
End If
End Function

See his original function at:
http://allenbrowne.com/func-DAO.html#ShowDatabaseProps
--
Hope this helps,

Daniel Pineault
http://www.cardaconsultants.com/
For Access Tips and Examples: http://www.devhut.net
Please rate this post using the vote buttons if it was helpful.



"Allen Browne" wrote:

What properties?

If you are asking about things like version of Access, file location, etc,
see:
Splash screen with version info
at:
http://allenbrowne.com/ser-53.html

--
Allen Browne - Microsoft MVP. Perth, Western Australia
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.


"mr3316a via AccessMonster.com" u59438@uwe wrote in message
news:a812e488c310f@uwe...
How can I retrieve information from the database properties so I can
display them on the main form of my application?


.