Visualizzazione dei risultati da 1 a 6 su 6
  1. #1
    Utente bannato
    Registrato dal
    Jan 2003
    Messaggi
    2,407

    motore di ricerca interno

    salve ragazzi,

    qualcuno potrebbe consigliarmi un motore di ricerca interno in asp da scaricare in modo che il lavoro da fare sia minimo e che possa funzionare su una struttura di questo tipo:

    database access

    tabella con:

    id -> contatore
    data -> tipo data
    titolo -> testo
    Messaggio -> memo


    grazie

  2. #2

  3. #3
    DUbito che possa esister un motore per ogni database.
    Fai prima a realizzare lo script, sono una decine di righe di codice , una query e nulla +.

  4. #4
    Utente bannato
    Registrato dal
    Jan 2003
    Messaggi
    2,407
    Originariamente inviato da weppos
    DUbito che possa esister un motore per ogni database.
    Fai prima a realizzare lo script, sono una decine di righe di codice , una query e nulla +.
    anche tu hai ragione, ma già mi paga poco mo pure sbattermi a ragionarlo, mi accontento di un motore che funzioni benino e che nemmeno sia fantascentifico tanto per gestire 2 campi, titolo e messaggio di un db così piccolo non ci vuole il motore della nasa

  5. #5
    Utente bannato
    Registrato dal
    Jan 2003
    Messaggi
    2,407

    mi controllereste l'esattezza di questo codice

    codice:
    		<%
    
                testo = Request("chiavericerca")
    
    			'apro la connessione con il db
    			set myConn1 = server.CreateObject("ADODB.Connection")
    			
    			dim strConnDb1
    			strConnDb1 = ""
    			strConnDb1 = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = " & server.mappath("/mdb-database/news.mdb")
    			myConn1.Open(strConnDb1)
    					
    			mySqlSelect1 = "SELECT * from notizie WHERE titolo LIKE '%"& testo &"%'OR argomento LIKE '%"& testo &"%' order by data desc"
    			
    			set myRSComS1 = server.CreateObject("ADODB.Recordset")
    			
    			myRSComS1.Open mySqlSelect1, myConn1
    				
    		
    			if not(myRSComS1.EOF) and not(myRSComS1.BOF) then	
    		
    				do while not(myRSComS1.EOF)	
    		%>
    
    	    <table width="500" cellpadding="0" cellspacing="0" bgcolor="#ffffff">
    		 <tr>
    		  <td>
    		  <font face="verdana" size="2" color="#FF0000">
    		  <font color="#05326f"><%=myRSComS1("data")%></font><%=myRSComS1("titolo")%>
    		  </font>
    		  </td>
    		 </tr>
    		 <tr>
    		  <td>
    		  <p align="justify">
    		  <font face="verdana" size="2" color="#000000">
    			<%
    			Testoparziale=""
    			Testoparziale=myRSComS1("argomento")
    			pos=150
                response.write(left(Testoparziale, pos) &"... [Continua]")
    			%>
    		  </font></p>
    		  </td>
    		 </tr>
    		</table>
    	    <table width="500" height="10" cellpadding="0" cellspacing="0" bgcolor="#ffffff">
    		 <tr>
    		  <td></td>
    		 </tr>
    		</table>
    
    		<%
    					myRSComS1.MoveNext
    				loop
    			else
    		
    		%>
    
    	    <table width="500" cellpadding="0" cellspacing="0" bgcolor="#ffffff">
    		 <tr>
    		  <td>
    		  <p align="justify">
    		  <font face="verdana" size="2" color="#000000">
              La ricerca che avete efettuato non ha dato esiti; le parole da voi inserte non risultino all'interno di nessuna notizia.
    		  </font></p>
    		  </td>
    		 </tr>
    		</table>
    	    <table width="500" height="10" cellpadding="0" cellspacing="0" bgcolor="#ffffff">
    		 <tr>
    		  <td></td>
    		 </tr>
    		</table>
    
    		<%
    			end if	
    		
    			myRSComS1.Close
    			set myRSComS1=nothing	
    			myConn1.Close
    			set myConn1=nothing
    			
    		%>
    come da titolo mi potreste dare un'occhiata alla query e soprattutto alla procedura in generico per capire se come esito ottengo quello di visualizzare in maniera parziale tutti i record i cui campi titolo e argomento abbiano la parola o parte della parola cercata?

    Grazie

  6. #6
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,559
    Direi di sì.
    Metti uno spazio prima della OR nella query.

    Roby

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.