Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Chris Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Lotus Script

Status
Not open for further replies.

Gary74

IS-IT--Management
Apr 25, 2011
3
US
Is there a command in lotus script that refresh selected documents in a view?

I'm using Lotus Notes 6.5 and Below code not working.

Sub Click(Source As Button)
Dim nsesCurrent As New NotesSession
Dim nuiwsCurrent As New NotesUIWorkspace
Dim ndbCurrent As NotesDatabase
Dim ncolSelected As NotesDocumentCollection
Dim ndocOrder As NotesDocument
Dim StrSiteVisit As String
Dim uiview As NotesUIView

StrSiteVisit = nuiwsCurrent.Prompt(3,"Admin Review/Entrance","Please enter new date.")
If Isempty(StrSiteVisit) Or Trim$(StrSiteVisit) = "" Or Not Isdate(StrSiteVisit) Then Goto notready

Set ndbCurrent = nsesCurrent.CurrentDatabase
Set uiview = nuiwsCurrent.CurrentView
Set nColSelected = ndbCurrent.UnprocessedDocuments
Set ndocOrder = ncolSelected.GetFirstDocument

Do While Not (ndocOrder Is Nothing)
With ndocOrder
.SiteVisit = StrSiteVisit
End With
Call ndocOrder.Save(True, True)
Set ndocOrder = ncolSelected.GetNextDocument(ndocOrder)
Loop
Call uiview.DeselectAll
notready:
End Sub


Thanks in advance for any support.
 
Does it have to be script ?

How about this formula command...

@Command([ToolsRefreshSelectedDocs])
 
I have to do a mini project related to employee daily activities
in a company using lotus notes.As i am new to this field can any one suggest me how to do this project, using what and how pls.
 
@tonyanthu - how about you start a new thread for your request and then tell us a few more details about what you want to do.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top