UtterAccess Discussion Forums
  UtterAccess Home  | Forums Index  | Search  | Links DB  | FAQs   
Microsoft® Access help forums plus Excel, Word, Outlook®, Visual Basic®, SQL Server®, Office online and... many more!

Access UtterAccess!
New? Welcome!
Join UA here!

Members Login


Password


Remember me!


Search The Database

More Links

  UtterAccess Links
  Link to UtterAccess
  Call UtterAccess Home
  Add UA to Favorites

Quick Jump



UA Recommended

Access Team Blog

UA Recommended

UA's own ScottGem
      and datAdrenaline!

Servers tuned by
Vaultechnology
Is Database Replica

Is Database Replica

Posted on 05/31/02 09:37 AM
Posted by Candace Tripp - UA Admin & Utter Angel
Posts: 3035 - Loc: Virginia, USA

Forum: Access Code Archive
• Edit
• Reply
• Quote
• Quick Reply
• Print this post
• Bookmark Post
• Notify Moderator

• Top of page
Function IsDatabaseReplica() As Boolean
' Comments : Determines if the current database is a replica
' Parameters: None
' Returns : True if the current version is a replica, False otherwise
'
On Error Resume Next

If CurrentDb.Properties("Replicable") = "T" Then
If Err = 3270 Then
' Database is not a replica
IsDatabaseReplica = False
Else
' Database is a Design Master or replica
IsDatabaseReplica = True
End If
End If

End Function

--------------------
Candace Tripp
http://www.utterangel.com/

Page Jump
Pages: 1

Navigate
Post List
Previous thread Previous
Next thread Next

Thread Options & Info
• Threaded
• Print Thread

• 550 Thread views

Page Jump
Pages: 1