Blokları Temaya Uyarlama

[aliuykun42]

gene olmadıı

[onur2x]

İnc_foto.asp sini aşağıdaki kodla değiştir sorunun çözülecektir

<%
mwpThemeTitle= "Fotoğraflı Üyeler"
mwpThemeBlock_open()%>
<tr>
<td>
<%
database="db/gebze.mdb"
connection="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& server.mappath(database)
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open connection
Set rs = Server.CreateObject("ADODB.Recordset")
nere = "Select * From PORTAL_MEMBERS  order by  M_PHOTO_URL desc;"
rs.pageSize = 100000
rs.Open nere, conn, 1, 3 %>
<table>
<tr><td>
<MARQUEE width="100%" height="300" onmouseover=this.stop() onmouseout=this.start() scrollAmount=2 scrollDelay=30 direction=up>
<% For i = 1 to rs.PageSize %><% if rs.EOF then exit for %>
<% if Trim(rs("M_PHOTO_URL")) <> "" and lcase(rs("M_PHOTO_URL")) <> "http://" then %>
<fieldset>
<legend><font color="<% =strDefaultFontColor %>" face="<% =strDefaultFontFace %>" size="<% =strFooterFontSize %>"><% =ChkString(rs("M_NAME"),"display") %></font></legend>
<a href="<% =ChkString(rs("M_PHOTO_URL"), "displayimage")%>" target="blank"><center><img src="<% =ChkString(rs("M_PHOTO_URL"), "displayimage")%>" alt="<% =ChkString(rs("M_NAME"),"display") %>" width="100" height="100" border=0 hspace="0" vspace="0"></center>[/url]
</fieldset>


<%else
end if
rs.Movenext
Next %>
</MARQUEE>
</td></tr>
<tr>
<td  width="100%" align="center"><a href="faq.asp?page=forums#foto"><font face="<%=strDefaultFontFace%>" size="<%=strDefaultFontSize -1%>" color="<% =strDefaultFontColor %>"><B>NASIL FOTOĞRAFIMI EKLERİM[/url]
</td></tr></table>

</td>
</tr>
<%mwpThemeBlock_close()%>