Lotus Notes - Coger la ultima Fecha

 
Vista:

Coger la ultima Fecha

Publicado por Andres Ayala (1 intervención) el 15/03/2007 22:26:30
Quisiera saber como se puede cojer la ultima fecha de Revision que contien el simbolo $

Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Coger la ultima Fecha

Publicado por BEA (6 intervenciones) el 04/04/2007 12:57:37
A ver si con esto te sirve (sacamos por pantalla en un msgbox el último valor del campo $Revision del primer documento de una vista):

Dim session As New NotesSession
Dim db As NotesDatabase
Dim view As NotesView
Dim doc As NotesDocument
Dim item As NotesItem
Dim vble As Variant

Set db=session.CurrentDatabase
Set view=db.GetView("VISTA")
Set doc=view.GetFirstDocument

Set item=doc.GetFirstItem("$Revisions")
vble=item.Values
Msgbox vble(Ubound(vble))
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar