Hi, knows anyone if there is a solution that i can make a replication (snapshot) of all NSF from a Domino Server on a Share on in the Network (other Server).
The Background is, that we need a backup witch runs every hour - a replication is ok for me.
I have seen that i can link other local drives and folders, but if i enter a share then the server will create a local folder with the share name on the next replication !??
- Is there a Software how can do this?
Thanks in advance
Volkan S.
Subject: Creating a Snapshot/Replication off all DBs
Just a theory. Create and agent that creates a new replica. Renames it to Replica(n). And then disables replicaiton of the new DB.
I used to do this manualy for NAMES.nsf on a monthly basis, when I was an admin. Since NAMES.NSF was the HEART I didnt leave anything to chance with backups. Because backup are the only thing that fail when you actually need them.
Subject: Creating a Snapshot/Replication off all DBs
Can replicate 1 server with himself ?
We are able to do it.
1 db (3,2 gigs - 1 200 000 docs) replicate with 2 others replica
Prod\db1.nsf
Prod2\db2.nsf
Prod3\db3.nsf
One agent who triggers the replication on Prod\db1.nsf.
We have an update on Db1 that is push on DB2 and DB3 with our agent.
Maybe it’s not elegant but it works for us.
We did our creation of DB2 and DB3 via the OS to be sure to keep our replica ID.
Sub Initialize
…bla bla
Set db = session.CurrentDatabase
Ok = db.Replicate( "CN=SERVER/O=ABC" )
If Ok Then
print “Good”
Else
Print "Bad"
End If
End Sub
Subject: RE: Creating a Snapshot/Replication off all DBs
Thanks JY, is there a way that i can raolicate the hole server whithout entering all DBs on an agent ?
I not very good in lotusscript, more then in Formulas or VB (MS).
Or can you send me a test db or script witch has inside a Agent for my prob.?
thanks in advance for your feedback.
Subject: RE: Creating a Snapshot/Replication off all DBs
The script is not perfect but if the Dbs were copied via the OS, i think this script should do the tricks to replicate every dbs one by one.
Maybe the first time it will be a little longer because the server have to synchronize every db with it 's replica.
This is a sample script.
initialize
On error go to error
Dim session As New NotesSession
Dim srv As NotesDbDirectory
Dim db,currdb As NotesDatabase
Dim dbServ As String
'Print “start agent”
Set currdb = session.CurrentDatabase
dbServ = “”
dbServ = currdb.Server
'Search dbs on server
Set srv = New NotesDbDirectory(dbServ)
'Search only NSF not NTF
Set db = srv.GetFirstDatabase(DATABASE)
While Not(db Is Nothing)
'Open each db to verify access
Resultat = db.Open( "", "" )
If Err > 0 Then
Err = 0
End If
If Resultat = True Then
'Db is open
print db.title
Ok = db.Replicate( “CN=SERVER/O=ABC” )
If Ok Then
print “Good”
Else
Print “Bad”
End If
'Go to next db on server
Set db = srv.GetNextDatabase
Else
'Db is not open, 'Go to next db on server
Set db = srv.GetNextDatabase
End If
Wend
Exit sub
error:
Exit sub
End Sub