")
Response.Write (rsgeysor("Element"))
Response.Write (" | ")
Response.Write (rsgeysor("Gamme_de_mesure"))
Response.Write (" | ")
Response.Write (rsgeysor("Article_N°"))
Response.Write (" |
")
'Move to the next record in the recordset
rsgeysor.MoveNext
Loop
rsgeysor.Close
Set rsgeysor = Nothing
Set adoCon = Nothing
%>