Affichage dans un tableau ???

**yoan_111** · 16/04/2006, 01h12

bonjour a tous

**K_!!!** · 18/04/2006, 12h22

bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
Dim Ct
Ct="<html>"
Ct=ct&"<body>"
 
Ct = ct&"<align='center'>"
Ct = ct&"<div align='center'>"
Ct = ct&"<table border='1' cellspacing='3' cellpadding='3' id='table1'>"
 
FOR i=0 TO session("item")-1
 
Ct = ct&"<tr>"
Ct = ct&"<td><b><font size='2'>Ref :</font></b></td>"
Ct = ct&"<td><b><font size='2'>Titre :</font></b></td>"
Ct = ct&"<td><b><font size='2'>Quantité :</font></b></td>"
Ct = ct&"<td><b><font size='2'>Prix unitaire :</font></b></td>"
Ct = ct&"<td><b><font size='2'>Prix Total :</font></b></td>"
Ct = ct&"</tr>"
Ct = ct&"<tr>"
Ct = ct&"<td>"
Ct = ct& loup
Ct = ct&"</td>"
Ct = ct&"</tr>"
Ct = ct&"<tr>"
Ct = ct&"<td>" & Temp(5,i) & "</td>"
Ct = ct&"<td>" & Temp(1,i) & "</td>"
Ct = ct&"<td>" & Temp(2,i) & "</td>"
Ct = ct&"<td>" & formatnumber((Temp(3,i)/devise.fields("prix_devise").value),2) & "</td>"
Ct = ct&"<td>" & formatnumber((Temp(3,i)*Temp(2,i))/devise.fields("prix_devise").value,2) & "</td>"
 
Ct = ct&"</tr>"
NEXT
 
Ct = ct&"</table>"
Ct = ct&"</div>"
Ct = ct&"<p></p>"

Affichage dans un tableau ???

ASP

Discussions similaires

Partager

Partager