Lotus Notes - DOCUMENTOS REPETIDOS EN UNA VISTA

AYUDA!!!

Soy un novato en esto del LotusScript; y es por ello que les solicito de su ayuda para generar un script que busque en una vista los documentos que están duplicados y si los encuentra los elimine.

¿Existe algún otro método más sencillo?

De antemano gracias.

Saludos!!!

Bueno, Lotuscript es bastante potente y si es una buena opcion: create una vista ordenada por el campo duplicado y la recorres con un agente en Lotuscript verificando cada documento y el/los siguientes y si son iguales los borras. Si no hay muchos y no dominas el tema de programacion puedes crearte una vista categorizada por el campo "duplicado" y poniendo los totales a la categoría podrás ver enseguida cuales están repetidos: el total de la categoría será mayor que uno.

Ok, ya está.

Me podrías auxiliar con el código para que realice la búsqueda y borre únicamente los repetidos?.

De antemano gracias.

Saludos!!!

Intenta con este código, tal vez te de algún error ya que lo escribi en linea.

'crea una vista con el primer campo ordenado, ya que ese se tomara para hacer la busqueda
Dim Ns As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim Doc As NotesDocument
While Not (Doc Is Nothing)
v_campo=Doc.campo1(0) ' toma el valor del primer registro (campo1=a buscar)
Set Doc = View.GetNextDocument(Doc) 'realiza un salto para comenzar a buscar
While Not (Doc Is Nothing) And v_campo=Doc.campo1(0)
Call Doc.Remove(True)
Set Doc = View.GetNextDocument(Doc)
Wend
Wend