Domino 9 und frühere Versionen > ND6: Entwicklung

Probleme mit FTsearch

<< < (2/3) > >>

umi:

--- Code: ---If colSearch.count =0 Then
' kein Datensatz in der Form vorhanden
Call docCol.ReplaceItemValue("status","1")
Call docCol.Save(True,False)
Elseif colSearch.count = 1Then
' ein Datensatz in der Form vorhanden
Call docCol.ReplaceItemValue("status","2")
Call docCol.Save(True,False)
Elseif colSearch.count <1 Then
' mehere Datensätze in der Form vorhanden
Call colSearch.StampAll("status","3")
End If


--- Ende Code ---

Das letzte Elseif solltst Du nochmals überdenken......

bikerboy:
@ umi

Warum ?

umi:
zuerst machst Du den Vergleich auf =0
Anschliessend auf  = 1
dann auf < 1
bis jetzt hat mir ein FTSearch noch keine negative Anzahl Dokumente zurückgeliefert......

bikerboy:
Ja gut ich gebe zu ,dass das schwierig wird , aber ich bekomme das noch hin ;)

aber ich will wirklich zwischen null und 1 unterscheiden oder halt mehr... ich meine ich bin zwar immer noch frisch in der ganzen Programmierwelt, aber das war schon so gewollt.

Aber warum mir die FT-Search mir jetzt kein Ergebnis liefert kann mir keiner sagen ?

Ich habe nun wirklich auf alles geachtet, ich vergleiche nur Strings mit Strings und nicht mit sonst irgendwas. Aber trotzdem schmeisst er die Suche und kommt zu keinem Ergebnis, kommt die Suche vielleicht damit nicht zurecht, dass zum Beipiel bei den Strassenname einen Text und dann noch ne Nummer habe?

Also für den Programmierer : String + <Space> + Integer  O0

bikerboy:
So habe mich der Sache nochmal selber angenommen und diese verdammte suche neu aufgebaut, wenn jetzt nur noch ein Dokument in der Collection vorhanden ist, wird es in den Einzelzugriff genommen und Feldweise untersucht. Das ganze sieht dann wie folgt aus :


--- Code: --- ' 1. Suche
If colSearch.Count  <> 0 Then

searchField = docProfile.GetItemValue("firstkey")(0)
searchValue =docCol.GetItemValue(searchField)(0)
Call colSearch.FTSearch(searchValue,0)

End If

' 2. Suche
If colSearch.Count  < 1 Then
searchField = docProfile.GetItemValue("secondkey")(0)
searchValue =docCol.GetItemValue(searchField)(0)
Call colSearch.FTSearch(searchValue,0)
Elseif colSearch.Count = 1 Then
score = 3
Set docSearch = colSearch.GetFirstDocument

key = "secondkey"
If Not docProfile.getitemvalue(key)(0) = "" Then
searchField = docProfile.getitemvalue(key)(0)
If docCol.GetItemValue(searchField)(0) = docSearch.GetItemValue(searchField)(0) Then
score = score + 2
End If
End If

key = "thirdkey"
If Not docProfile.GetItemValue(key)(0) = "" Then
searchField = docProfile.GetItemValue(key)(0)
If docCol.GetItemValue(searchField)(0) = docSearch.GetItemValue(searchField)(0) Then
score = score + 1.5
End If
End If

key = "fourthkey"
If Not docProfile.GetItemValue(key)(0) = "" Then
searchField = docProfile.GetItemValue(key)(0)
If docCol.GetItemValue(searchField)(0) = docSearch.GetItemValue(searchField)(0) Then
score = score + 1
End If
End If

key = "fithtkey"
If Not docProfile.GetItemValue(key)(0) = "" Then
searchField = docProfile.GetItemValue(key)(0)
If docCol.GetItemValue(searchField)(0) = docSearch.GetItemValue(searchField)(0) Then
score = score + 1
End If
End If

key = "sixtkey"
If Not docProfile.GetItemValue(key)(0) = "" Then
searchField = docProfile.GetItemValue(key)(0)
If docCol.GetItemValue(searchField)(0) = docSearch.GetItemValue(searchField)(0) Then
score = score + 1
End If

End If
runFlag = True
End If

--- Ende Code ---

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete