<%@Language = VBScript%> <% Option Explicit %> Prices

L2 INFORMATIQUE
Back <% Dim Produit If Not ErreurOuverture then %>

AD 2000

<% Produit = "AD 2000" On Error Resume Next %>

Prices

<% Do Until rsTarifs.EOF %> <% rsTarifs.MoveNext Loop %>
Description Price Comments
<%=GoodString(rsTarifs("Description"))%> <%=GoodString(strPrix)%> <%=GoodString(rsTarifs("Commentaires"))%>

 
<% rsTarifs.Close set rsTarifs = nothing Database.Close End If Set Database = nothing %>  

 © L2 Informatique - France - 01/05/05

ACV, Anthéus, Lagon are registered trademark by L2 Informatique