Solved

Retrieve a reference from a string

Posted on 2013-01-29
7
194 Views
Last Modified: 2013-01-29
I have a string and I want to look for a reference in a specific format which could be anywhere in the string. This reference is random, but will always be in the same format.

The format looks like this. N######NN##          

The string would look like this.

Dim MyString as String = "this is my string Z123456TW00 and I need to obtain the reference"

My aim is to take this value and compare it to a reference in my database.

Any ideas how I can obtain anything in the format above regardless of the numbers or letters?
0
Comment
Question by:paulandyt
[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
7 Comments
 
LVL 53

Expert Comment

by:Dhaest
ID: 38830323
If there is no logic in your strings to get the reference, like for example it always start with a "Z" and ends when a space (or end of the string) is found, then it will be impossible to do.

Perhaps you can perform it in the other direction.

Take the reference from your database and check if that is a part of your string.
0
 
LVL 16

Accepted Solution

by:
Easwaran Paramasivam earned 500 total points
ID: 38830402
Hey you could use Regex to find out the pattern you want.


^\w\d{6}\w{2}\d{2}$  could be your pattern. Please do refer:

http://msdn.microsoft.com/en-us/library/hs600312.aspx
http://www.codeproject.com/Articles/9099/The-30-Minute-Regex-Tutorial
0
 
LVL 1

Expert Comment

by:DoutorApedeuta
ID: 38830419
An easy way, I think, will be to split the string by the whitespace character, and then with the resulting strings do:
1. compare each agains the database, or;
2. validate the format of each string, to search the one that corresponds to the reference, and then compare it to the database.
0
Turn Insights into Action

Communication across every corner of your business is essential to increase the velocity of your application delivery and support pipeline. Automate, standardize, and contextualize your communication processes with xMatters.

 
LVL 35

Expert Comment

by:Robert Schutt
ID: 38830422
EaswaranP is close but I think you need this:
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        Dim MyRef As String = GetRef("this is my string Z123456TW00 and I need to obtain the reference")
        MsgBox(MyRef)
    End Sub

    Private Function GetRef(ByVal MyString As String)
        Dim Matches = Regex.Matches(MyString, "\b\w\d{6}\w{2}\d{2}\b")
        Dim ret As String
        If Matches.Count > 0 Then
            ret = Matches(0).Value
        Else
            ret = "N/A"
        End If
        Return ret
    End Function

Open in new window

0
 

Author Closing Comment

by:paulandyt
ID: 38830424
Using expressions worked!

 Here is my code:

Imports System.Collections.Generic
Imports System.Globalization
Imports System.Text.RegularExpressions

Public Module Example

    Public Sub Main()
        Dim pattern As String = "\w{1}\d{6}\w{4}\b"
        Dim input As String = "this is my string Z123456TW00 and I need to obtain the reference"
        For Each match As Match In Regex.Matches(input, pattern, RegexOptions.IgnoreCase)
            Console.WriteLine("{0}", _
                              match.Value, match.Groups(1).Value, match.Index)
        Next
        Console.Read()
    End Sub

End Module
0
 

Author Comment

by:paulandyt
ID: 38830441
Apologies Robert, your suggestion also worked!
0
 
LVL 35

Expert Comment

by:Robert Schutt
ID: 38830448
No worries, you figured it out yourself quicker!
0

Featured Post

Enroll in June's Course of the Month

June’s Course of the Month is now available! Experts Exchange’s Premium Members, Team Accounts, and Qualified Experts have access to a complimentary course each month as part of their membership—an extra way to sharpen your skills and increase training.

Question has a verified solution.

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

This article describes relatively difficult and non-obvious issues that are likely to arise when creating COM class in Visual Studio and deploying it by professional MSI-authoring tools. It is assumed that the reader is already familiar with the cla…
For those of you who don't follow the news, or just happen to live under rocks, Microsoft Research released a beta SDK (http://www.microsoft.com/en-us/download/details.aspx?id=27876) for the Xbox 360 Kinect. If you don't know what a Kinect is (http:…
Michael from AdRem Software outlines event notifications and Automatic Corrective Actions in network monitoring. Automatic Corrective Actions are scripts, which can automatically run upon discovery of a certain undesirable condition in your network.…
If you’ve ever visited a web page and noticed a cool font that you really liked the look of, but couldn’t figure out which font it was so that you could use it for your own work, then this video is for you! In this Micro Tutorial, you'll learn yo…

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