Notes/Domino 4 and 5 Forum

Hi,

I am trying to do a Date search using lotus script but Throws error in FT Search stating that Relational operators are not supported in text fields. Any Help is greatly appreciated.

Dim session As New NotesSession
Dim db As NotesDatabase
Dim ws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim fview As NotesView
Dim fdoc As NotesDocument
Dim vw As NotesView
Dim dc As NotesDocumentCollection
Dim v As NotesViewEntryCollection
Dim z As String
Dim docc As NotesDocumentCollection
Dim ve As NotesViewEntryCollection
Dim de As NotesViewEntryCollection
Dim doc As NotesDocument

Dim num As Variant
Dim viewnam As String
Dim searchstring As String
Dim proj As Variant
Dim continue As Variant
Dim Cust As Variant
Dim empname As String
Dim status As String
Dim InvAge As String
Dim FromDate As Variant
Dim ToDate As Variant
Dim document As Integer

Set db=session.CurrentDatabase
Set vw=db.GetView("vuEmployeeByName")
Set uidoc=ws.CurrentDocument
Set de = vw.AllEntries


FromDate = Cstr(uidoc.FieldGetText("dtSRFromDate"))
ToDate = Cstr(uidoc.FieldGetText("dtSRToDate"))

searchstring = "((FIELD DOJ <=+[ToDate]+) AND ("+"FIELD DOJ >=+[FromDate]+))"

document = vw.FTSearch(searchstring,0) '''''''''''(Throws error in this line)
If document = 0 Then
Msgbox "No matching documents found. Please try again"
Exit Sub
End If

Set doc = vw.GetFirstDocument
While Not doc Is Nothing
Call doc.putinfolder("DisplayReports")
Set doc = vw.GetNextDocument(doc)
Wend

Call ws.ComposeDocument("","","SearchResult")
Exit Sub

Thanks in Advance.....