--- title: "Hjälp med indexserver" type: "forum-thread" url: "https://www.webforum.nu/amne/asp/9679-hjälp-med-indexserver" topic: "ASP" topic_url: "https://www.webforum.nu/amne/asp" author: "qwerty" published: "2001-04-27T08:48:00.000Z" updated: "2001-05-23T08:34:00.000Z" replies: 12 views: 234 page: 1 pages: 1 language: "sv-SE" site: "webForum — webforum.nu" rights: "Upphovsrätten till varje inlägg tillhör dess författare." attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/9679-hjälp-med-indexserver" --- # Hjälp med indexserver ## #1 — qwerty, 2001-04-27T08:48Z Hej! Jag har fått indexserver installerat på servern. Hur får jag min sökmotor att utnyttja detta? Har försökt söka i forumen men inte hittat något som hjälper mig. Snälla någon. Alltså: Vad ska jag ha för action i formuläret? Permalänk: https://www.webforum.nu/p/9679 ## #2 — qwerty, 2001-04-27T11:12Z Är det ingen som kan detta? Man skulle kunna säga att det är lite panik... Permalänk: https://www.webforum.nu/p/269862 ## #3 — peterbladh, 2001-04-27T11:19Z Hej Gör en vanlig form sida på sidan som skall visa funna dokument kan i sitt enklaste utförande se ut så här: \ ... osv \<% dim q, rs Set q=Server.CreateObject("ixsso.Query") q.query=Request.Form("txt") q.Columns="filename,vpath,DocTitle" q.Catalog="c:\\inetpub" q.MaxRecords=50 set rs=q.CreateRecordset("nonsequential") do until rs.eof %\> \"\>\<%=rs("DocTitle")%\>\\ \<% rs.MoveNext Loop %\> ...\ Permalänk: https://www.webforum.nu/p/269863 ## #4 — qwerty, 2001-04-27T12:34Z Tjena! Får följande felmess: CreateRecordset error 'c0004002' The Query property was not set. /sok.asp, line 22 line 22 är: ``` set rs=q.CreateRecordset("nonsequential") ``` Permalänk: https://www.webforum.nu/p/269864 ## #5 — peterbladh, 2001-04-27T12:39Z hm, jag testade koden själv först innan jag skickade den och här fungerar det. Men kolla att din textruta heter txt (på form-sidan). Kolla också att indexservern verkligen är startad och att katalogen är c:\\inetpub. Det där "The Query property was not set" är ett något kryptiskt felmeddelande som kan dyka upp lite när som när man jobbar med indexservern. Lycka till! Permalänk: https://www.webforum.nu/p/269865 ## #6 — qwerty, 2001-04-27T13:00Z Nej, funkar inte. Så här ser hela sidan ut. Jag har säkert gjort nån idiot-miss. Har du lust att titta på koden? ```
sök:
<% dim q, rs Set q=Server.CreateObject("ixsso.Query") q.query=Request.Form("txt") q.Columns="filename,vpath,DocTitle" q.Catalog="c:\inetpub" q.MaxRecords=50 set rs=q.CreateRecordset("nonsequential") do until rs.eof %>

"><%=rs("DocTitle")%>
<% rs.MoveNext Loop %>

``` Permalänk: https://www.webforum.nu/p/269866 ## #7 — qwerty, 2001-04-30T07:31Z ingen som kan? Permalänk: https://www.webforum.nu/p/269867 ## #8 — peterbladh, 2001-05-02T07:05Z Är det där en och samma sida? I så fall förstår jag att det inte funkar nr den laddas. för request.form("txt") får inte vara "tom" (vet inte varför, men det verkar vara så). Som sagt; är index servern verkligen igång? finns det någon catalog och är den då satt till c:\\inetpub ? Finns det några indexerade directorys? Permalänk: https://www.webforum.nu/p/269868 ## #9 — qwerty, 2001-05-02T15:16Z Fick igång det! ...med ett exempel som jag hittade under index server på [www.iisfaq.com](http://www.iisfaq.com) Ett problem bara. Den listar typ hur många träffar som helst, och allt på samma sida. Man behöver väl inte göra som en vanlig paging utan det finns väl funktioner (i index server) för att begränsa antalet träffar och hur många som ska visas på varje sida? Här kommer koden, vore kul om nån kunde tipsa mig om hur jag ska begränsa antalet träffar: ``` <% session.LCID=1050 lcErrorMsg = "" Set rs = RunQuery(Request.QueryString("query").Item(),Request.QueryString("virtual").item()) if TypeName(rs) <> "Recordset" then lcErrorMsg = "Din sökning gav inga resultat.
Försök gärna igen." end if function RunQuery(lcQuery,lcVirtual) if TypeName(lcVirtual) <> "String" then lcVirtual = "/" end if if TypeName(lcQuery) <> "String" then Set RunQuery = nothing Exit Function end if Set oQ=Server.CreateObject("ixsso.Query") oQ.query = lcQuery oQ.columns = "DocTitle,vpath,hitcount,size,write,characterization,rank" oQ.SortBy = "hitcount[d]" Set oU=Server.Createobject("ixsso.util") '*** Add only a few directories for searching oU.AddScopeToquery oQ,"/","shallow" oU.AddScopeToquery oQ,"/dokument","deep" Set rs=oQ.CreateRecordset("nonsequential") if TypeName(rs) <> "Recordset" then Set RunQuery = nothing exit function end if if rs.RecordCount < 1 then Set RunQuery = nothing else ' Return result RecordSet Set RunQuery = rs end if End Function %> <% If LEN(lcErrorMsg) > 0 then %> <%= lcErrorMsg %> <% Response.End end if %>

Din sökning gav <%= rs.recordcount %> resultat...

<% do while not rs.eof %> <%rs.MoveNext loop%>
<%= rs.Fields("DocTitle")%>
"><%= rs.fields("vPath")%>
<%= rs.Fields("characterization") %>
Träffar: <%= rs.Fields("hitcount")%> Senast uppdaterad: <%= rs.Fields("write") %>
``` Permalänk: https://www.webforum.nu/p/269869 ## #10 — peterbladh, 2001-05-03T10:35Z oQ.MaxRecords Permalänk: https://www.webforum.nu/p/269870 ## #11 — qwerty, 2001-05-22T13:19Z Kan man begränsa antalet träffar per sida på något liknande sätt, eller måste man göra en paging själv? Permalänk: https://www.webforum.nu/p/269871 ## #12 — Thorax, 2001-05-22T13:53Z Om du använder dig av statiska frågor så får du paging automatisk. Använder du asp som du gör i detta fall så måste du koda allt paging själv. Permalänk: https://www.webforum.nu/p/269872 ## #13 — qwerty, 2001-05-23T08:34Z ...och med statiska frågor menar du? Permalänk: https://www.webforum.nu/p/269873 --- Tråden på webben: https://www.webforum.nu/amne/asp/9679-hjälp-med-indexserver