M
Mickael Jouvin
Hello,
I have a problem with my test of requete (if rsTbl("Nom_produit") = null
then %>
<option value="1"> "Aucune réponse ne correspond à la requete" </option>)
and i don' know why ?
<select name="Nom_produit" STYLE="Width:300;font-family:Arial;font-size:10">
<% SET dbConn = Server.CreateObject("ADODB.Connection") 'Création de l'objet
serveur
MdbFilePath = Server.MapPath("Latorre.mdb") 'Connexion à la base de données
mabase.mdb
dbConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath &
";"
SQL="SELECT Document.Nom_produit, Document.ID_produit FROM Document WHERE
ID_fournisseur= " & request("Nom_fournisseur") & " AND ID_gamme= " &
request("Nom_gamme") & " order by Nom_produit;"
SET rsTbl = dbConn.Execute(SQL) %>
<% DO WHILE not rsTbl.eof
if rsTbl("Nom_produit") = null then %>
<option value="1"> "Aucune réponse ne correspond à la requete" </option>
<%else%>
<option value="<%=rsTbl("ID_produit")%>"><%=rsTbl("Nom_produit")%></option>
<% End if %>
<% rsTbl.movenext
LOOP
SET rsTbl=nothing
dbConn.close
SET dbConn=nothing %>
</select>
Regards,
Mikel
I have a problem with my test of requete (if rsTbl("Nom_produit") = null
then %>
<option value="1"> "Aucune réponse ne correspond à la requete" </option>)
and i don' know why ?
<select name="Nom_produit" STYLE="Width:300;font-family:Arial;font-size:10">
<% SET dbConn = Server.CreateObject("ADODB.Connection") 'Création de l'objet
serveur
MdbFilePath = Server.MapPath("Latorre.mdb") 'Connexion à la base de données
mabase.mdb
dbConn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbFilePath &
";"
SQL="SELECT Document.Nom_produit, Document.ID_produit FROM Document WHERE
ID_fournisseur= " & request("Nom_fournisseur") & " AND ID_gamme= " &
request("Nom_gamme") & " order by Nom_produit;"
SET rsTbl = dbConn.Execute(SQL) %>
<% DO WHILE not rsTbl.eof
if rsTbl("Nom_produit") = null then %>
<option value="1"> "Aucune réponse ne correspond à la requete" </option>
<%else%>
<option value="<%=rsTbl("ID_produit")%>"><%=rsTbl("Nom_produit")%></option>
<% End if %>
<% rsTbl.movenext
LOOP
SET rsTbl=nothing
dbConn.close
SET dbConn=nothing %>
</select>
Regards,
Mikel