unire 2 funzioni

[zeweb]

Vorrei che dopo il punto andasse a capo e che mi tagliasse le parole !

Ho queste 2 funzioni ma non so unirle !

Mi aiutate, grazie !

<% 
str = rec("newsBody") 
response.write replace(str,". ",". 
") 
%>

<%nc = 300 'Numero di caratteri
testo = Rec("newsBody") 
While mid(testo,nc,1) <> " "
	nc = nc - 1
Wend
testo = Left(testo,nc) & "<a href=""leggi_cs.asp?newsID="& Rec("newsID") & """>...leggi"
Response.write Replace(testo,VbCrLF,"
")
%>

[weppos]

Richiama prima una e poi l'altra, oppure infila il replace dentro l'altra funzione!

[zeweb]

sì ok ma se mi fa una non mi esegue l'altra !

<%nc = 300 'Numero di caratteri
testo = Rec("newsBody") 
While mid(testo,nc,1) <> " "
	nc = nc - 1
Wend
response.write replace(testo,". ",". 
") 
testo = Left(testo,nc) & "<a href=""leggi_cs.asp?newsID="& Rec("newsID") & """>...leggi"
Response.write Replace(testo,VbCrLF,"
")
%>

[weppos]

E perchè infili il replace in mezzo?
Mettilo prima dell'altra parte di codice.

Ma se li richiami in sequenza funzionano?

[zeweb]

no infatti non funzionano insieme !

<% 
testo = Rec("newsBody") 
response.write replace(testo,". ",". 
") 
nc = 300 'Numero di caratteri
While mid(testo,nc,1) <> " "
	nc = nc - 1
Wend
testo = Left(testo,nc) & "<a href=""leggi_cs.asp?newsID="& Rec("newsID") & """>...leggi"
Response.write Replace(testo,VbCrLF,"
")
%>

[weppos]

Allora sono le funzioni che sono sbagliate!

[zeweb]

ah...e x scriverne una sola che riassuma queste due ?

[weppos]

Ma se non funzionano, il problema non è riunirle, ma farle fungere.

[zeweb]

certo....ho provato in diversi modi ma nulla....tu hai mai scritto qualcosa del genere ?

[weppos]

Originariamente inviato da zeweb
certo....ho provato in diversi modi ma nulla....tu hai mai scritto qualcosa del genere ?

E che ne so, non so neanche che vuoi fare.
A dire il vero ho scritto anche di peggio, mi sembrano un padio di righe di codice quelle, ma ripeto, prima devi capire cosa vuoi fare e come farlo.

QUelle righe messe lì da sole non hanno alcun senso.