Delete Local Mail Replica Via a Button

Is there a way to email the users a button to find and delete a local mail file replica? I need to delete there local mail file replica via a button.

Thanks,

Dawn

Subject: Delete Local Mail Replica Via a Button

Hi Dwan, As per my knowledge, I ahve take some code from designer help,

Dim session As New NotesSession

Dim adminp As NotesAdministrationProcess

Set adminp = _

session.CreateAdministrationProcess(“Software_Server”)

noteid$ = adminp.DeleteReplicas(“Software_Server”, “Guys1”)

If noteid$ <> “” Then

Dim db As New NotesDatabase("Software_Server", "admin4") 

Dim ws As New NotesUIWorkspace

Call ws.EditDocument(False, db.GetDocumentByID(noteid$))

End If

The above code will deletes all the replicas of the particular server. So please take care before using this code, may be your client server may contains more than one replica in different locations.

Thanks,

Guru