Domino 9 und frühere Versionen > Entwicklung
web-problem
my head:
habe eine ansicht mit daten... eine maske zum suche dieser daten... eine frameset mit suchmaske, ansicht!
wenn ich in der suchmaske den button bestätige sollen die ansicht mit allen daten durch den ordner mit den mit dem suchtext übereinstimmten doks ersetzt werden... funktioniert in notes, aber nicht im web!
der button startet folgenden agenten:
Sub Initialize
Dim workspace As New NotesUIWorkspace
Dim s As New NotesSession
Dim db As NotesDatabase
Dim thisdb As NotesUIDatabase
Dim doc As NotesDocument
Dim view As Notesview
Dim vc As NotesViewEntryCollection
Dim switch As Integer
Dim suchtext As String
'Inhalte aus erg löschen!!
Set db = s.CurrentDatabase
Set view = db.GetView("erg")
Set vc = view.AllEntries
Call vc.RemoveAllFromFolder("erg")
'INIT: suche
Set view = db.getview("alle")
Set thisdoc = workspace.CurrentDocument
Set thisdb = workspace.Currentdatabase
suchtext = thisdoc.fieldgettext("suchtext")
Set doc = view.getfirstdocument
switch=0
'suche
Do Until (doc Is Nothing)
If Not Instr(doc.getitemvalue("name")(0) , Strconv(suchtext,3)) = 0 Then
switch=1
Elseif Not Instr (doc.getitemvalue("abt")(0), Ucase(suchtext)) = 0 Then
switch=1
Elseif Not Instr (doc.getitemvalue("zimmer")(0) , Ucase(suchtext)) = 0 Then
switch=1
Elseif Not Instr (doc.getitemvalue("tel")(0) , suchtext) = 0 Then
switch=1
End If
If switch = 1 Then
Call doc.putinfolder("erg",True)
switch = 0
End If
Set doc=view.getnextdocument(doc)
Loop
Call workspace.settargetframe("main")
Call thisdb.openview("erg")
End Sub
danke
Till_21:
warum machst du die suche nicht mit notes-mitteln über die url ? ausserdem läuft zwar LS wenn du es per agent startest aber NEVER UI-Angelegenheiten im Web...
warum mit Notes-Mitteln?
weil du dann z.b. das nette feature hast, wie zutreffend das suchergebnis ist...
ausserem weniger aufwand, view basteln, verlinken auf :
"[http://"+ Domainname + "/" + DBName + "/suche/?SearchView&Query="+"*"+Suchstr+"*"+" ]";
gruss
my head:
wie kann ich mir eine url zusammenbasteln? woher bekomm ich dbname,...?
my head:
kann ich dann nach zahlen suchen, wie oben "tel"??
Till_21:
--- Zitat von: my head am 19.02.03 - 14:03:52 ---kann ich dann nach zahlen suchen, wie oben "tel"??
--- Ende Zitat ---
ja, du solltest nur, damit die geschichte funktioniert, die db volltextindezieren...
an den dbnamen kommt man z.B. so:
DB := @ReplaceSubstring(@ReplaceSubstring(@Subset(@DbName; -1); " "; "+"); "\\"; "/");
gruss
Navigation
[0] Themen-Index
[#] Nächste Seite
Zur normalen Ansicht wechseln