condizione ultimo record del ciclo..

[slay]

stampo un lista di record dopo ogni record mi vine la virgola però all'ultimo record vorrei mettere il punto .. però mi esce sempre la virgola..

Set rs_gens = Server.CreateObject("ADODB.Recordset")
sql_gens="select * from lista_servizi where languagecode ='it' and hotelfacilitytype_id="&servizio_id&" "
rs_gens.open sql_gens, dcnDB, 3, 3
do until rs_gens.eof
%>
                                     
<%=rs_gens("name")%>
                                    
<%     rs_gens.movenext 
if not rs_gens.eof then
carattere="."
else
carattere=","
end if 
response.write carattere
loop %>
<%
rs_gens.close 
set rs_gens=nothing%> 

[optime]

è perché asp sa che è finita dopo che è finita quindi così non riuscirai mai

passa per una variabile d'appoggio, oppure stampa prima il segno, poi il record

[slay]

ho fatto così:

if not rs_gens.eof then
carattere=","
do until rs_gens.eof%>
<%=rs_gens("name")%>
<% rs_gens.movenext 
loop 
else                                
carattere="."
end if
%>
                                    
<%response.write carattere%> 

se ci sono record carattre=, altrimeni carattere=. però mi mostra sempre la virgola..

[Alethesnake]

do until rs_gens.eof

    Response.Write(rs_gens("name"))

    rs_gens.movenext
    
    If rs_gens.eof Then 
        Response.Write(".")
    Else
        Response.Write(",")
    End If
loop

[slay]

ehh.. non funzia .. il codice è come quello postato un po' più in su ...

[optime]

do until rs_gens.eof

    Response.Write(", ")
    Response.Write(rs_gens("name"))
    rs_gens.movenext

loop 

Response.Write(".")

[slay]

mi stampa questo:

, Servizio in camera., Spazi per incontri/banchetti., Centro Business., Servizio lavanderia., Lavaggio a secco., Prima Colazione in camera., Servizio internet., Autonoleggio., Fax/fotocopiatrice., LAN senza fili., Connessione Internet Wifi inclusa nella tariffa.

[optime]

posta il codice, per piacere

[slay]

<%dim rs_gen,sql_gen,servizio_id,rs_gens,sql_gens,carattere
Set rs_gen = Server.CreateObject("ADODB.Recordset")
sql_gen="select distinct hotelfacilitytype_id from servizi_hotel where facilitytype_id=3 and value=1 and hotel_id="&hotel_id&" "
rs_gen.open sql_gen, dcnDB, 3, 3

if not rs_gen.eof then
do until rs_gen.eof%>
            
<%servizio_id = rs_gen("hotelfacilitytype_id")
                                    
Set rs_gens = Server.CreateObject("ADODB.Recordset")
if sessionelingua = "it" or sessionelingua ="" then  sql_gens="select * from lista_servizi where languagecode ='it' and hotelfacilitytype_id="&servizio_id&" "
if sessionelingua = "en" then sql_gens="select * from lista_servizi where languagecode ='en' and hotelfacilitytype_id="&servizio_id&" "
if sessionelingua = "es" then sql_gens="select * from lista_servizi where languagecode ='es' and hotelfacilitytype_id="&servizio_id&" "
rs_gens.open sql_gens, dcnDB, 3, 3
                                    
do until rs_gens.eof

Response.Write(", ")
Response.Write(rs_gens("name"))
rs_gens.movenext
loop 
Response.Write(".")
rs_gens.close 
set rs_gens=nothing%>
                            
<% rs_gen.movenext 
loop 
else%>
<%' se no trova nessun servizio
response.write guardaservizi%>
                            
<%
end if
rs_gen.close 
set rs_gen=nothing%> 

[optime]

ma son due cicli.... metti il punto all'uscita dal secondo