Affiche-tout

Commenter

Contenu du snippet

Ce code vous permet d'afficher recordset, peut importe le nombre de fields qu'il contient. Ainsi, si votre commande SQL change en fonction de certain param, ce code vous permet d'afficher ce qui est retourné sans tenir compte du nombre de paramètres retournés.

Source / Exemple : 


'''''''''''
' SETTING '
'''''''''''
'Définir la Connection
'Définir le RecordSet rs
'Exécuter le RecordSet rs

J = 0
'Trouver le fields.Count
Do While err.number = 0
  On Error Resume Next
  J = J + 1
  Temp = rs.fields(J).Name
Loop
J = J - 1

'''''''''''
'AFFICHAGE'
'''''''''''

<table border="0"  width="100%">
<tr><!-- Row 1-->
 <%
   if not rs.EOF then
     For i = 0 to j
       Response.write "<td><font face=""Arial"" Size=""3"" color=""#000000""><b>" & rs.fields(i).Name & "</b></font></td>"
     Next
   end if%>
</tr>
  <%rs.MoveFirst
    if rs.EOF then
      Response.write "<tr>"
      Response.write "<td><font face=""Arial"" Size=""3"" color=""#000000""><b>No error found</b></font></td>"
      Response.write "</tr>"
    else
      Do while not rs.EOF
        Response.write "<tr>"
	For i = 0 to j
          Response.write "<td>" & rs.fields(i) & "</td>"
        Next
	Response.write "</tr>"
	rs.MoveNext
      Loop
    end if%>
</table>

Conclusion :


La mise en page peut paraître insolite quelques fois, mais si le résultat est plus important que le graphisme, ce code peut être intéressant...

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.