Programalama > ASP

Etiketler: renkli, tablo......

Ort. 0
Puan ver:
<%
Set Conn = Server.CreateObject("Adodb.Connection")
Conn.Open "DBQ="& Server.Mappath("genel.mdb") &";Driver={Microsoft Access Driver (*.mdb)}"

Set Rs = Server.Createobject("Adodb.Recordset")
rSQL = "Select * from Verilerim" 
Rs.Open rSQL, Conn, 1, 3
%>
<html>
<head>
<title>Renkli Tablo</title>
</head>
<body>
<center>
<table border = "1" bordercolorlight = "silver" bordercolordark = "white" cellspacing = "0">
<% 
i = 0
Do while Not Rs.Eof

if i mod 2 then
bgcolor = "#C0C0C0"
else
bgcolor = "#E9E8FF"
end if
%>

<tr bgcolor='<%=bgcolor%>'>
<td>Renkli Tablo1</td>
<td>Renkli Tablo2</td>
</tr>
<%
i = i + 1 
Rs.MoveNext
Loop
%>
</table>


Yorumlar                 Yorum Yaz
Bu hazır kod'a ilk yorumu siz yapın!
KATEGORİLER
ASP - 240
ASP.NET - 24
C# - 75
C++ - 174
CGI - 8
DELPHI - 247
FLASH - 49
HTML - 536
PASCAL - 246
PERL - 11
PHP - 160
WML - 9
XML - 2
Copyright © 2002 - 2018 Hazır Kod - Tüm Hakları Saklıdır.
Siteden yararlanırken gizlilik ilkelerini okumanızı tavsiye ederiz.
hazirkod.com bir İSOBİL projesidir.