Référence de produit

vincefly Messages postés 8 Date d'inscription dimanche 27 novembre 2005 Statut Membre Dernière intervention 14 février 2006 - 27 nov. 2005 à 17:26
nhervagault Messages postés 6063 Date d'inscription dimanche 13 avril 2003 Statut Modérateur Dernière intervention 15 juillet 2011 - 27 nov. 2005 à 19:46
Bonjour!! Je cherche un moyen afin de bloqué des références.
j'ai une référence "AN1". je cherche un moyen d'accepté que les références avec 2 lettres é un chiffre dans ma "textbox"--> référence

trouver un moyen qui permet d'accepté lé référence par exemple AA1 ou ZJ6, mais pas d'autre référence du style 15A, ou OPG5...
Merci d'avance

4 réponses

nhervagault Messages postés 6063 Date d'inscription dimanche 13 avril 2003 Statut Modérateur Dernière intervention 15 juillet 2011 37
27 nov. 2005 à 18:44
Salut,

Tu travailles avec quel langage .net ou VB6

Pour repondre a ton probleme, soit tu le fais a la mano car ici c'est pas compliqué.

Mais si des reference sont plus complexe, il faut utiliser les regexp
ou expressions regulieres

Donc, pour vb.net il c'est en natif
Et pour il faut ajouter une reference a scripting windows je crois.

Pour l'expression reguliere
[A-Z]{2}[0-9]{1}

voila
0
vincefly Messages postés 8 Date d'inscription dimanche 27 novembre 2005 Statut Membre Dernière intervention 14 février 2006
27 nov. 2005 à 18:55
cé pour vb6
0
vincefly Messages postés 8 Date d'inscription dimanche 27 novembre 2005 Statut Membre Dernière intervention 14 février 2006
27 nov. 2005 à 19:01
tu pourrait me marquer la formule entière!! merci
0
nhervagault Messages postés 6063 Date d'inscription dimanche 13 avril 2003 Statut Modérateur Dernière intervention 15 juillet 2011 37
27 nov. 2005 à 19:46
Si tu es pas capable de chercher par toi meme
voila la solution

Ajoutes une référence à Microsoft VBScript Regular Expression
(vbscript.dll). Un petit exemple (sans gestion de fichier) :




txtstring.text = "AA2"Private Sub txtString_Change()

dim re as regexp



Set re = New RegExp

re.Pattern = "[A-Z]{2}[0-9]{1}"

re.Global = True
If re.Test(txtString.Text) Then
txtString.BackColor = vbWhite
Else
txtString.BackColor = vbYellow
End If

Set re = Nothing
End Sub

voila pour faire des regex
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/js56jsgrpRegExpSyntax.asp?frame=true
0
Rejoignez-nous