Bonjour
Je voudrais lister les enregistrements d'une base access selon un critere saisi dans un formulaire
j'ai le message suivant:
Erreur de compilation Microsoft VBScript error '800a0401'
Fin d'instruction attendue
/iisHelp/common/500-100.asp, line 11
Dim objASPError, blnErrorWritten, strServername, strServerIP, strRemoteIP Dim strMethod, lngPos, datNow, strQueryString, strURL
--------------------------------------------------------------------------^
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][Pilote ODBC Microsoft Access] Erreur de syntaxe (opérateur absent) dans l'expression 'rf='.
/essai.asp, line 19
Formulaire de saisie
Nouvelle page 1
page d'affichage essai.asp
<%
refe=Request.Form("valeur")
<%
DSN_BASE = "DBQ=" & Server.Mappath("/fpdb/conso.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};Driverld=25"
%>
<%'-------création de la connection et du recordset-----------
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open DSN_BASE
Set Rs = Server.CreateObject("ADODB.Recordset")%>
<%'-------Ouverture du recordset : l'enregistrement correspondant à la réference de la plante---------------
Rs.Open "Select * from cartouche WHERE rf=" & refe , Conn
%>
<%=Rs("rf")%>
<%=Rs("nom")%>
<%
Response.Write(test)
%>