Solved

how to concat with multiple dots..

Posted on 2009-05-08
3
181 Views
Last Modified: 2013-11-07
i have a field testimonial in database, need to concat the total characters to some extent and then it should displays with ...(multiple dots)

Like this
Testimonial(in db )
Testimonials are in the form of letters and ad copy featured very commonly in the advertising of patent medicines in the 19th and 20th centuries. The pages of almanacs and other promotional literature filled up with multiple testimonials,some with accompanying photographs, that tell of the healing powers of the products in question. Dr. R. V. Pierce, marketer of Pierce's Golden Medical Discovery, published

page should be displayed in this format....

Testimonials are in the form of letters and ad copy featured
 very commonly in the advertising........


While (dr.Read())
              <span><%=dr.Item("testimonial")%></span>

Open in new window

0
Comment
Question by:Rajar Ahmed
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
3 Comments
 
LVL 10

Accepted Solution

by:
JPJ78 earned 500 total points
ID: 24335374
A function like this should do it.
This function cuts the string at a given amount of characters.
The function searches for the closest " ", "?", "!", ".", "," to avoid cutting in the midle of a word.


    Protected Function CutString(ByVal str As String, ByVal maxLength As Integer) As String
        If Not String.IsNullOrEmpty(str) Then
            If str.Length > maxLength Then
                Dim tempStr As String = str.Substring(0, maxLength)
                Dim breakIndex As Integer = 0
 
                Dim index As Integer = tempStr.LastIndexOf(" ")
                If index > breakIndex AndAlso index < maxLength - 3 Then breakIndex = index
 
                index = tempStr.LastIndexOf(".")
                If index > breakIndex AndAlso index < maxLength - 3 Then breakIndex = index
 
                index = tempStr.LastIndexOf(",")
                If index > breakIndex AndAlso index < maxLength - 3 Then breakIndex = index
 
                index = tempStr.LastIndexOf("!")
                If index > breakIndex AndAlso index < maxLength - 3 Then breakIndex = index
 
                index = tempStr.LastIndexOf("?")
                If index > breakIndex AndAlso index < maxLength - 3 Then breakIndex = index
 
                If breakIndex = 0 Then breakIndex = maxLength - 3
 
                Return str.Substring(0, breakIndex) + "..."
            Else
                Return str
            End If
        End If
 
        Return ""
    End Function
 
 
While (dr.Read())
              <span><%= CutString(dr.Item("testimonial"), 80)%></span>

Open in new window

0
 
LVL 18

Author Closing Comment

by:Rajar Ahmed
ID: 31579389
Thanks for a nice and clean functions...
0
 
LVL 18

Author Comment

by:Rajar Ahmed
ID: 24335600
thx<input id="gwProxy" type="hidden"><!--Session data--><input onclick="jsCall();" id="jsProxy" type="hidden">
0

Featured Post

Is Your Team Achieving Their Full Potential?

74% of employees feel they are not achieving their full potential. With Linux Academy, not only will you strengthen your team's core competencies but also their knowledge of of the newest IT topics.

With new material every week, we'll make sure that you stay ahead of the game.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Today I had a very interesting conundrum that had to get solved quickly. Needless to say, it wasn't resolved quickly because when we needed it we were very rushed, but as soon as the conference call was over and I took a step back I saw the correct …
The article shows the basic steps of integrating an HTML theme template into an ASP.NET MVC project
Come and listen to Percona CEO Peter Zaitsev discuss what’s new in Percona open source software, including Percona Server for MySQL (https://www.percona.com/software/mysql-database/percona-server) and MongoDB (https://www.percona.com/software/mongo-…
There's a multitude of different network monitoring solutions out there, and you're probably wondering what makes NetCrunch so special. It's completely agentless, but does let you create an agent, if you desire. It offers powerful scalability …

717 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question