Ricerca su colonna selezionabile

[Grinder]

Ho creato un sistema di ricerca dove, nella teoria, un select permette all'utente di scegliere la colonna del database su cui effettuare la ricerca.

rs.Source = "SELECT * FROM 
archivio WHERE "+opzione+" LIKE '%"&ricerca&"%' ORDER BY nome ASC"

Però pare che non tenga conto del select:

<select name="tiporicerca" id="tiporicerca">
        <option value="nome, genere, cont_alt">In tutto il database</option>
        <option value="nome">Per nome</option>
        <option value="genere">Per genere</option>
        <option value="cont_alt">Per contenuti alternativi</option>
       </select>

Dov'è che sbaglio?

[99eros9]

opzione sarebbe il value della select?

[Grinder]

Si, come valore ho messo il nome dalla colonna

[kluster]

se stampi il sql cosa ti appare?

[Grinder]

Adesso mi da questo errore:

Tipo di errore:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][Driver ODBC Microsoft Access]Tipo di errore:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][Driver ODBC Microsoft Access] Errore di sintassi (operatore mancante) nell'espressione della query 'LIKE '%§%''.
/archivio cinematografico/default.asp, line 22

ma prima semplicemente non mostrava niente...non capisco perchè! In più mi mostra delle stringhe del codice in alto della pagina che prima non c'erano! Ho sostituito le virgole con AND, ma da errore lo stesso...

[99eros9]

devi splittare il value e costruirti dinamicamente la query perchè questo non si può fare
nome, genere, cont_alt LIKE '%ac%'

[Grinder]

Le virgole sono state un errore...

[Grinder]

Ho provato con una funzione:

Dim ricerca, rs, rs_numRows, prestito, opzione, sql

opzione = request.querystring("tiporicerca")

function selsezione(opzione)
select case opzione
  case "1"
    sql = "SELECT * FROM archivio WHERE nome AND genere AND cont_alt LIKE '%"&ricerca&"%' ORDER BY nome ASC"
  case "2"
    sql = "SELECT * FROM archivio WHERE nome LIKE '%"&ricerca&"%' ORDER BY nome ASC"
  case "3"
    sql = "SELECT * FROM archivio WHERE genere LIKE '%"&ricerca&"%' ORDER BY nome ASC"
  case "4"
    sql = "SELECT * FROM archivio WHERE cont_alt LIKE '%"&ricerca&"%' ORDER BY nome ASC"
end select
end function

If (Request.QueryString("cerca") <> "") Then 
  ricerca = Request.QueryString("cerca")
  else
ricerca = "§"
End If

ricerca = Replace(ricerca, "'", "''")

Set rs = Server.CreateObject("ADODB.Recordset")
rs.ActiveConnection = MM_archivio_STRING
rs.Source = selsezione(opzione)
rs.CursorType = 0
rs.CursorLocation = 2
rs.LockType = 1
rs.Open()

E mi da

Tipo di errore:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E0C)
Testo del comando non impostato per l'oggetto comando.
/archivio cinematografico/default.asp, line 35

[Grinder]

Nessuno sa dirmi qualcosa?

[kluster]

aggiungi la riga sottolineata in rosso:

function selsezione(opzione)
select case opzione
  case "1"
    sql = "SELECT * FROM archivio WHERE nome AND genere AND cont_alt LIKE '%"&ricerca&"%' ORDER BY nome ASC"
  case "2"
    sql = "SELECT * FROM archivio WHERE nome LIKE '%"&ricerca&"%' ORDER BY nome ASC"
  case "3"
    sql = "SELECT * FROM archivio WHERE genere LIKE '%"&ricerca&"%' ORDER BY nome ASC"
  case "4"
    sql = "SELECT * FROM archivio WHERE cont_alt LIKE '%"&ricerca&"%' ORDER BY nome ASC"
end select
selselezione = sql 
end function