Visualizzazione dei risultati da 1 a 9 su 9
  1. #1

    Come creare un motore di ricerca?

    C'è da qualche parte la possibilità di mettersi un motore di ricerca gratuito all'interno del proprio sito?
    Sapete consigliarmi?

  2. #2
    Utente di HTML.it
    Registrato dal
    Jul 2004
    Messaggi
    92
    Puoi mettere direttamente google se vuoi

    http://www.google.it/intl/it/searchcode.html

  3. #3
    si però non intendevo mettere un motore di ricerca verso l'esterno...mi serve un motore di ricerca per l'interno del mio sito!
    Ossia che aiuti a trovare tutto quello che ho messo io online!

    Capito?

  4. #4
    Utente di HTML.it
    Registrato dal
    Dec 2003
    Messaggi
    36
    Be allora puoi usare uno dei tantissimi script php o asp che ci sono in giro su internet e anche su questo sito..

    Questi sono quelli italiani:
    http://freephp.html.it/programmatori/lista.asp?idcat=12
    Questi quelli stranieri:
    http://freephp.html.it/script/lista.asp?idcat=32

    Bye
    :metallica

  5. #5
    Utente di HTML.it
    Registrato dal
    Dec 2000
    residenza
    Savona
    Messaggi
    897
    Eccoti una cosa velocissima, se il Tuo server supporta asp:
    Chiama questa pagina search.asp e piazzala nella directory principale del Tuo sito.
    Ciao,
    dover

    <% Dim Listoffilesfound,Thefile,Thefolder,Folderpath
    if request.form="" Then
    SendForm()
    else
    SearchTerm = Server.HTMLencode(request.form("term"))
    SearchTermArray=Split(SearchTerm," ")
    MaxSearchTerms=ubound(SearchTermArray)
    Folderstosearch="/"
    DonotsearchthisFiles =""
    Folderpath=server.mappath("\")
    Thefolder = ""
    Dim fs, f, f1, fc, s
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.GetFolder(Folderpath & Thefolder)
    Set fc = f.Files
    For Each f1 In fc
    Wfile = f1.name
    Thefile=Thefolder & "/" & Wfile
    if inStr(DonotsearchthisFiles,Thefile)=0 Then
    Searchit()
    End if
    Next
    Searchresponse()
    End if
    %><% Sub SendForm() %>
    <HTML><HEAD><TITLE>Search</TITLE></HEAD>
    <BODY BGCOLOR=FFFFFF><CENTER>
    <FORM method="POST" action="search.asp">
    <TABLE border=0 cellpadding=5 bgcolor=AAAAAA><TR>
    <TD width="323" align=center>
    Ricerca
    <INPUT type=text name=term size=15>
    <input name="submit" type=submit
    value="Cerca">
    </TD>
    </TR></TABLE>
    </FORM>
    </CENTER></BODY></HTML>
    <% End Sub %><% Sub Searchresponse() %>
    <HTML><HEAD><TITLE>Search results</TITLE></HEAD><BODY BGCOLOR=FFFFFF><CENTER>
    <TABLE BORDER=0 WIDTH=600><TR><TD BGCOLOR=C0C0C0><FONT SIZE=5>Risultati della Ricerca</FONT></TD></TR></TABLE>
    <TABLE BORDER=0 WIDTH=600>
    <% if Listoffilesfound="" Then %>
    <TR><TD>Nessun elemento trovato</TD></TR>
    <% Else
    Response.Write (Listoffilesfound)
    End if %>
    </TABLE>
    </CENTER></BODY></HTML>
    <% End Sub %><% Sub Searchit()
    Thefilepath=Folderpath & Thefile
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set a = fs.OpenTextFile(Thefilepath)
    ThecontentofFile = a.ReadAll
    a.close
    Findterms=0
    For j=0 To MaxSearchTerms
    if instr(1,ThecontentofFile,SearchTermArray(j),1)>0 Then
    Findterms=Findterms+1
    End if
    next
    if Findterms=MaxSearchTerms+1 Then
    if instr(1,ThecontentofFile,"</TITLE>",1)>0 and instr(1,ThecontentofFile,"<TITLE>",1)>0 Then
    TheTitle=left(ThecontentofFile,instr(1,Thecontento fFile,"</TITLE>",1)-1)
    TheTitle=right(TheTitle,len(TheTitle)-instr(1,TheTitle,"<TITLE>",1)-6)
    else
    TheTitle=""
    End if
    Listoffilesfound= Listoffilesfound & "<TR><TD>" & TheTitle & "</TD><TD ALIGN=CENTER VALIGN=MIDDLE> Dettagli </TD></TR>"
    End if
    End Sub %>

  6. #6
    Utente di HTML.it
    Registrato dal
    Jul 2004
    Messaggi
    92
    Interessa anche me.

    Ho copiato/incollato il tutto e messo nella cartella principale del mio sito. Ora come faccio ad aprirla però?

    Grazie

  7. #7
    Utente di HTML.it
    Registrato dal
    Dec 2000
    residenza
    Savona
    Messaggi
    897
    Per essere visualizzata, la pagina asp deve essere aperta con un web server che simula il browser. Ho pubblicato la pagina search.asp in un sito, visibile dal web all'indirizzo www.ancoracounseling.com/search.asp
    Naturalmente è senza formattazione, ma per quella potete sbizzarrirvi. Per provare la pagina cercate una parola qualsiasi contenuta in quel sito. (counseling, ad esempio)
    Forse un minimo di infarinatura in asp servirebbe, unita magari ad una buona conoscenza dell'html. Ma se posso aiutarvi, sono qui,
    Ciao,
    dover

  8. #8
    Usa però l'oggetto FSO di .ASP e risulterà abbastanza lento nelle ricerce.

  9. #9
    Estrella, se hai bisogno di qualcosa di veloce e che non richieda programmazione, puoi valutare anche questo: http://www.freefind.com/

    Può andare anche bene a chi ha comunque l'urgenza di mettere nel proprio sito una pagina di ricerca mentre sviluppa il proprio codice...

    L'ho provato e posso dirti che funziona molto bene. La versione free mette soltanto tre link pubblicitari - di tipo testuale - all'inizio della pagina che restituisce i risultati della ricerca. Secondo me non sono molto ivadenti e quasi non si fa caso (esiste comunque anche una versione a pagamento senza pubblicità).
    L'indicizzazione dell'intero sito avviene ad intervalli regolari e viene notificata tramite e-mail, se vuoi ti viene anche inviata un e-mail mensile con l'elenco delle parole ricercate dagli utenti e, infine, la pagina dei risultati della ricerca è completamente personalizzabile.

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.