Creare motore di ricerca interno

[Deejeey]

Vorrei creare un motore di ricerca per il mio sito che sia in grado di ricercare solamente tra le pagine del mio sito internet: su internet non trovo nulla che sia spiegato chiaramente per quanto riguarda il database, mi potete aiutare o darmi un link guida adatto?
GRAZIE INFINITE

[Santino83_02]

ma tu lo vuoi che cerchi nell'HTML delle pagine oppure i contenuti stanno tutti in un database?

[-AA-]

Mi aggrego a questa discussione, anche io devo sviluppare + o meno la stessa cosa ...(un motore molto + complesso)

da quello che posso dire si tratta solo di fare le query giuste al Database (jnel caso si voglia cercare nel database)

per ricercare nelle pagine HTML anche html...post elaborazione server ..ci sono diversi script in giro che fanno ciò io ne ho usato 1 molto carino

 <%
Set objQuery = Server.CreateObject("ixsso.query")
Set objUtil = Server.CreateObject("ixsso.util")
my_keyword=request("keyword")

' keyword search
myquery=myquery & "$CONTENTS " & my_keyword

' Escludo delle cartelle
myquery=myquery & " and not #path = *\inetpub\iissamples\* "
myquery=myquery & " and not #path = *\winnt\help\iishelp\* "
myquery=myquery & " and not #path = *\winnt\system32\inetsrv\iisadmin\* "

' Escludo dei file
myquery=myquery & " and not #filename indexmaster.asp"
myquery=myquery & " and not #filename index.asp"
myquery=myquery & " and not #filename indexold.asp"

' Escludo delle estensioni
myquery=myquery & " and not #filename *.|(inc|,mdb|,cnt|,class|,toc|,css|)"

objQuery.Query=myQuery

objquery.Columns = "DocTitle, vpath, filename, size, write, rank"

objQuery.SortBy = "Rank [d]"
objQuery.MaxRecords = 50
objquery.catalog="web"
'objUtil.AddScopeToQuery objQuery, "/", "deep"
objquery.LocaleID = objutil.ISOToLocaleID("EN-US")

linebr="
" & vbcrlf
Set rstemp = objQuery.CreateRecordSet("nonsequential")

if not rstemp.eof then
  dim i
  i=rstemp.RecordCount
  if i>=50 then
    Response.write "Piu' di 50 corrispondenze trovate<hr>"
  else
    Response.write "" & i & " Corrispondenze trovate<hr>"
  end if
  Do Until rstemp.eof
    For Each key in rstemp.fields
    keyname=lcase(key.name)
    Select Case keyname
      Case "vpath"
        response.write "link: </br>"
        response.write "<a href='"
        response.write key
        response.write "'>http://www.morpheusweb.it" & key & "</a>" & linebr
      Case"rank"
        key=key/10
        key=key&"%"
        response.write "rank: </br>"
        response.write key
      Case Else
        response.write "" & keyname & ":" & linebr
        response.write key & linebr
      End Select
    Next
    response.write "
<hr>"
    rstemp.movenext
  Loop
  rstemp.close
  set rstemp=nothing
  Set objQuery = nothing
  Set objUtil = nothing
  response.write "<a href=search.asp>Nuova Ricerca...</a>"
else
  %>
  Non sono stati trovati documenti
  <%
end if
%>

[Santino83_02]

scusa AA ma quello script richiede l'installazione su server di qualche componente? non mi pare che di base windows installi "ixsso.query"

[-AA-]

Santino83_02 si quello era solo 1 esempio ... ma ce ne sono di molto + corti e senza componenti aggiuntivi (ma credo che tu lo sai meglio di me)

[Santino83_02]

Originariamente inviato da -AA-
Santino83_02 si quello era solo 1 esempio ... ma ce ne sono di molto + corti e senza componenti aggiuntivi (ma credo che tu lo sai meglio di me)

era solo per chiarire

[elfa]

quello era solo 1 esempio ... ma ce ne sono di molto + corti e senza componenti aggiuntivi

Mi inserisco in questa discussione perchè sto giusto cercando qualcosa che mi consenta di cercare dei termini all'interno dei documenti del mio sito (che gira sotto IIS), possibilmente senza componenti aggiuntivi. Cosa mi consigliate?

Grazie mille

[Mems]

Originariamente inviato da Santino83_02
scusa AA ma quello script richiede l'installazione su server di qualche componente? non mi pare che di base windows installi "ixsso.query"

Quel codice si basa sull'utilizzo di Index Server, che altri non è la ricerca integrata in Windows.
Dalla Console di sistema si va su Servizi e Applicazioni e quindi su Servizio di indicizzazione.
Li si crea un nuovo catalogo che punta al nostro sito web locale e quindi nella pagina asp si specifica il nome del catalogo in questa riga:

objquery.catalog = "nomecatalogo"

Ovviamente questa operazione va fatta sulla macchina dove gira il nostro sito web.

[Santino83_02]

Originariamente inviato da Mems
Quel codice si basa sull'utilizzo di Index Server, che altri non è la ricerca integrata in Windows.
Dalla Console di sistema si va su Servizi e Applicazioni e quindi su Servizio di indicizzazione.
Li si crea un nuovo catalogo che punta al nostro sito web locale e quindi nella pagina asp si specifica il nome del catalogo in questa riga:

objquery.catalog = "nomecatalogo"

Ovviamente questa operazione va fatta sulla macchina dove gira il nostro sito web.

figus thanks

[elfa]

ho provato ad attivare il servizio, ma sembra che il server web si blocchi; c'è qualche accortezza da seguire?

Grazie ancora