passing a Notes DateTime in a web service called by .NET02/24/2009 07:23:21 AM
I've gotten a few questions from Glen Rohrer about LotusScript web services. He did all the figuring out an the result is this web service that passes Notes DateTime. Good job Glen:
"So in my web service I create my custom class like so...
Public Class Travel
Public Amount As Double
Public Associate As String
Public AssociateID As String
Public CalculationType As String
Public Comments As String
Public DateEnd As XSD_DATETIME
Public DateStart As XSD_DATETIME
Public ID As String
Public Percent As Double
Sub New()
Set DateStart = New XSD_DATETIME
Set DateEnd = New XSD_DATETIME
End Sub
End Class
Dim travel as Travel
Dim NotesDate as NotesDateTime
Set travel = New Travel()
If Isdate(doc.GetItemValue("endDate")(0)) Then
Set NotesDate = New NotesDateTime(doc.GetItemValue("endDate")(0))
Call travel.DateEnd.SetValueFromNotesDateTime(NotesDate)
Else
Call travel.DateEnd.SetValueFromString(DateTimeMinValue)
End If
passing a Notes DateTime in a web service called by .NET02/24/2009 07:23:21 AM
