Bitte Hilfe! URL als Linktext: Umbruch nach 60 Zeichen erzwingen

[Thoralf Knuth]

Hallo Banjo,

völlig ungetestet, da VBS & Co bei mir ewig her sind.

<%
If objRS("Homepage") <> "" Then
 strURL = objRS("Homepage")
 If Not(Left(strUrl,4)) = "http" Then
 strURL = "http://" & strUrl

strLinkText = objRS("Homepage")
   If StrLen( strLinkText > 60 ) Then strLinkText = Left( strLinkText, 57 ) & "..."

End If
%>
Homepage: <a href="<%=strURL%>" TARGET="_blank"><%=objRS("Homepage")%></a><br>

Homepage: <a href="<%=strURL%>" TARGET="_blank"><%=objRS("strLinkText")%></a><br>

Gruss, Thoralf