DevTrain - DATAGRID Teil 1 - Dynamisch, Verlinkt und Formatiert

Wenn Sie Ihr Recordset in einem dynamischen Datagrid darstellen möchten, können Sie mit Hilfe von HTML-Klassen eine übersichtliche Formatierung einbinden. Zusätzlich verlinke ich im Beispiel das gesamte Recordset und übergebe den Wert des Feldes "CustomerID" an die verlinkte Seite. Auf dieser Seite kann, dann der Wert per Request.Querystring("ID") abgefragt werden.
zum Ausprobieren gibt´s unten den kompletten Code mit Datenbank zum Download.

Beispiel: DATAGRID mit dynamischer Formatierung. Wobei der Kopf, die geraden und die ungeraden Zeilen in unterschiedlicher Formatierung dargestellt werden.

...
einbinden von CSS-Datei
...
<table width="100%">
<tr><td colspan=3 align=right><h1>Alle Customers</h1></td></tr>
<tr class="head">
<td>CompanyName</td>
<td>ContactName</td>
<td>City</td>
</tr>
<%

set conn = server.CreateObject("ADODB.Connection")
set rs = server.CreateObject("ADODB.Recordset")

'-------------Der Connection-String-----------------
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=" & Server.MapPath("./db/") & "dbcustomer.mdb;"
'---------------------------------------------------

strSQL = "SELECT * FROM Customers"
rs.Open strSQL, conn

do while not rs.EOF

   if i mod 2 = 0 then
    Response.Write "<tr class='gerade'>"
   else
    Response.Write "<tr class='ungerade'>"
   end if

   Response.Write "<td><a href='dataupdate.asp?id=" & rs.Fields("CustomerID") & "'>" & rs.Fields("CompanyName") & "</a></td>"
   Response.Write "<td>" & rs.Fields("ContactName") & "</td>"
   Response.Write "<td>" & rs.Fields("City") & "</td></tr>"
   rs.MoveNext

   i = i + 1

loop

%>

</table>
...