This discussion has been locked.

You can no longer post new replies to this discussion. If you have a question you can start a new discussion

Need Help in VBScript

Former Member over 3 years ago

' Get Contract End Date

Dim szContractEndDate

szContractEndDate = PropertyValues.SearchForProperty( 1306 ).TypedValue.DisplayValue

Dim szDate

szDate = DateSerial(Year(Now), Month(Now), Day(Now))

Dim szDate2

szDate2 = DateAdd("d",-135,szContractEndDate)

szDate = szDate2

I want to set szDate2 to be trigger date for email notification

Parents

bright-ideas.dk over 3 years ago

You could boil it down to this

Option explicit
Dim szContractEndDate
szContractEndDate = CDate(PropertyValues.SearchForProperty( 1306 ).TypedValue.DisplayValue)
If DateDiff("d",Date,szContractEndDate) 
 AllowStateTransition = True
End if

Reply

bright-ideas.dk over 3 years ago

You could boil it down to this

Option explicit
Dim szContractEndDate
szContractEndDate = CDate(PropertyValues.SearchForProperty( 1306 ).TypedValue.DisplayValue)
If DateDiff("d",Date,szContractEndDate) 
 AllowStateTransition = True
End if

Children

No Data