Описание
Возвращает 16-байтовое значение, однозначно определяющее реплику базы данных (только в рабочей области Microsoft Jet).
Значение
Возвращаемое значение является значением типа GUID, однозначно определяющим реплику или основную реплику.
Замечания
Данное значение автоматически создается ядром базы данных Microsoft Jet при создании новой реплики.
Значение свойства ReplicaID каждой реплики (и основной реплики) сохраняется в системной таблице "MSysReplicas".
Пример
Следующая программа создает реплику из основной реплики Борей.mdb, а затем возвращает код ReplicaID, автоматически создаваемый ядром базы данных Microsoft Jet. (Если вы еще не создали основную реплику базы данных "Борей", обратитесь к примеру для свойства Replicable или замените в программе имя базы данных на имя существующей основной реплики).
Sub MakeReplicaReplicaIDX() Dim dbsNorthwind As Database Dim prpReplicaID As Property Dim dbsReplica As Database Set dbsNorthwind = OpenDatabase("Борей.mdb") ' Создает новую реплику. dbsNorthwind.MakeReplica "Nwreplica2.mdb", "вторая реплика" dbsNorthwind.Close ' Открывает новую реплику, чтобы прочитать значение ReplicaID. Set dbsReplica = OpenDatabase("Nwreplica2.mdb") Debug.Print dbsReplica.ReplicaID dbsReplica.Close End Sub