Home/ Questions/Q 60041
In Process

The Archive Base Latest Questions

Editorial Team
  • 0
Asked: 2026-05-10T18:05:59+00:00

Here is my function ( updated ): Public Shared Function shortenUrl(ByVal URL As String)

  • 0

Here is my function (updated):

Public Shared Function shortenUrl(ByVal URL As String) As String     Return shortenUrl(URL, 32) End Function Public Shared Function shortenUrl(ByVal URL As String, ByVal maxLength As Integer) As String     If URL.Length > maxLength Then         String.Format('{0}...{1}', URL.Substring(0, (maxLength / 2)), URL.Substring(URL.Length - ((maxLength / 2) - 3)))     Else         Return URL     End If End Function

I fixed the problem where it didn’t return maxLength chars because it didn’t take into account the ellipses.

It seems to me that it is too complicated; any suggestions, comments, concerns are more than welcome.

Share

Leave an answer

You must login to add an answer.

Need An Account,

1 Answer

  1. Why not do this?

    Public Shared Function shortenUrl(ByVal URL As String) As String     Return shortenUrl(URL, 29) End Function Public Shared Function shortenUrl(ByVal URL As String, ByVal maxLength As Integer) As String     If URL.Length > maxLength Then         Return String.Format('{0}...{1}', URL.Substring(0, maxLength / 2),URL.Substring(URL.Length - (maxLength / 2)))     Else         Return URL     End If End Function

    That at least gets rid of all of the tempoary declarations

    • 0