Ok je sais pas si je me suis fait comprendre.
Le mot rêve est dans la base et je tape tape reve dans mon champs de recherche.
Car si a chaque recherche je dois enlever les accents de toutes mes valeurs ça va pomper bcp de ressources systemes non ????
A savoir que je suis pas mal newbie.
si dessous un partie de mon code:
<%dim choix, letitre, genres ' gestion pour le genre
genres = request.querystring("genres")
genres = replace((genres),"'","''")
dramatique= "drama"
drama = "AND not genre like '%" & dramatique & "%'"
if genres = "Comédie" then
genres = "LIKE '%" & genres &"%'" & drama
else
genres = "LIKE '%" & genres & "%'"
end if
letitre = request.querystring("titre")
letitre = replace((letitre),"'","''")
letitre = replace((letitre),"<","")
choix = request.querystring("choix")
if choix = "1" or choix = "" then
choix = "LIKE '" & letitre &"%'"
end if
if choix = "2" then
choix = "LIKE '%" & letitre &"%'"
end if
%>
<%dim film__selection 'recherche sur la table acteur ou titre ou réalisateur
film__selection = "titre"
If request.querystring("quelletable") <> "" then
film__selection = request.querystring("quelletable")
end if
%>
<%
Dim film__MMColParam ' définition de la recherche commence par ou contient
film__MMColParam = "LIKE %"
if (choix <> "") then film__MMColParam = choix
%>
<%
Dim film__MMColParam2
film__MMColParam2 = "LIKE %"
if (genres <> "") then film__MMColParam2 = genres
%>
<%
set film = Server.CreateObject("ADODB.Recordset")
if request.QueryString("type")="film" or request.QueryString("type")="" then
film.Source = "SELECT N°, titre, realisateur, genre, yearfilm FROM film WHERE "+ film__selection + " " + film__MMColParam + " AND genre " + film__MMColParam2 + " ORDER BY titre ASC"
end if
if request.QueryString("type")="classement" then
film.Source = "SELECT N°, titre, realisateur, genre, score, yearfilm FROM film ORDER BY score DESC"
end if
if request.QueryString("type")="chrono" then
film.Source = "SELECT N°, titre, realisateur, genre, yearfilm FROM film ORDER BY ajouterle DESC, N° DESC"
end if
if request.QueryString("type")="maj" then
film.Source = "SELECT N°, titre, realisateur, genre, verifierle, yearfilm FROM film where verifierle > 12/12/1930 ORDER BY verifierle DESC"
end if
film.CursorType = 0
film.CursorLocation = 2
film.LockType = 3
film.Open()
film_numRows = 0
%>