2016-12-29 6 views
-4

「703125 ABC:QWER => null -aaaaa.com」というテキストから「aaaaa.com」という単語を新しい列に追加したいと考えています。 ID = 745075267#1(1/2)]部屋1コメント:この宿泊料金には食事は含まれていません。 "SSRSの1欄に入っています。SSRS - 段落から1語を選択してください

+1

あなたはすでに何を試してみましたか?何が悪かったのか?現在の、そして望ましい行動/出力の明確な説明はどこですか?この質問には、とにかく何らかの作業が必要です。[「どうすれば良い質問をしますか」](http://stackoverflow.com/help/how-to-ask)それに応じた質問。 – 3N1GM4

答えて

0

おそらくデータセットの2列として出力する方が簡単ですが、できない場合は2番目のオプションはVBコードを使用することです。

コードの背後にあるスペースを右クリックし、[レポートのプロパティ]をクリックします。

、コード部でこれを貼り付けます。第二

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

ため

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

と、この:

レポートの使用でその後
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 

最初の列のため、この式あなたの結果があります!

enter image description here

EDIT それとも、ただそれ自身の使用上の電子メールアドレスをしたい場合は、このコード:

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 
関連する問題