Dim directory As Directory = FSDirectory.GetDirectory(folderName) Dim analyzer As Lucene.Net.Analysis.Analyzer = New SimpleAnalyzer() Dim indexWriter As New IndexWriter(directory, analyzer) indexWriter.SetRAMBufferSizeMB(10.0) indexWriter.SetUseCompoundFile(False) indexWriter.SetMaxMergeDocs(10000) indexWriter.SetMergeFactor(100) For Each value As IList In preparedtoindex Dim doc As New Document() For Each name As String In selectStatement doc.Add(New Field(selectedName, value(cntr).ToString(), Field.Store.YES, Field.Index.ANALYZED)) Next doc.Add(New Field("title", Field.Store.YES, Field.Index.ANALYZED, Field.TermVector.YES)) writer.AddDocument(doc) Next indexWriter.Optimize() indexWriter.Close()
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)