Function Trim_String(Inhalt, Laenge)
If len(Inhalt) > Laenge then
response.write left(Inhalt,instrRev(Inhalt,"
",Laenge)-1) & "..."
else
response.write Inhalt
End If
End Function
Claudius
> -----Original Message-----
> From: Oliver Dreyer [mailto:[EMAIL PROTECTED]]
> Sent: Samstag, 27. April 2002 17:30
> To: AspGerman Kaffeehaus
> Subject: [aspdecoffeehouse] Ende eines Wortes erkennen.
>
>
> Hallo Liste,
>
> <!> Folgendes Problem:
>
> Ich zeige auf meiner Webseite Text�bersichten, die ich nach
> 200 Zeichen mit
> einem "..." abtrenne und �ber einen Link auf den gesamten
> Text verweise.
>
> Nun m�chte ich verhindern, dass meine Funktion (siehe unten)
> dieses mitten
> im Wort tut, sondern am Ende des Wortes.</!>
>
> <?> Hat jemand eine Idee </?>
>
> <code>
> Function Trim_String(Inhalt, Laenge)
> If len(Inhalt) > Laenge then
> response.write left(Inhalt,Laenge) & "..."
> else
> response.write Inhalt
> End If
> End Function
> </code>
>
> mfg Oliver
>
>
> | [aspdecoffeehouse] als [EMAIL PROTECTED] subscribed
> | http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
> | Sie k�nnen sich unter folgender URL an- und abmelden:
> |
> http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffee
house.asp
| [aspdecoffeehouse] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp