Har lige lagt mærke til at den kun finder den første medlemsstatus og hvis den er 1 så hviser den at alle er aktive hvis jeg laver den om til 0 så venter alle på godkendelse...
jeg skriver lige koden ind, så kan du lige kigge på den engang :)
<!--#include file="Connections/Conn3.asp" -->
<%
Dim site_uyeler, aktiv, durum
Dim site_uyeler_numRows
Set site_uyeler = Server.CreateObject("ADODB.Recordset")
site_uyeler.ActiveConnection = MM_Conn_STRING
site_uyeler.Source = "SELECT * FROM site_uye"
site_uyeler.CursorType = 0
site_uyeler.CursorLocation = 2
site_uyeler.LockType = 1
site_uyeler.Open()
site_uyeler_numRows = 0
session("aktiv") = site_uyeler("aktiv")
%>
<%
Dim Repeat1__numRows
Dim Repeat1__index
Repeat1__numRows = -1
Repeat1__index = 0
site_uyeler_numRows = site_uyeler_numRows + Repeat1__numRows
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<table width="100%" border="0" cellspacing="1" cellpadding="2" bgcolor="#E6E6E6" class="tip1">
<tr>
<td bgcolor="#ffcc99"><b>Nickname</b></td>
<td bgcolor="#ffcc99"><b>Yer</b></td>
<td bgcolor="#ffcc99"><b>Üyelik Tarihi</b></td>
<td bgcolor="#ffcc99">Durumu</td>
</tr>
<%
While ((Repeat1__numRows <> 0) AND (NOT site_uyeler.EOF))
%>
<tr bgcolor="#ffffff">
<td><%=(site_uyeler.Fields.Item("nickname").Value)%></td>
<td><%=(site_uyeler.Fields.Item("yer").Value)%></td>
<td><%=(site_uyeler.Fields.Item("tarih").Value)%></td>
<td>
<%
response.Write session("aktiv")
if session("aktiv")=0 then
response.Write("Onay Bekliyo")
else
response.Write("Aktif")
end if
%>
</td>
</tr>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
site_uyeler.MoveNext()
Wend
%>
</table>
</body>
</html>
<%
site_uyeler.Close()
Set site_uyeler = Nothing
%>
