retour uniquement des Chiffres de 0 à 9 à partir d'une Chaîne

J'ai besoin d'une expression régulière que je peux utiliser dans VBScript et .NET qui sera de retour que les nombres qui se trouvent dans une chaîne de caractères.

Par Exemple, de la suite de "chaînes" doit retourner seulement 1231231234

  • 123 123 1234
  • (123) 123-1234
  • 123-123-1234
  • (123)123-1234
  • 123.123.1234
  • 123 123 1234
  • 1 2 3 1 2 3 1 2 3 4

Il sera utilisé dans un e-mail de l'analyseur de trouver les numéros de téléphone, les clients peuvent prévoir dans l'e-mail et faire une recherche de base de données.

J'ai peut-être manqué un semblable regex, mais j'ai fait une recherche sur regexlib.com.

[EDIT] - Ajout d'un code généré par RegexBuddy après la mise en place musicfreak la réponse de

Code VBScript

Dim myRegExp, ResultString
Set myRegExp = New RegExp
myRegExp.Global = True
myRegExp.Pattern = "[^\d]"
ResultString = myRegExp.Replace(SubjectString, "")

VB.NET

Dim ResultString As String
Try
      Dim RegexObj As New Regex("[^\d]")
      ResultString = RegexObj.Replace(SubjectString, "")
Catch ex As ArgumentException
      'Syntax error in the regular expression
End Try

C#

string resultString = null;
try {
    Regex regexObj = new Regex(@"[^\d]");
    resultString = regexObj.Replace(subjectString, "");
} catch (ArgumentException ex) {
    //Syntax error in the regular expression
}
  • Comme je l'ai dit, \D est plus simple que ^\d.
InformationsquelleAutor Brian Boatright | 2009-05-10
  1. 11

    Je ne sais pas si VBScript a une sorte de "remplacement d'expressions régulières" de la fonction, mais si c'est le cas, vous pourriez faire quelque chose comme ce pseudo-code:

    reg_replace(/\D+/g, '', your_string)

    Je ne sais pas VBScript donc je ne peux pas vous donner le code exact, mais ce serait enlever tout ce qui n'est pas un nombre.

    EDIT: assurez-vous que l'indicateur global (le "g" à la fin de la regexp), sinon il sera seul match à la première non-nombre de votre chaîne.

    • Merci! C'est exactement ce que je cherchais à faire. Je savais que cela devait être quelque chose de simple. Je suis en utilisant RegExBuddy et va essayer de le tester et ensuite de poster le code VBScript. Je crois que VBScript va faire un remplacement.
    • Si vous voulez le faire avec .NET des classes, il est fondamentalement re = Regex("\D"); re.Remplacer("123 123 1234", ""). N'oubliez pas de cache de votre Regex objets (ne pas compiler à chaque fois que la méthode est appelée).
    InformationsquelleAutor Sasha Chedygov
  2. 175

    Dans .NET, vous pouvez extraire juste les chiffres de la chaîne. Comme ceci:

    string justNumbers = new String(text.Where(Char.IsDigit).ToArray());
    • ps. Je sais que j'ai répondu à une VB question avec C#, mais comme il est .NET, j'ai pensé qu'il vaut la peine de mettre l'idée là-bas. RegEx semble exagéré pour quelque chose d'aussi simple.
    • J'ai vraiment besoin de VBScript pour une utilisation dans un Classique de la page ASP, mais je vous remercie de votre réponse.
    • Je m'apprêtais à poster un commentaire le long des lignes de, "/Clairement/ regex serait plus rapide pour ce genre", mais j'ai couru un (non scientifique) de référence en Mono, et Linq won (environ la moitié de la durée de l'expression rationnelle a pris). 🙂 Donc mon chapeau est hors de vous.
    • qui est élégant morceau de code.
    • +10. Juste un heads-up pour tout le monde, n'oubliez pas using System.Linq; pour cela. Pour moi, VS2010 juste dit il n'y a pas de méthode "Où" pour les chaînes, et IntelliSense ne me donnera pas l'ajout automatique de l'instruction à l'aide.
    • Vous aurez également besoin de l'aide de Système.Linq.Expressions: l'utilisation du Système.Linq; using System.Linq.Expressions;
    • merci @MattHamilton - ce que si vous voulez juste en format de nombre, pas une chaîne de caractères?

    InformationsquelleAutor Matt Hamilton
  3. 8

    Comme une alternative à la principale .Net solution, adaptée à partir d'un question similaire, la réponse:

    string justNumbers = string.Concat(text.Where(char.IsDigit));
    InformationsquelleAutor Teodor Tite
  4. 6

    Remarque: vous n'avez résolu la moitié du problème ici.

    Pour NOUS, les numéros de téléphone entrés dans la "nature", vous pouvez avoir:

    • Les numéros de téléphone avec ou sans le "1" préfixe
    • Les numéros de téléphone, avec ou sans le code de zone
    • Les numéros de téléphone avec les numéros de poste (si vous aveuglément supprimer tous les chiffres, vous allez manquer les "x" ou "Ext." ou que ce soit aussi sur la ligne).
    • Éventuellement, des nombres codés avec mnémonique lettres (800-BUY-CE ou quoi que ce soit)

    Vous aurez besoin d'ajouter d'intelligence de votre code afin de les rendre conformes à la liste de chiffres à une norme unique qui vous fait rechercher dans votre base de données.

    Quelques choses simples que vous pouvez faire pour résoudre ce problème:

    • Avant la RegEx suppression de la non-chiffres, voir si il y a un "x" dans la chaîne. Si il y est, hacher le tout hors tension après elle (va gérer la plupart des versions de l'écriture d'un numéro de poste).

    • Pour n'importe quel nombre avec plus de 10 chiffres commençant par un "1", coupez-le 1. Il ne fait pas partie de la zone de code, NOUS indicatifs de zone de démarrage dans le 2xx gamme.

    • Pour un nombre encore supérieur à 10 chiffres, supposons que le reste est une extension de la sorte, et le couper off.

    • Faire votre recherche de base de données à l'aide d'un "termine-avec un motif de recherche (SELECT * from mytable where numéro de téléphone, COMME" blah%'). Cela permettra de gérer sitations (même si, avec la possibilité de l'erreur), où la zone de code n'est pas fourni, mais votre base de données a le nombre avec le code de zone.

    • vrai. Je n'ai ajouter quelque chose après la regex qui a renvoyé l'ensemble de la chaîne si elle était de 10 chiffres ou right(chaîne,10) si elle était plus longue. la dernière suggestion est bonne et quelque chose que je vais ajouter. merci! +1
    • Grands points! J'ai ajouté ma soumission vers le bas ci-dessous pour résoudre ce problème.
    InformationsquelleAutor richardtallent
  5. 1

    Par les regards des choses, votre essayant d'attraper tout les 10 chiffres du numéro de téléphone....

    Pourquoi ne pas faire une chaîne de remplacer tout d'abord sur le texte pour supprimer les caractères suivants.

    <SPACE> , . ( ) - [ ]

    Puis par la suite, il vous suffit de faire une regex recherche d'un numéro à 10 chiffres.

    \d{10}
    • qu'est ce qui est en place, mais je voulais le faire correspondre à un plus large éventail de la chaîne d'entrée.
    InformationsquelleAutor Eoin Campbell
  6. 0

    Êtes-vous passés par la n ° de téléphone de la catégorie sur regexlib. Semble être tout à fait un peu de faire ce que vous avez besoin.

    InformationsquelleAutor Ólafur Waage
  7. 0

    En ce qui concerne les points soulevés par richardtallent, ce code permet de gérer la plupart de vos problèmes dans le respect des numéros de poste, et la NOUS code du pays (+1) étant précédée.

    Pas la solution la plus élégante, mais j'ai eu à résoudre rapidement le problème afin que je puisse avancer dans ce que je fais.

    J'espère que cela aide quelqu'un.

     Public Shared Function JustNumbers(inputString As String) As String
Dim outString As String = ""
Dim nEnds As Integer = -1
' Cycle through and test the ASCII character code of each character in the string. Remove everything non-numeric except "x" (in the event an extension is in the string as follows):
'    331-123-3451 extension 405  becomes 3311233451x405
'    226-123-4567 ext 405        becomes 2261234567x405
'    226-123-4567 x 405          becomes 2261234567x405
For l = 1 To inputString.Length
Dim tmp As String = Mid(inputString, l, 1)
If (Asc(tmp) >= 48 And Asc(tmp) <= 57) Then
outString &= tmp
ElseIf Asc(tmp.ToLower) = 120
outString &= tmp
nEnds = l
End If
Next
' Remove the leading US country code 1 after doing some validation
If outString.Length > 0 Then
If Strings.Left(outString, 1) = "1" Then
' If the nEnds flag is still -1, that means no extension was added above, set it to the full length of the string
' otherwise, an extension number was detected, and that should be the nEnds (number ends) position.
If nEnds = -1 Then nEnds = outString.Length
' We hit a 10+ digit phone number, this means an area code is prefixed; 
' Remove the trailing 1 in case someone put in the US country code
' This is technically safe, since there are no US area codes that start with a 1. The start digits are 2-9
If nEnds > 10 Then
outString = Right(outString, outString.Length - 1)
End If
End If
End If
Debug.Print(inputString + "          : became : " + outString)
Return outString
End Function
    InformationsquelleAutor