Como faço para mudar isto

[zanelati2002 0]

olá amigos não manjo muito de html isto mesmo html em asp olhem só

 

<%Set você = Server.CreateObject("ADODB.Connection")você.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("login/db/banco/siteusers.mdb") &";Persist Security Info=False"vConta2="SELECT COUNT(ehmembro) AS monline FROM users WHERE ehmembro=1"Set vConta=você.Execute(vConta2)vMembros2="SELECT * FROM users WHERE ehmembro=1"Set vMembros=você.Execute(vMembros2)%><% IF vMembros.EOF THENResponse.Write "<tr><tr><td width='100%'><p align=center font face=Verdana size=1>Nenhum membro online.</font></td></tr></tr>"ELSEwhile not vMembros.EOF %><tr><tr><td width="100%"><font face=Verdana size=1> <img border="0" src="login/icons/arrow1.gif">       <a href="mailto:<%=vMembros("email")%>"><%=vMembros("username")%></a></font></td></tr><tr><%vMembros.MoveNextWendEND IF%></table><font face=Verdana size=1><b>Total: <%=vConta("monline")%>

isto fica assim

 

Bauru

Ricardo

Zanelati

Total de Membros 3

 

quero escrever assim

 

bauru, Ricardo, Zanelati

 

Total de Membros 3

 

 

TEm como alguem me der este help

[roberio 0]

O problema tá na tabela. você está fechando uma tabela para cada registro.

 

Experimenta colocar assim:

 

 

<table width="100%"><tr><td width='100%'><p align=center font face=Verdana size=1><img border="0" src="login/icons/arrow1.gif"> <%Set você = Server.CreateObject("ADODB.Connection")você.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("login/db/banco/siteusers.mdb") &";Persist Security Info=False"vConta2="SELECT COUNT(ehmembro) AS monline FROM users WHERE ehmembro=1"Set vConta=você.Execute(vConta2)vMembros2="SELECT * FROM users WHERE ehmembro=1"Set vMembros=você.Execute(vMembros2)IF vMembros.EOF THENResponse.Write "Nenhum membro online."ELSEwhile not vMembros.EOF %>     <a href="mailto:<%=vMembros("email")%>"><%=vMembros("username")</a>Response.Write " "vMembros.MoveNextWendEND IF%><br>Total: <%=vConta("monline")%></font></td></tr></table>