2016-12-29 1 views
-4

Ich möchte das Wort "aaaaa.com" auf eine neue Spalte aus dem Text "Mit 703125 ABC: QWER => null - aaaaa.com. [VBN Res ID = 745075267 # 1 (1/2)] Zimmer 1 Kommentar: In diesem Zimmerpreis ist kein Essen enthalten. "Das ist in einer 1 Spalte in SSRS.SSRS - Wählen Sie 1 Wort aus einem Absatz

+1

Was haben Sie schon versucht? Was schief gelaufen ist? Wo ist Ihre klare Beschreibung des aktuellen und gewünschten Verhaltens/Outputs? Diese Frage braucht etwas Arbeit, um irgendwie nützlich zu sein, bitte schauen Sie sich ["Wie stelle ich eine gute Frage?"] (Http://stackoverflow.com/help/how-to-ask) und editieren Sie Ihre Frage entsprechend. – 3N1GM4

Antwort

0

Es ist wahrscheinlich einfacher, es als 2 Spalten im Dataset auszugeben ... aber wenn Sie nicht können, dann wäre die zweite Option, VB-Code zu verwenden.

Klicken Sie mit der rechten Maustaste auf den Platz hinter Ihrem Code und klicken Sie auf "Report Properties".

Dann im Code-Abschnitt fügen Sie diesen:

Function SplitText(text As String, column As Int16) As String 

     If (column = 1) Then 
      Return text.Substring(0, text.Substring(0, text.IndexOf(".com") + 4).LastIndexOf(" ")) 
     Else 
      Return text.Substring(text.Substring(0, text.IndexOf(".com") + 4).LastIndexOf(" ") + 1) 
     End If 
End Function 

Dann in Ihrem Bericht verwenden diesen Ausdruck für die erste Spalte:

=Code.SplitText(Fields!text.Value,1) 

und dies für die zweite

=Code.SplitText(Fields!text.Value,2) 

und du hast dein Ergebnis!

enter image description here

EDIT Oder wenn Sie nur die E-Mail-Adresse soll auf seine eigene Verwendung diesen Code:

Function GetEmail(text As String) As String 

     Dim Result As String 
     Result = text.Substring(text.Substring(0, text.IndexOf(".co") + 3).LastIndexOf(" ") + 1) 
     Result = Result.Substring(0, Result.IndexOf(" ")) 

     Return Result 

    End Function 
Verwandte Themen