Time Difference On web

HCL Domino Domino Forum
1

Dear All,I’m using the following code to get the No of working days on client…now i need to write the same on web as well…Please help me

Shana

Set viewH = db.GetView( "Holidays" )

	

	

	Dim dt1 As NotesDateTime

	Dim busdays As Variant

	Dim dtEnd As NotesDateTime

	Dim dtStart As NotesDateTime

	

	Dim temp As Integer

	

	Set dtStart = New NotesDateTime(doc.from(0))

	Set dtEnd = New NotesDateTime(doc.to(0))

	

	

	busdays = Evaluate({@BusinessDays([ } & Cdat(dtStart.DateOnly) & {]; [} & Cdat(dtEnd.DateOnly) & {]; 1:7)})

	temp= Cint(busdays(0))

’ Count num of holidays

	Set DocH = viewH.GetFirstDocument 

	

	While Not DocH Is Nothing 	

		

		Hday=Cdat(DocH.H_Date(0))

		If Hday>=Cdat(doc.from(0))  And Hday<=Cdat(doc.to(0)) Then

			temp = temp - 1

			

		End If

		

		Set DocH=viewH.GetNextDocument(DocH) 

	Wend
2

Subject: Time Difference On web…

You can use the same code on the web if you run it in an agent - although it’s how you get doc that differs, and you don’t say what you’re doing with temp either, so that might effect things, but the code you have as it stands is just fine to be called from the web.

More details necessary I think…