Need some help with LS

HCL Domino Domino Forum
1

How will a do this the correct way? It works but a guess a could improve the code a lot.

If(doc.h_TaskEditors(0)="")	 Then



	doc.dsp_TaskEditors = "-- Unassigned --"

End If



If(doc.h_TaskEditors(0)="h_Both")	 Then



	doc.dsp_TaskEditors = "Author and assignee only"

End If



If(doc.h_TaskEditors(0)="h_Authors")	 Then



	doc.dsp_TaskEditors = "Author only"

 

End If
2

Subject: Use a ‘Select Case’ statement

3

Subject: RE: Use a ‘Select Case’ statement

Thats not help me, i’m looking at that but i-m not really shure how a will use it.

4

Subject: RE: Use a ‘Select Case’ statement

both of these should work:

If(doc.h_TaskEditors(0)="") Then

	doc.dsp_TaskEditors = "-- Unassigned --"

Elseif(doc.h_TaskEditors(0)="h_Both") Then

	doc.dsp_TaskEditors = "Author and assignee only"

Elseif(doc.h_TaskEditors(0)="h_Authors") Then

	doc.dsp_TaskEditors = "Author only"

End If 





Dim taskedit As String

taskedit = doc.h_TaskEditors(0)

Select Case taskedit

Case ""

	doc.dsp_TaskEditors = "-- Unassigned --"

Case "h_Both"

	doc.dsp_TaskEditors = "Author and assignee only"	

Case "h_Authors"

	doc.dsp_TaskEditors = "Author only"

End Select
5

Subject: RE: Use a ‘Select Case’ statement

Thanx, that help me a lot. I’m pretty new in LS so sometimes a completely have no idea what to do.