4 replies to this topic

[ecbert]

Dei uma olhada rápida em seu código...

Me parece que esse é o trecho de exibição dos membros não é?

...
--> 
     <p>::: Membros cadastrados</p><%
DSNtemp="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSNtemp=dsntemp & "DBQ=" & server.mappath("../db/sw.mdb")
sqlstmt = "SELECT * FROM membros"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sqlstmt, DSNtemp, 3, 3
do while not rs.eof
%>
     <table width="100%" border="0" class="text">
       <tr> 
         <td colspan="3" class="titulo">Nome: <%=rs("nome")%></td>
       </tr>
       <tr> 
         <td width="17%" rowspan="3"><img src="membros/<%=rs("foto")%>">&nbsp;</td>
         <td width="74%">Nick: <%=rs("nick")%></td>
         <td width="9%">&nbsp;</td>
       </tr>
       <tr> 
         <td>Data de Nasc.: <%=rs("nasc")%></td>
         <td>&nbsp;</td>
       </tr>
       <tr> 
         <td>Site: <a href="http://<%=rs("site")%>" target="_blank"><%=rs("site")%></a></td>
         <td>&nbsp;</td>
       </tr>
       <tr> 
         <td colspan="3"><hr></td>
       </tr>
     </table>
     <p>&nbsp;
  <% if not rs.eof then%>
  <% rs.movenext %>
             <%end if%>
             <%loop%></p>
     <!-- InstanceEndEditable --></td>
 </tr>
 <tr> 
   <td height="19" colspan="2" valign="top"><!--DWLayoutEmptyCell-->&nbsp;</td>
 </tr>
</table>
<table width="100%" height="43" border="0">
 <tr>
   <td background="../images/light_luz.jpg">&nbsp;</td>
 </tr>
</table>
<p>&nbsp;</p>
</body>
<!-- InstanceEnd --></html>

Sendo assim, talvez vc deva encaixar o if aqui:

...
<%
varFoto = rsConsulta("foto")
if (varFoto = "") Then
varFoto = "imagem_padrao.jpg"
%>

<%else%>
<tr> 
         <td width="17%" rowspan="3"><img src="membros/<%=rs("foto")%>">&nbsp;</td>
<%end if%>
...

Teste para ver se dá certo. Até mais.