<%
SQLR = ""
SQLchaP = ""
event_id = Request("event_id")
NomC = Request("NomC")
PrenomC = Request("PrenomC")
Cout = Request("Cout")
location = Request("location")
Organisme = Request("Organisme")
Tax = Request("Tax")
strSql = "SELECT * FROM Locaux where CodeL = " & location
Set rsQuery = Conn.Execute(strSql)
If Not rsQuery.EOF Then
NomL = rsQuery("Nom")
end if
strSql = "SELECT * FROM Organisations where CodeO = " & Organisme
Set rsQuery = Conn.Execute(strSql)
If Not rsQuery.EOF Then
NomO = rsQuery("Nom")
end if
%>
print
Reçu de location
N°
de reçu:
<%=event_id%>
Nom
de l'organisme:
<%=NomO%>
Nom
de local :
<%=NomL%>
Personne responsable :
Nom
:
<%=NomC%>
Prénom
:
<%=PrenomC%>
Acompte
:
<%=Cout%>
Taxe:
<%
if Cout <> "" then
if Tax = true then
Taxable = int(Cout) * 0.15025
'else
'Taxable = 00
end if
response.write FormatNumber (Taxable)
'Response.Write Tax
end if
%>
Totale
:
<%
if Cout <> "" and Tax = True then
Taxable = int(Cout) * 0.15025
Total = Taxable + Cout
else
Total = Cout
end if
response.write FormatNumber (Total)
%>
Nom
de l'organisme:
Nom
: