tablo renklendirme olarak etiketli yazılar

html de tablo yapısını biliyorsunuzdur.

başlık olan yeri oluşturuyoruz…

evet başlığımız oluştu çıktısı

Başlık işlem

şimdi altında listelenecek yere sıra geldei. döngünün olacağı yer.

döngüde olan yerimizide belirttik

şimdi table bloğunu kapatıyoruz

bu kadar.

Not: baslik, id veritabanındaki alan adlarıdır.

yukarıdaki işlemlere görede;

<%
strMainDB = Server.MapPath(“DataCb/Data.mdb”)
Set Connection = Server.CreateObject(“ADODB.Connection”)
Connection.Open “DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=” & strMainDB
%>
<table>
<tr>
<th>Başlık</th>
<th>işlem</th>
</tr>
<%
Set rec = Nothing
Set rec = Server.CreateObject(“ADODB.RecordSet”)
rSQL = “Select Top 10 * From TabloAdi Order by id Desc” ‘ 10 yerine 20 yazarsan son 20′yi listeler // order by birincilAnahtarOlanAlanAdi Desc
rec.Open rSQL,Connection,3,3
Counter = 0
Do While (Not rec.Eof)
Counter = Counter + 1
‘ Satır Renklendirme
If Counter Mod 2 Then
CLR = “F1F6FF”
Else
CLR = “FCFDFF”
End If

%>
<tr>
<td style=”background-color:#<%= CLR %>“><%= rec(“Baslik”) %></td>
<td style=”background-color:#<%= CLR %>“><a href=”sil.asp?id=<%= rec(“id”) %>”>SİL</a></td>
</tr>
<%
rec.MoveNext : Loop
rec.Close
Set rec = Nothing
%>
</table>

aşağıdaki kod parçasıda satırlarımızı renklerndirir.
style=”background-color:#<%= CLR %>”

kolay gelsin.

159 views