• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 202
  • Last Modified:

Retrieve a reference from a string

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
paulandyt
Asked:
paulandyt
1 Solution
 
DhaestCommented:
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
 
Easwaran ParamasivamCommented:
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
 
DoutorApedeutaCommented:
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
Free Tool: Path Explorer

An intuitive utility to help find the CSS path to UI elements on a webpage. These paths are used frequently in a variety of front-end development and QA automation tasks.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

 
Robert SchuttSoftware EngineerCommented:
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
 
paulandytAuthor Commented:
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
 
paulandytAuthor Commented:
Apologies Robert, your suggestion also worked!
0
 
Robert SchuttSoftware EngineerCommented:
No worries, you figured it out yourself quicker!
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Upgrade your Question Security!

Your question, your audience. Choose who sees your identity—and your question—with question security.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now