afficher les donées ds un tableau

[nickg]

bonjour
J'ai des données qui affichent comme suit

----------------------
nom durant
prenom pierre
adresse 5 rue du bo
ville paris
-----------------
nom dubois
prenom jean
adresse 5 ave du
ville bordeaux
---------------etc
je voudrai que les données s'affichent comme ça :

nom premon adresse ville
durant pierre 5 rue du bo paris
dubois jean 5 ave du bordeaux
etc

le code de ma page est :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
<%
Set Conn = Server.CreateObject("ADODB.Connection")
MdbChemin =Server.MapPath("../mail.mdb")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & MdbChemin & ";"
req_sql="SELECT * FROM employe ORDER BY date DESC;"
set rstemp=conn.execute(req_sql)
do while not rstemp.eof 
response.write("Num : "&rstemp.fields(0)&".............")
response.write("Date : "&rstemp.fields(11)&"<br>")
response.write("Comm : "&rstemp.fields(1)&"<br>")
response.write("Nom : "&rstemp.fields(2)&"<br>")
response.write("Premon : "&rstemp.fields(3)&"<br>")
response.write("Car : "&rstemp.fields(6)&"<br>")
response.write("Pays : "&rstemp.fields(8)&"<br>")
response.write("Mel : "&rstemp.fields(9)&"<br>")
response.write("Mesg : "&rstemp.fields(10)&"<br>")
response.write("<HR>")
rstemp.movenext
loop
%>

j'a i bien essayé de bidouiller avec un tableau classique html mais bien évidemment ca marche pas
je pense qu'il faut suremment modifier le code asp.Mais comment?
Merci

[Immobilis]

Salut,

Un truc du genre peut-être.

Code :

1
2
3
4
5
6
7
8
 
response.write"<table>"
response.write("<tr><td>Nom</td><td>...</td></tr>")
do while not rstemp.eof 
    response.write("<tr><td>" & rstemp.fields(xyz) & "</td><td>" & rstemp... & "</td></tr>")
    rstemp.movenext
loop
response.write"</table>"

A+

[kaiser59]

Salut,

Dis moi tu es sûr d'avoir cherché un peu partout avant ?

Code asp :

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
 
DSN_BASE = "DBQ=" & Request.ServerVariables("APPL_PHYSICAL_PATH") & "mail.mdb" & ";Driver={Microsoft Access Driver (*.mdb)};Driverld=25"
 
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open DSN_BASE
Set RS = Server.CreateObject("ADODB.Recordset")%>
 
req_sql="SELECT * FROM employe ORDER BY date DESC;"
rs.open req_sql, conn
 
response.write "<table>"&vbcrlf
 
do while not rs.eof 
response.write "<tr><th>Num : </th></td>"& rs(0) &"</td></tr>"&vbcrlf
response.write "<tr><th>Date : "& rs(11) &"</td></tr>"&vbcrlf
response.write "<tr><th>Comm : "& rs(1) &"</td></tr>"&vbcrlf
response.write "<tr><th>Nom : "& rs(2) &"</td></tr>"&vbcrlf
response.write "<tr><th>Premon : "& rs(3) &"</td></tr>"&vbcrlf
response.write "<tr><th>Car : "& rs(6) &"</td></tr>"&vbcrlf
response.write "<tr><th>Pays : "& rs(8) &"</td></tr>"&vbcrlf
response.write "<tr><th>Mel : "& rs(9) &"</td></tr>"&vbcrlf
response.write "<tr><th>Mesg : "& rs(10) &"</td></tr>"&vbcrlf
 
rs.movenext
loop
 
response.write "</table>"
 
Set RS = Nothing
Conn.Close
Set Conn = Nothing

[roro06]

euh ...

response.write "<tr><th>Date : "& rs(11) &"</td></tr>"&vbcrlf

Une erreur de copier-coller, sans doute :

Code :

response.write "<tr><td>Date : "& rs(11) &"</td></tr>"

Et pourquoi & vbcrlf ?

[kaiser59]

Oui une p'tit erreur de copier/coller et c'est

Code html :

<th>Date</th>

Alors en asp "vbcrlf" renvoie à la ligne le code cela permet d'avoir un code plus propre, sinon tu auras tous les <tr>...</tr> coller l'un à la suite des autres si tu fais afficher la source

Pour info, il y a aussi le _ (underscore) qui permet d'aller à la ligne sauf qu'ici, ce n'est pas visible dans la source si tu l'utilise tout seul. Il s'utilise surtout si tu as beaucoup de texte à mettre genre les requetes sql. Par ailleurs, cela évite aussi comme je le voie assez souvent de faire :

Code asp :

1
2
sql="select *"
sql = sql + "from toto"

c'est quand même mieux que d'avoir une panoplie de sql = sql + :

Code asp :

1
2
3
sql = "Select * "& _
       "From TOTO "& _
       "Where Id = 3"

en début de ligne tu ne met pas de & si tu utilise une variable, par contre si tu écris ceci, le & est obligatoire en début de syntaxe:

Code asp :

1
2
3
response.write "<div>"&vbcrlf _
                    &" hello world ! "&vbcrlf _
                    &"</div>

Voila