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

    motore di ricerca interno

    Ciao a tutti eccomi con le news...
    Sto cercando di inserire un motore di ricerca interno al mio sito
    in grado di eseguire una ricerca su 4 campi.
    il tutto è composto da 2 pagine un form e una asp che elabora la richiesta.
    Nel eseguire il tutto mi appare il seguente errore:

    Tipo di errore:
    Errore di compilazione di Microsoft VBScript (0x800A0401)
    Prevista fine istruzione
    /webcont/motor.asp, line 36, column 168
    ---------------------------------------------------------------------

    la linea 36 è la seguente:

    rs.Source="SELECT * FROM utentiweb WHERE cognome ='%"&cognome&"%'and nome ='%"&nome&"%' and nome_dominio ='%"&nome_dominio&"%' and contratto_del ='%"&contratto_del&"%'";"

    non capisco cosa vuole !!!! Potete aiutarmi?? Grazie

  2. #2
    Utente di HTML.it L'avatar di Aki
    Registrato dal
    Dec 2002
    Messaggi
    2,206
    Ciao,

    allora, nella query sql puoi usare:
    codice:
    SELECT * FROM tabella where nome = '" & nome & '" AND ...
    per prendere dati strettamente uguali a nome
    oppure
    codice:
    SELECT * FROM tabella where nome like '%" & nome & '%" AND ...
    per prendere dati contenenti la stringa nome

  3. #3

    per chiarezza

    Per chiarire ed eventualmente dare spunto a chi servisse segue il listato.

    <%
    dim strcognome
    strcognome = request.form("cognome")
    dim strnome
    strnome = request.form("nome")
    dim strnome_dominio
    strnome_dominio = request.form("nome_dominio")
    dim strcontratto_del
    strcontratto_del = request.form("contratto_del")
    %>

    <%
    if cognome="" then cognome="%"
    end if%>
    <%
    if nome="" then nome="%"
    end if%>
    <%
    if nome_dominio="" then nome_dominio="%"
    end if%>
    <%
    if contratto_del="" then contratto_del="%"
    end if%>

    <%
    dim rs
    set rs=server.CreateObject("Adodb.recordset")

    Set Conn = Server.CreateObject("ADODB.Connection")
    Conn.ConnectionString = "DSN=uteweb"
    Conn.Open

    sql="SELECT * FROM utentiweb WHERE cognome='" & request("cognome") & "' and nome='" & request("nome") & " 'and nome_dominio='" & request("nome_dominio") & "''and contratto_del='" & request("contratto_del") & "';"

    rs.Source=sql
    rs.Open ,conn
    if(rs.EOF)then
    response.redirect "website.asp"
    else
    Response.Write "<tr><td>risultati</td></tr>"
    %>

    chiaramente il response.Write è da modificare per la visualizzazione dei risultati, sempre che riesca a capire perchè il borwser continua con lo stesso errore.

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.